due appunti:

codice:
id_utente = Request.ServerVariables("HTTP_HOST") '??? non sono utenti registrati?


url_pag = Request.ServerVariables("SCRIPT_NAME") 'invece di script name magari sarebbe meglio o URL o PATH_INFO

per quanto riguarda quell'errore è dovuto probabilmente dal driver di connessione ormai sconsigliato...usa OLE www.connectionstrings.com