Databaskopplingsfel ?

<% Set Databas = Server.CreateObject("ADODB.Connection")

Databas.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("databasfil.mdb")

Set RecSet = Server.CreateObject("ADODB.Recordset") %>

Felmed:
Microsoft OLE DB Provider for ODBC Drivers fel '80004005'

[Microsoft][ODBC Driver Manager] Drivrutinens SQLAllocHandle på SQL_HANDLE_ENV misslyckades.

/vildaforum/page1.asp, rad 12

Felet får jag när jag kör på localhost med PWS.

Tack på förhand.

Har du Access uppe?
Stäng det isf.

Det är stängt. :(

Tack ändå

Hm..nu får jag upp en popuruta först också: "unable to load odbctl32.dll", så förmodligen har jag rensat bort den i samband när jag fick virus för några veckor sedan, så koden ovan var nog ok ändå.

Ja kanske det...
Jag har adrig sett detta fel:
Drivrutinens SQLAllocHandle på SQL_HANDLE_ENV misslyckades

Har du Access uppe?
Stäng det isf.

Den enda gången man får ett sådant fel genom att ha Access öppet är när du har en tabell öppen och har valt att visa datatyperna istället för tabellstrukturen. Då skriker den till nåt skumt mess, inte om man bara har tabellen eller databasen öppen.

Jag skulle nog rekommendera en ominstallation av din MDAC. https://www.microsoft.com/data

Testa att byt koppling till databasen till OLEDB:

'## OPEN THE DATABASE
DIM Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\Data\webadmin.mdb")

'## SELECT SERVER
'IF Request.ServerVariables("SERVER_NAME") = "192.168.1.44" THEN
'	' ## LOCAL SERVER
'	Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\Data\webadmin.mdb")
'ELSE
'	' ## WEBSERVER
'	Conn.Open "webadmin", "", ""
'END IF