> Set adoCon = Server.CreateObject("ADODB.Connection")
> adoCon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
> Server.MapPath("db/download.mdb")
> Set cn = Server.CreateObject("ADODB.Recordset")
> cn.CursorType = 2
> cn.LockType = 3

Richtig w�re es in diesem Fall (weil wir nur die Connection und kein
Recordset ben�tigen):

Set cn = Server.CreateObject("ADODB.Connection")
cn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
 Server.MapPath("db/download.mdb")
mSQL = "UPDATE tbldls SET dls = dls + 1 WHERE ID_no = " & aID
cn.Execute mSQL
mSQL = "SELECT [URL] from tbldls WHERE ID_no = " & aID
mUrl = cn.execute(mSQL).Fields(0).Value
cn.Close
Set cn = Nothing

Tsch��, Joachim


| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

Antwort per Email an