Function Help.

[Ashfaque]

Hello,
The below function I got from the forum. It was working in PC but now db shifted to laptop with same version of MS ACCESS giving below error msg;


"Run-time error 438"

Object doesnt support this property or method


Public Function LoadSnapshotFile(snpCtl As Object, strFilePath As String) As Boolean
Const conSnpFinishedDownload As Integer = 4
With snpCtl

.SnapshotPath = strFilePath
Do While .ReadyState < conSnpFinishedDownload
DoEvents
Loop
If .Error = 0 Then
LoadSnapshotFile = True
Exit Function
Else
MsgBox "Error loading snapshot file", _
vbOKOnly, "Snapshot Error = " & .Error
LoadSnapshotFile = False

End If
End With
End Function

Alongwith other ref files, I already have selected Snapshot viewer control and the actual snapshot file called R_Stock is also already available at the destination.

Can somebody tell me why it is not working.

Thanks.
Ashfaque

 

[aziz rasul]

Do you have a service pack for Access on your PC? If so, try downloading the same or later service pack on your laptop and see if that helps?

 

[bulrush]

I agree with Aziz. Access is telling you the object is valid, but not the method or property. That means the method or property was added at a later date, possibly via a service pack or some other upgrade.

 

[Ashfaque]

Thanks Aziz Rasul and Balrush.....

I will check n update it with service pack 2......and then let you know.

With kind regards,