Private Sub Form_Load()
Label2.Caption = login.txtuser.T ext
sa = Label2.Caption
With Adodc2.Recordse t
subjsec = !course + " " + !studsec
MsgBox subjsec, , "System"
.Filter = "IDnumber = '" + Label2.Caption + "'"
End With
With Adodc1.Recordse t
.Filter = "subjsectio n='" + subjsec + "' and isdeleted = 0"...
4 results in 0.0026 seconds.
-
Ferwayne Yalung started a topic Why it is not loading or adding item in the listbox?in Visual BasicWhy it is not loading or adding item in the listbox?
-
Runtime error 3012 How can I fix this?
The code works when I logged in as a admin, teacher or student.But when i try an unregistered username, runtime error 3021 (either BOF or EOF is true, or the current record
has been deleted. requested operation requires a current record
Here is my code:
...Code:Private Sub Command1_Click() With Adodc2.Recordset If .RecordCount = 0 Then With Adodc1.Recordset If Me.txtuser.Text = !IDno And txtpass.Text -
How to fix "ERROR Data type mismatch"?
How can i fix the error?
Private Sub cmdadd2_Click()
If cmdadd2.Caption = "ADD" Then
cmdadd2.Caption = "SAVE"
cmdedit2.Captio n = "CANCEL"
buttons True, False
a = Date
a = Right(a, 4)
With Adodc2.Recordse t
.Filter = "IDnumber like 'F-" + a + "-*'"
If Adodc2.Recordse t.RecordCount <> 0 Then
.MoveLast... -
ADODC and MS Access Database Record limiting
I have ado code that connects my program to access(2000) database. The records in the table linked are 1000+.
In the vb form, only 993 records are returned. But the report(Crystal Report) shows all the records.
Does Ado have a limit to records that can loaded?
If not, what could be the problem?
