Can't find installable ISAM error

Chaz4831

I am writing a program that has an access database linked to it. There is not much code because I am doing the majority of it through the properties. I started writing it on my desktop and it works fine when I run it. But on my laptop it comes up with this error "Can't find installable ISAM" and won't load the database into the form. I don't know if the code would help but here it is:

Private Sub Form_Load()

End Sub

Public Sub probecardfirst_Click()
'Moves to first record in database
probecard.Recordset.MoveFirst
End Sub

Public Sub probecardlast_Click()
'Moves to last record in database
probecard.Recordset.MoveLast
End Sub

Public Sub probecardnext_Click()
probecard.Recordset.MoveNext
If probecard.Recordset.EOF Then
MsgBox "You are on the last record"
probecard.Recordset.MoveLast
End If

End Sub
Public Sub probecardprevious_click()

End Sub

Public Sub probecards_Click(Area As Integer)
probecard.Recordset.Bookmark = probecards.SelectedItem
End Sub

Public Sub xymotionFirst_Click()
'Moves to first record in database
xymotion.Recordset.MoveFirst
End Sub

Public Sub xymotionlast_Click()
'Moves to last record in database
xymotion.Recordset.MoveLast
End Sub

Public Sub xymotionnext_Click()
xymotion.Recordset.MoveNext
If xymotion.Recordset.EOF Then
MsgBox "You are on the last record"
xymotion.Recordset.MoveLast
End If

End Sub

Public Sub xymotionprevious_Click()
xymotion.Recordset.MovePrevious
If xymotion.Recordset.BOF Then
MsgBox "You are on the first record"
xymotion.Recordset.MoveFirst
End If

End Sub

Public Sub ztheta_Click(Area As Integer)
zthetamotion.Recordset.Bookmark = ztheta.SelectedItem
End Sub

Public Sub zthetafirst_Click()
'Moves to first record in database
zthetamotion.Recordset.MoveFirst
End Sub

Public Sub zthetalast_Click()
'Moves to last record in database
zthetamotion.Recordset.MoveLast
End Sub

Public Sub zthetanext_Click()
zthetamotion.Recordset.MoveNext
If zthetamotion.Recordset.EOF Then
MsgBox "You are on the last record"
zthetamotion.Recordset.MoveLast
End If

End Sub

Public Sub zthetaprevious_Click()
zthetamotion.Recordset.MovePrevious
If zthetamotion.Recordset.BOF Then
MsgBox "You are on the first record"
zthetamotion.Recordset.MoveFirst
End If

End Sub

PavlinII

: I am writing a program that has an access database linked to it. There is not much code because I am doing the majority of it through the properties. I started writing it on my desktop and it works fine when I run it. But on my laptop it comes up with this error "Can't find installable ISAM" and won't load the database into the form. I don't know if the code would help but here it is:
:
: Private Sub Form_Load()
:
: End Sub
:
: Public Sub probecardfirst_Click()
: 'Moves to first record in database
: probecard.Recordset.MoveFirst
: End Sub
:
: Public Sub probecardlast_Click()
: 'Moves to last record in database
: probecard.Recordset.MoveLast
: End Sub
:
: Public Sub probecardnext_Click()
: probecard.Recordset.MoveNext
: If probecard.Recordset.EOF Then
: MsgBox "You are on the last record"
: probecard.Recordset.MoveLast
: End If
:
: End Sub
: Public Sub probecardprevious_click()
:
: End Sub
:
: Public Sub probecards_Click(Area As Integer)
: probecard.Recordset.Bookmark = probecards.SelectedItem
: End Sub
:
: Public Sub xymotionFirst_Click()
: 'Moves to first record in database
: xymotion.Recordset.MoveFirst
: End Sub
:
: Public Sub xymotionlast_Click()
: 'Moves to last record in database
: xymotion.Recordset.MoveLast
: End Sub
:
: Public Sub xymotionnext_Click()
: xymotion.Recordset.MoveNext
: If xymotion.Recordset.EOF Then
: MsgBox "You are on the last record"
: xymotion.Recordset.MoveLast
: End If
:
: End Sub
:
: Public Sub xymotionprevious_Click()
: xymotion.Recordset.MovePrevious
: If xymotion.Recordset.BOF Then
: MsgBox "You are on the first record"
: xymotion.Recordset.MoveFirst
: End If
:
: End Sub
:
: Public Sub ztheta_Click(Area As Integer)
: zthetamotion.Recordset.Bookmark = ztheta.SelectedItem
: End Sub
:
: Public Sub zthetafirst_Click()
: 'Moves to first record in database
: zthetamotion.Recordset.MoveFirst
: End Sub
:
: Public Sub zthetalast_Click()
: 'Moves to last record in database
: zthetamotion.Recordset.MoveLast
: End Sub
:
: Public Sub zthetanext_Click()
: zthetamotion.Recordset.MoveNext
: If zthetamotion.Recordset.EOF Then
: MsgBox "You are on the last record"
: zthetamotion.Recordset.MoveLast
: End If
:
: End Sub
:
: Public Sub zthetaprevious_Click()
: zthetamotion.Recordset.MovePrevious
: If zthetamotion.Recordset.BOF Then
: MsgBox "You are on the first record"
: zthetamotion.Recordset.MoveFirst
: End If
:
: End Sub
:
:
Hi,
have you already asked uncle Google about this?
Have you checked this out?
http://support.microsoft.com/kb/299457
Is it working now?

[blue][b][italic][size=4]P[/size]avlin [size=4]II[/italic][/size][/b][/blue]

[purple]Don't take life too seriously anyway you won't escape alive from it![/purple]