updating front end

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

i have gotten a sample code from
http://www.databasejournal.com/features/msaccess/article.php/3286111
where it looks for a version in fe database, comparing it to be, if it
doesn't match then it will automatically updates the fe database on each
client's copy.
i have copied the code/tables/forms exactly (changing the path were database
is located). however on splash screen.. this code is not working.

Private Sub Form_Load()

On Error Resume Next

If ReconnectTables() = True Then

strVerClient = Nz(DLookup("[VersionNumber]", "[tblVersionClient]"), 0)
strVerServer = Nz(DLookup("[VersionNumber]", "[tblVersionServer]"), 0)
Me.Repaint
Else
MsgBox "Couldn't Find Data Tables. Exiting.", vbCritical, "Error"
End If


End Sub
tblversionclient and tblversionserver does exist but the msbox pop ups.
thank you!
 
Back
Top