Behöver hjälp!

objCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/data/db.mdb")

Om du har ett användarnamn som måste va i adressen måste det stå Server.MapPath("/användarnamn/data/db.mdb")

Jag använder ett av gruvsjo.com's nyhetsscript.

Microsoft JET Database Engine error '80004005'
'E:\ww2\www.helmsklyfta.net\www\www.helmsklyfta.net\data\nyheter.mdb' is not a valid path. Make sure that the path name is spelled correctly and that you are connected to the server on which the file resides.

/nyheter.asp, line 78

Blev det endå. Detta felmeddelandet kanske gav en bättre förklaring till felet?

objCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("data/db.mdb")

då? :)

Yay! 200 meddelanen! ;)

Hur ser din kod ut nu då?

Microsoft VBScript runtime error '800a01a8'
Object required: ''

/nyheter.asp, line 78

Set Conn = Server.CreateObject("ADODB.Connection") 
          Set RecSet = Server.CreateObject("ADODB.Recordset")
         objCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=data/db.mdb"
          Const perSida = 3
          Sidan = Request.QueryString("sida")
          If Sidan = "" then 
              sida = 1 
          Else 
              sida = Sidan 
          End If

Jag suger verkligen på ASP, så hoppas ni står ut med mig.

Hur ser koden ut när du fick felmeddelandet i ditt förra inlägg?

Så här:

Set Conn = Server.CreateObject("ADODB.Connection") 
          Set RecSet = Server.CreateObject("ADODB.Recordset")
          Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db1

          Const perSida = 3
          Sidan = Request.QueryString("sida")
          If Sidan = "" then 
              sida = 1 
          Else 
              sida = Sidan 
          End If

Vad innehåller db1 då? Det är det som är intressant.

Kanske jag kunde räknat ut själv, sorry.

db1 = Server.MapPath("db/nyheter.mdb")

Ska jag byte ut Server.MapPath mot något annat, eller?

Provade du enligt Sebbes första inlägg, att inleda sökvägen med en slash för att indikera roten?

db1 = Server.MapPath("/db/nyheter.mdb")

Mvh

Tack! :birp

Men nu uppstod ännu ett fel :(

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] Could not delete from specified tables.

/nyheter.asp, line 476

If Request.Querystring("action") = "delete" AND Session("nyhet") = "ok" Then

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)}; DBQ=" & db
Conn.Execute("DELETE FROM nyheter WHERE id="& Request.Querystring("id"))

Session("mess") = "Nyheten är borttagen!"		
Response.Redirect sidnamn & "?do=inne"

Säker på att tabellen nyheter finns?

Nog är den där alltid.

@nders skrev:

Provade du enligt Sebbes första inlägg, att inleda sökvägen med en slash för att indikera roten?

db1 = Server.MapPath("/db/nyheter.mdb")

Mvh

Skulle inte databaserna ligga i mappen data? :q

Testa att använda en mer modern connectionstring

[red]If Request.Querystring("action") = "delete" AND Session("nyhet") = "ok" Then
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "[b]Provider=Microsoft.Jet.OLEDB.4.0;Data Source=[/b]" & db
Conn.Execute("DELETE FROM nyheter WHERE id="& Request.Querystring("id"))
Session("mess") = "Nyheten är borttagen!"
Response.Redirect sidnamn & "?do=inne"
[/red]

Mvh icaaq

Nexus86 skrev:

@nders skrev:

Provade du enligt Sebbes första inlägg, att inleda sökvägen med en slash för att indikera roten?

db1 = Server.MapPath("/db/nyheter.mdb")

Mvh

Skulle inte databaserna ligga i mappen data? :q

Jo, det var det jag frågade efter först, men har ej fått något svar på hur jag kopplar en databas bakåt in i en annan mapp.

objCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/data/db.mdb")

måste väl funka?????

Nope, sorgligt nog.