Well, I use VB6 so I'm not sure if the syntax is different, but the relevant lines are:
Code:
Dim rsAccess As ADODB.Recordset
Dim intServer As Integer
'get version number from server copy
Set rsAccess = New ADODB.Recordset
rsAccess.ActiveConnection = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & g_sServerPath & ";Persist Security Info=False;"
rsAccess.Open "SELECT Max(Version) AS MaxVersion FROM Version_local"
intServer = rsAccess!MaxVersion
where g_sServerPath is the path to the file. I think my buddy Bill uses VBS and a text file:
http://www.thatlldoit.com/Pages/howt....aspx#feupdate