Lowyat.NET: Latest topics by pinggbp

(WTS )Brand new iphone 7 128gb + bundle gift

pinggbp — Tue, 20 Dec 2016 17:03:49 +0800

[b]Item(s):IPHONE 7 128 GB SILVER+KAJSA LIGHTING CABLE+ TEMPLED GLASS+ UAG CASE

[b]Package includes:IPHONE 7 128 GB SILVER+KAJSA LIGHTING CABLE+ TEMPLED GLASS+ UAG CASE

[b]Price:RM 3500

[b]Warranty:NEW SEAL IN BOX

[b]Dealing method:COD

[b]Location of seller:KLANG VALLEY

[b]Contact method/details:PM

[b]Age of item:ALL NEW

---

[b]Item(s) conditions:NEW

[b]Picture:

[b]Reason for sale:NEED MONEY

Crystal report

pinggbp — Mon, 27 Nov 2006 01:27:22 +0800

Anyone know what website got teach crystal report?
i really dunno how to do

How to import excel data into oracle?

pinggbp — Tue, 21 Nov 2006 12:59:25 +0800

anyone know how to inport excel data into oracle database??
anyone can teach me??

problem while connect to oracle

pinggbp — Tue, 07 Nov 2006 02:49:06 +0800

this is my login form, what is the problem??,
why cannot validate my username and password?
i already create that table, and some record,
and already make connection string and record source.

Option Explicit

Public LoginSucceeded As Boolean

Private Sub cmdCancel_Click()
Unload Me
End Sub

Private Sub CmdClear_Click()
txtUserName.Text = ""
txtPassword.Text = ""
End Sub

Private Sub cmdOK_Click()
With Adodc1.Recordset
' .MoveFirst
.Find "[login_id] like '" & txtUserName.Text & "'"

If .EOF Then
MsgBox "Invalid Password", vbInformation, "ERROR"
Else
If txtPassword.Text = ![Password] Then
LoginSucceeded = True
txtUserName.Text = ""
txtUserName.SetFocus
txtPassword = ""
Me.Hide
FrmMainPage.Show
End If
End If
End With
End Sub

Private Sub Form_Load()
With Adodc1
.ConnectionString = "Provider=MSDAORA.1;Password=welcome;User ID=pinggbp;Data Source=adodc1;Persist Security Info=True"
' & _
' "Persist Security Info=False;Data Source=" & App.Path & _
' "\data1.mdb"
.CommandType = adCmdTable
.RecordSource = "LOGIN"
' Provider=MSDAORA.1;Password=welcome;User ID=pinggbp;Persist Security Info=True
End With
End Sub