Detta kan väl inte vara all kod. Det finns ju inte en någon "gammal" sökväg.
(Använd gärna [k o d]-taggarna.)
12 svar · 307 visningar · startad av emil
Mitt nya webhotell tillåter endast att jag lägger Datasbasfiler i ett dir på servern.
Mitt nuvarande script läser som om databaserna låg i defaultkatalogen. Har mixtrat lite men får det inte att funka.
Databaserna ligger i /test/db/ på servern.
Hur fixar jag så följande rader pekar dit istället?
Set Conn = Server.CreateObject("ADODB.Connection")
ODBCpath = left(request.servervariables("PATH_TRANSLATED"), instrrev(request.servervariables("PATH_TRANSLATED"), "\\"))
' Response.Write "DBQ=" & ODBCpath & DBName & ";DefaultDir=" & ODBCpath & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UID=admin;UserCommitSync=Yes;"
Conn.Open "DBQ=" & ODBCpath & DBName & ";DefaultDir=" & ODBCpath & ";Driver={Microsoft Access Driver (*.mdb)}"
Tack på förhand
Detta kan väl inte vara all kod. Det finns ju inte en någon "gammal" sökväg.
(Använd gärna [k o d]-taggarna.)
Funkar inte något liknande då?
<%
Dim ConnectString, conn
ConnectString = "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/test/db/databasen.mdb")&";pwd=LoSenOrDet"
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnectString
%>
Jag kör först och includar codelibrary.asp och sen körs detta på sjävla sidan:
<%
OpenConn("/test/db/news.mdb")
If request("mode") = "delete" then
SQL = "delete from news where news_id = " & request("news_id")
If session("Admin") = "OK" then
Conn.Execute(SQL)
End If
End If
SQL = "select top 1 * from news order by created desc"
Set news = Conn.Execute ( SQL )
%>
Dock får jag felmeddelande på sidan:
Microsoft OLE DB Provider for ODBC Drivers fel '80004005'
[Microsoft][Drivrutin för ODBC Microsoft Access]Allmänt fel Det går inte att öppna registernyckeln 'Temporary (volatile) Jet DSN for process 0x194 Thread 0x514 DBC 0x20b2024 Jet'.
Rad 10 är:
Conn.Open "DBQ=" & ODBCpath & DBName & ";DefaultDir=test/db/" & ODBCpath & ";Driver={Microsoft Access Driver (*.mdb)}"
troligen ar det inte korrekt sokvag, testa och skriva ut for att vara saker pa att du har skrivit ratt:
Response.write Server.MapPath("/test/db/news.mdb")
;)
Hur "includar" du filen då?
<!-- #include virtual = "/test/db/code_library.asp" -->
Sjysst att du försöker hjälpa mig!
Även testat lägga code_library.asp i samma dir som sidan jag försöker köra med file include men funkar inte heller. samma fel.
Och vad händer om du klistrar in den koden som du fick av mig direkt på sidan?
Det borde vara sökvägen det är fel på.
Blir helt rätt sökväg...
Detta då:
<!-- #include virtual = "../test/db/code_library.asp" -->
Hurra tack =) Kvällen räddad =)
attans att jag var tvungen att klicka på den länken :r