Ja! Något sånthär borde fungera:
Set Databas = Server.CreateObject("ADODB.Connection")
MdbFilePath = Server.MapPath("\cgi-bin\databas.mdb")
Databas.Open = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";"
SQL = "Select Count(*) AS cnt from tbl"
Set rsCnt = databas.execute(SQL)
dbCnt1 = rsCnt("cnt")
Set rsCnt = Nothing
databas.close
MdbFilePath = Server.MapPath("\cgi-bin\databas2.mdb")
Databas.Open = "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";"
SQL = "Select Count(*) AS cnt from tbl"
Set rsCnt = databas.execute(SQL)
dbCnt2 = rsCnt("cnt")
totalt = Cint(dbCnt1) -- Cint(dbCnt2)
Response.write totalt
Mvh, Vide
------------------
Kom hem till mig...
[Redigerat av Vide den 26 sep 2000]
