سابفرم با odbc

[karmand]

با سلام
در اکسس پروجکت با odbc بدون اینکه به بانکی وصل شوم جستجویی برای همکاران نوشتم

Option Compare Database
Dim rst1 As ADODB.Recordset
Private Sub Command4_Click()
Dim strsql As String
Set rst1 = New ADODB.Recordset
If Me.serch_serial <> Empty Then
strsql = ("select * from kala_khanev where f01_nicpnsrl=" + Me.serch_serial + "")
rst1.Open strsql, Cnxn, adOpenKeyset, adLockOptimistic, adCmdText
Call insert_
Else
If IsNull(Me.serch_name) = False Then
strsql = ("select * from kala_khanev where F08_tSpName like '%" + Me.serch_name + "%'")
rst1.Open strsql, Cnxn, adOpenKeyset, adLockOptimistic, adCmdText
Call insert_
End If
End If
Me.serch_serial.SetFocus

End Sub

Private Sub Command66_Click()
DoCmd.SetWarnings False
If rst1.BOF = False Then
rst1.MovePrevious
Call insert_
End If
End Sub

Private Sub Command9_Click()
DoCmd.SetWarnings False
If rst1.EOF = False Then
rst1.MoveNext
Call insert_
End If
End Sub

Private Sub insert_()
'ãÑÈæØ Èå ÓсÑÓÊ
Me.f1 = rst1!f01_nicpnsrl
Me.f8 = rst1!f08_tspname
Me.f6 = rst1!f06_tctname
Me.f7 = rst1!f07_taddress

Me.f9 = rst1!f09_tspjob
Me.f10 = rst1!f10_tspofname
Me.f11 = rst1!f11_nispoftel
Me.f12 = rst1!f12_nihtel
Me.f13 = rst1!f13_nipcode
Me.f14 = rst1!f14_nistate
'ãÑÈæØ Èå ÎÇäæÇÑ
Me.m2 = rst1!f02_tfname
Me.m3 = rst1!f03_tlname
Me.m4 = rst1!f04_tfthname
Me.m41 = rst1!sex
Me.m5_s = rst1!f05_nibirths
Me.m5_m = rst1!f05_nibirthm
Me.m5_d = rst1!f05_nibirthd
Me.m6 = rst1!f06_tshsh
Me.m7 = rst1!f07_nishserial
Me.m8 = rst1!f08_nishsery
Me.m9 = rst1!f09_tshchar
Me.m10 = rst1!f10_nimcode
Me.m11 = rst1!f11_ninesbat
Me.m12 = rst1!f12_teshtl
Me.m13 = rst1!tahsilat
'
End Sub

Option Compare Database

Public Cnxn As ADODB.Connection

Public Sub conect()
Dim strCnxn As String
strCnxn = "Provider='sqloledb';Data Source='SERVER9';Initial Catalog='kalabarg87';User ID=sdehghan;Password=13371502"
Set Cnxn = New ADODB.Connection
Cnxn.Open strCnxn
End Sub


مشکل اینجاست که برای دیدن رکورد دوم یا سوم باید کلید بعدی را بزنند
میخواهم بدانم چگونه دیتاگرید و یا سابفرم بسازم
چون نه کواری دارم
نه جدولی که بتوان ساب را به آن وصل کرد