Mystisk database fejl

http://www.adopenstatic.com/faq/whyOLEDB.asp

Hvordan løser jeg problemet - Jeg forstå ikke det der står på den henviste link - Jeg er nu begynder....

Min databaseforbindelse ser således ud (Hvad skal jeg ændre?):

Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open "DBQ=d:\home\minwebadressedk\db\mailingliste.mdb; DefaultDir=DBQ="&(Server.MapPath(".")) &"\;Driver={Microsoft Access Driver (*.mdb)};"

Her er et ex:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("streetracers.mdb")
Conn.Open DSN

set rs = server.CreateObject("ADODB.RECORDSET")

strSQL= "Select Count(BrugerID) AS ANTAL from"
strSQL = strSQL & "(Select BrugerID FROM search where"
strSQL = strSQL & "(BilledeID Between 23 And 45) and vistpic = 1 group by BrugerID)"

rs.Open strSQL, conn

Do Until rs.EOF

%>       

<a href=<%=rs("ANTAL")%>><%=rs("ANTAL")%></a><br>

<%

rs.MoveNext
Loop

rs.Close
Set rs = Nothing
%>
</BODY>
</HTML>

i ex. Databasen ligger i samme mappe som dine asp sider

..så kan jeg ikke skrive til den. Jeg har Azero og de kræver at databasen ligger i en mappe der hedder /db/ før roden - altså www-mappen som alle mine filer ligger i. Derfor dette:

d:\home\minwebadressedk\db\mailingliste.mdb

Du har angivet DBQ to gange i connection strengen:

Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open "DBQ=d:\home\minwebadressedk\db\mailingliste.mdb; DefaultDir=DBQ="&(Server.MapPath(".")) &"\;Driver={Microsoft Access Driver (*.mdb)};"


Prøv at fjerne den sidste med Server.MapPath og defaultDir det skulle ikke være nødvendigt:


Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open "DBQ=d:\home\minwebadressedk\db\mailingliste.mdb;Driver={Microsoft Access Driver (*.mdb)};"

Her er en ex med path:

Dim Myconn,MyRS,MyField,MyRecord,DSNstr,SQLstr
        Set conn = server.CreateObject("adodb.connection")
        Set MyRS = server.CreateObject("adodb.recordset")
        DSNstr="DRIVER={Microsoft Access Driver (*.mdb)}; "
    DSNstr=DSNstr & "DBQ=" & "d:\home\minwebadressedk\db\mailingliste.mdb"

    Myconn.Open DSNstr
    SQLstr = "SELECT * FROM results"
    Set MyRS = Myconn.execute(SQLstr)

Det virkede - tak