database og global.asa

Hey

hvordan får jeg lavet dette, så det virker:

<SCRIPT RUNAT=Server Language=VBScript>
Sub Session_OnStart

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("../db/dbase.mdb")
Conn.Open DSN

strIP = Request.ServerVariables("REMOTE_ADDR")

sql = "UPDATE brugerinfo SET ip =  strIP"

conn.execute(sql)
Conn.Close
Set Conn = Nothing
End Sub


SUB Session_OnEnd

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("../db/dbase.mdb")
Conn.Open DSN

sql = "DELETE brugerinfo WHERE ip = strIP"

conn.execute(sql)
Conn.Close
Set Conn = Nothing
END SUB

</SCRIPT>


... jeg har ikke ret meget forstand på VBscripts...

/Bjarke - (KLEIFDESIGN)