Har kört lite asp programering mest på skoj hemma till lite mindre projekt. Din connectionsträng säger att du skall använda jet 3.51, den finns inte på nyare datorer. Via blandat arkiv/servicepack finns denna att ladda hem. Du kan även byta connectionsträng och använda Jet 4.0 så torde du slippa detta problem. Testade det och tack för tipset. Får detta felmeddelande: Först Rickard, skriv inte samma fråga i två forum. tack för tillsägalsen om flera inlägg i flera forum. har stängt den andra tråden. Har du kollat så Databasen inte är skrivskyddad respektivt att det konto du kör har skrivrättigheter till databasen? Har gett hela mappen fullständiga rättigheter.... griper efter halmstrån just nu!! Hmm vet inte riktigt faktist Gjort exakt enligt din guide..... Bara för att testa. Set rs = Server.CreateObject("ADODB.Connection") Nu har du blandat ihop det rejält. Du skapar ett Connection-objekt som du sedan försöker öppna som om det vore ett Recordset-objekt. Sedan försöker du använda objektet Connection som du aldrig har skapat... har nog testat allt som går att testa nu...... har nog mixat och prova allt som står på denna sidan! har installerat om den från!!! sp2 har hårdare rättigheter. Även om du ändrar rättigheter på mappen är det inte säkert att dessa rättigheter sätts på filerna. Högerklicka på din databas och sätt fulla rättigheter på iusr_xxx eller guest eller vilket konto du låter anonym access köras från.felmeddelande!
Efter jag installerat Sp2 så verkar datan fått flipp alltså......
Får dett felmeddelandet nu. Allting fungerade alldeles utmärkt efter uppgraderingen.
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Drivrutin för ODBC Microsoft Access]Allmänt fel Det går inte att öppna registernyckeln 'Temporary (volatile) Jet DSN for process 0x6e4 Thread 0x83c DBC 0x16a4efc Jet'
Så här se min connection ut:
<%
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("data\rille.mdb")
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open strDSN
strSQL = "SELECT * FROM user"
Set rs = myConn.Execute(strSQL)
while not rs.EOF
if (rs("user")=request.form("user") and rs("pass")=Request.Form("pass")) then
ok=true
ID = rs("ID")
session("user") = rs("user")
session("UserLevel") = rs("UserLevel")
end if
rs.MoveNext
wend
myConn.Close
Set rs = Nothing
Set myConn = Nothing
%>Sv: felmeddelande!
Se: Artikel [Felhantering - felsökning runt databaser]Sv:felmeddelande!
"Den service Pack-version som är installerad på datorn är nyare än den uppdatering du försöker tillämpa. Du behöver inte denna uppdatering"Sv: felmeddelande!
Du får inte fler svar för det, men möjligen någon som retar upp sig.
Vad du bör göra är att ändra på din connection-string till:
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.MapPathDin_DataBas.mdb")
%>
Detta bör lösa ditt problem.
Sv:felmeddelande!
Har användt ditt kod exempel med nu får jag följande fel:
<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.MapPath ("data\rille.mdb")
strSQL = "SELECT * FROM user"
Set rs = Connection.Execute(strSQL)
while not rs.EOF
if (rs("user")=request.form("user") and rs("pass")=Request.Form("pass")) then
ok=true
ID = rs("ID")
session("user") = rs("user")
session("UserLevel") = rs("UserLevel")
end if
rs.MoveNext
wend
Connection.Close
Set rs = Nothing
Set Connection = Nothing
%>
och följande felmedelande visas i explorer:
Feltyp:
Microsoft JET Database Engine (0x80004005)
Odefinierat fel
/rille/CheckUser.asp, line 29
Inte en enda sida man har gjort funkar!
är helt knäckt...... allt fungerade innan Service Pack 2!!!!!!!!
Sv: felmeddelande!
Sv:felmeddelande!
Sv: felmeddelande!
Du kan testa den ASP kod jag har i en artikel
Artikel [Anslut och använda en databas på sin ASP sida.]
och seSv:felmeddelande!
<%
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("rille.mdb")
Dim sql
sql = "SELECT * FROM links"
Dim rs
Set rs= conn.Execute(sql)
Do Until rs.EOF
Response.write rs("url")
rs.MoveNext
Loop
rs.close
conn.close
%>
och får dett felmeddelande:
HTTP 500.100 - Internt serverfel - ASP-fel
Internet Information Services
Feltyp:
Microsoft JET Database Engine (0x80004005)
Odefinierat fel
jag fattar ingenting längre.....
Sv: felmeddelande!
Försök med:
rs.Open SQL, Connection, 1, 2
Skulle tro att det finns en möjlighet...
Sv:felmeddelande!
strDSN = "Provider=Microsoft.Jet.OleDB.4.0;Data Source="&Server.MapPath("data\rille.mdb")
rs.Open strSQL, strDSN, 1
strSQL = "SELECT * FROM user"
Set rs = Connection.Execute(strSQL)
felmeddelande:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Driver Manager] Datakällan hittades inte och ingen standarddrivrutin är angivenSv: felmeddelande!
En virtuell sökväg skall ha /, inte \.
<code>Set objConnection = Server.CreateObject("ADODB.Connection")
strConnstring = "Provider=Microsoft.Jet.OleDB.4.0;Data Source=" & Server.MapPath("data/rille.mdb")
objConnection.Open strConnString
strSQL = "SELECT * FROM user"
Set objRS = objConnection.Execute(strSQL)</code>Sv:felmeddelande!
får det ändå ej att funka...
provade tipset du gav mig men det genererar följande felmeddelande:
Feltyp:
Microsoft JET Database Engine (0x80004005)
Odefinierat fel
Det jag inte kan i min vildaste fantsi förstå varför det ej funkar det som en gång fungerade alldeles utmärkt!?Sv:felmeddelande!
sista utvägen är en omistallation av windows....
verkar som om SP2 har ställt till det riktigt ordentligt...... Sv: felmeddelande!