i used Split database and seperated my forms and tables succesfully but after that my code is not working and giving me error in .index and .seek line, please reply by sample code how can i used it after database split, for your i also tried dynaset but it's not working either.
Your help will be appreciated.
Thanks
Private Sub Button14_Click()
Dim MyDB As Database, MyTable As Recordset
Set MyDB = DBEngine.Workspaces(0).Databases(0)
Set MyTable = MyDB.OpenRecordset("Password", DB_OPEN_TABLE)
MyTable.Index = "PrimaryKey"
MyTable.Seek "=", [Forms]![Password]![NameBox]
If MyTable.NoMatch Then
[Forms]![Password].NameBox = ""
[Forms]![Password].Pass = ""
DoCmd.GoToControl "NameBox"
End If
Your help will be appreciated.
Thanks
Private Sub Button14_Click()
Dim MyDB As Database, MyTable As Recordset
Set MyDB = DBEngine.Workspaces(0).Databases(0)
Set MyTable = MyDB.OpenRecordset("Password", DB_OPEN_TABLE)
MyTable.Index = "PrimaryKey"
MyTable.Seek "=", [Forms]![Password]![NameBox]
If MyTable.NoMatch Then
[Forms]![Password].NameBox = ""
[Forms]![Password].Pass = ""
DoCmd.GoToControl "NameBox"
End If