กระทู้เก่าบอร์ด อ.สุภาพ ไชยา
349 1
URL.หัวข้อ /
URL
ไม่เข้าใจ การ Set RecordSet ใน Access97
คือผม D/L ตัวอย่างใน Web ผมไม่เข้าใจนะครับ
Private Sub cmdAdd_Clikc)
Dim SqlStr As String
SqlStr = "Select * From tblUpdatePer Where IdPer='" & txtId & "'"
Set Rsper = dbPer.RecordSet(SqlStr) '==== Error บันทัดนี้แหละครับ
If Rsper.RecordCount <> 0 Then
Msgbox "มีรหัสนี้อยู่แล้ว"
End If
End Sub
จะแก้อย่างไรดีครับ แต่ใน Access 2000 xp ไม่มีปัญหานะครับ
Private Sub cmdAdd_Clikc)
Dim SqlStr As String
SqlStr = "Select * From tblUpdatePer Where IdPer='" & txtId & "'"
Set Rsper = dbPer.RecordSet(SqlStr) '==== Error บันทัดนี้แหละครับ
If Rsper.RecordCount <> 0 Then
Msgbox "มีรหัสนี้อยู่แล้ว"
End If
End Sub
จะแก้อย่างไรดีครับ แต่ใน Access 2000 xp ไม่มีปัญหานะครับ
1 Reply in this Topic. Dispaly 1 pages and you are on page number 1
1 @R01765
รู้สึกว่าจะยังไม่ได้ประกาศตัวแปร Rsper,dbPer เช่น..
Dim dbper As Database
Dim Rsper As Recordset
Set dbPer = CurrentDB
Set Rsper = dbPer........
..ประมาณนี้หรือเปล่า....
Time: 0.1151s