Hey den her fejl!

lyder til at du har en forkert sti til din database.

Det betyder at den ikke kan finde databasen i den sti der er angivet i Connection Strengen.

Den fil den snakker om stat.inc ser sådan her ud! :

<! Steffen T. Christensen, 1999 >
<! dolphine@mail.subnet.dk >
<! Dolphine Software >
<! http://dolphine.subnet.dk/ >

<% Set DB = Server.CreateObject("ADODB.Connection")
  DB.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};" & "DBQ=f:\users\test\www\stat\stat.mdb;" & "DefaultDir=f:\users\test\www\stat\;" & "FIL=MS Access;"
  DB.Open %>
<% SQL = "SELECT * FROM Pages;"
  Set RS = Server.CreateObject("ADODB.Recordset")
  RS.Open SQL, DB, 3, 3

    i = 0

    do while not rs.eof
        if Request.ServerVariables("URL") = rs("Path") then
            i = 1
            rs("Access") = rs("Access") + 1
        end if
        rs.movenext
    loop

    if i = 0 then
      RS.MoveFirst
        RS.AddNew
        rs("Path") = Request.ServerVariables("URL")
        rs("Access") = rs("Access") + 1
        RS.Update
    end if

      Set RS = Nothing



%>

Prøv at vise det kode som dy bruger til at connecte til databasen.

Det muligt du lige mangler en / hvis du bruger Server.Mappath("db/db.mdb")

;)
Så du har en folder som hedder stat hvori database filen ligger?

den har jeg lige smidt op!

ja!

Og ligger folderen stat i root folderen af www ?

ja

på www.krellers.dk/stat/

Hvilken udbyder har du, eller er det din egen server?

nu kan det godt være det er mig der spørger dumt, men du siger du lige har smidt den op, men stien til databasen er på dit f drev, eller er det bare mig der er sat af her ?

Jeg bruger webdomain.dk

questis >> Det faldt jeg også lige over .....! har prøvet at ændre det til http://www.krellers.dk/stat/stat.mdb hmmm virkede heller ik!

Ja dette liger en sti på din PC:
DBQ=f:\users\test\www\stat\stat.mdb;

Umiddelbart vil ens brugernavn/domænenavn indgå i stien eks
DBQ=c:\homes\kellersdk\www\stat\stat.mdb;

eagleeye dvs. hvad skal ændres i den kode!!!

Hvis du har stat til at ligge i root så kan du bruge Server.Mappath i stedet for at skrive den fuldt ud:


"DBQ=" & Server.MapPath("/stat/stat.mdb") & ";" & "DefaultDir=" & Server.MapPath("/stat/")&";" & "FIL=MS Access;"

hmmm.... når jeg prøver at hente din db, får jeg denne fejl: Object Disabled

den skal jeg så ikke være mig sikker på hvad betyder, men normalt, skulle jeg kunne hente den ved at kunne url'en.... så kunne tænkes der er noget der

Eller hvis du vil skrive den rigtige sti c:\xxx\xxx\stat\stat.mbd så kan du udksrive Server.MapPath("/stat/"stat.mdb") så har du stien direkte til filen:

response.write Server.MapPath("/stat/"stat.mdb")

Nu har jeg sat den kode ind som eagleeye gav den er også sat ind i users og viewstats for de rskulle den jo også ind!!!!!! men nu kommer der en ny fejl!!!:

Microsoft OLE DB Provider for ODBC Drivers error '80040e21'

Multiple-step OLE DB operation generated errors. Check each OLE DB status value, if available. No work was done.

/stat/users.inc, line 19


users filen:
<! Steffen T. Christensen, 1999 >
<! dolphine@mail.subnet.dk >
<! Dolphine Software >
<! http://dolphine.subnet.dk/ >


<% Set DB = Server.CreateObject("ADODB.Connection")
  DB.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};" & "DBQ=" & Server.MapPath("/stat/stat.mdb") & ";" & "DefaultDir=" & Server.MapPath("/stat/")&";" & "FIL=MS Access;"
  DB.Open
  SQL = "SELECT * FROM Users;"
  Set RS = Server.CreateObject("ADODB.Recordset")
  RS.Open SQL, DB, 3, 3
    rs.movefirst

        RS.AddNew
        rs("IP") = Request.ServerVariables("REMOTE_ADDR") & " "
        rs("User") = Request.ServerVariables("REMOTE_USER") & " "
        rs("Referer") = Request.ServerVariables("HTTP_REFERER") & " "
        rs("Browser") = Request.ServerVariables("HTTP_USER_AGENT") & " "
        rs("Time") = now
        RS.Update

      Set RS = Nothing
      Set DB = Nothing
%>

Den kommer som regel hvis man forsøger at indsætte flere data end en kolonne kan indeholde.

Eksvis hvis kolonnen User er 5 karakter og man indsætte strengen "ennybruger" som er 10 karakter så kommer fejlen.

Så hvilken type er dine kolonner og hvis de er tekst hvor mange karakter er de så?

eagleeye ikke for at dum men hvad er det og hvor?????

Det er i access databasen du skal kigge i den tabel som hedder Users.

En anden ting kunne være du har brugt to reserverede ord som kolonnenavne og det er User og Time

Overvej at ændre de to kolonnenavne.

Du skal også sikre du har skriverettigheder til den folder databasen ligger i. Det er noget som din udbyder skal gøre, og det har de sikkert også gjort.


Du kan også lave det som en SQL sætning i stedet for at bruger AddNew så alle disse linjer kode:

  SQL = "SELECT * FROM Users;"
  Set RS = Server.CreateObject("ADODB.Recordset")
  RS.Open SQL, DB, 3, 3
    rs.movefirst

        RS.AddNew
        rs("IP") = Request.ServerVariables("REMOTE_ADDR") & " "
        rs("User") = Request.ServerVariables("REMOTE_USER") & " "
        rs("Referer") = Request.ServerVariables("HTTP_REFERER") & " "
        rs("Browser") = Request.ServerVariables("HTTP_USER_AGENT") & " "
        rs("Time") = now
        RS.Update


Bliver til:

SQL = "INSERT INTO Users (IP, [User], [Referer], [Browser], [Time]) VALUES ("
SQL = SQL & "'" & Request.ServerVariables("REMOTE_ADDR") & "', "
SQL = SQL & "'" & Replace(Request.ServerVariables("REMOTE_USER"),"'","''") & "', "
SQL = SQL & "'" & Request.ServerVariables("HTTP_REFERER") & "', "
SQL = SQL & "'" & Replace(Request.ServerVariables("HTTP_USER_AGENT"), "'","''") & "', "
SQL = SQL & "Now()"
SQL = SQL & ")"
DB.Execute (SQL)

En anden ting du skal også huske at sætte "Tilladnullængde" til Ja for hver kolonne i databasen. For at undgå fejl hvis en streng er tom.

Jamen nu lyder det nok a little bit dummie . Men skåret ud i pap hvad skal rettes i de filer for at det kommer til at virke!

Du skal åbne din database fil som er:  stat.mdb

Så skal du åben (tryk på Design) den tabel som hedder: Users

Så skal du for hver kolonne (IP, User, Referer, Browser, Time) sætte Tilladnullængde til Ja smat Obligatorik til Nej, for dem det er mulligt.

hvordan sætter du den til tilladnullængde!!!

Du trykker på kolonnenavnet og så skulle du nede under få nogle muligheder for sætte forskelige properties for kolonnen. Det er den anden nederste.

Er inde i design nu der står ikke lige tilladnullængde!

ja felstørrelse og nyeværdier osv...

Du skal vælge den kolonne du vil ændre det for. Hvis det er en tal eller autonummer kolonne kan man ikke sætte den, det skal være for dem som er tekst og notat.

såen har ændret tilladnullængde nu til ja!!

Hvilken type er de forskellige kolonner?
Og hvis de er tekst hvad er feltstørrelsen så?

De er tekst og der feltstørrelse er 50!

Prøv at sætte feltstørrelsen op til 100 for ihvertilfælde denne kolonne Browser da denne Request.ServerVariables("HTTP_USER_AGENT") let kan være >50 karakter.

Ligeledes gælder: Referer
Der er 50 måske også lige lidt nok.