gæstebog

Rs1.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database/navn.mdb\") %>

Du skal bruge Server.MapPath() istedet for den absolutte sti.

Damm, du er bare den hurtigste tdaugaard !!!, hvad har du givet dit mailprogram - PC-EPO ?? ;-)

tdaugaard : GÅ I SENG! - når du har kommenteret snyd igen! :o)

jens:> ha ha .. yup .. min Outlook er på € i denne måned ;-)
parazite:> naa..

parazite:> ehm .. \"naa\" til at gå i seng\" ;-)

Er der en der så kan ændre denne linie til det korrekte:
Set Rs1 = Server.CreateObject(\"ADODB.Connection\")<BR>Rs1.Open \"DRIVER={Microsoft
Access Driver (*.mdb)}; DBQ=D:\\web\\srv076\\database\\database.mdb\" %&gt;<BR>

Set Rs1 = Server.CreateObject(\"ADODB.Connection\")<BR>Rs1.Open \"DRIVER={Microsoft
Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database/navn.mdb\") %><BR>

det prøver jeg lige

jeg har nu disse linier, men får fejlen \"siden kan ikke vises\" linket ligger på www.paragliding.dk med navnet TEST.

Set Rs1 = Server.CreateObject(\"ADODB.Connection\")<BR>Rs1.Open \"DRIVER={Microsoft
Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database/database.mdb\") %><BR>
strSQL = \"select* from gaestebogen ORDER BY ID DESC\"
set rs = Conn.execute(strSQL)

Set Rs1 = Server.CreateObject(\"ADODB.Connection\")<BR>Rs1.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database/database.mdb\") %><BR>

det skal være på een linie!

nu har jeg kopieret din linie ind på en linie, men det er stadig det samme...

*G* du har noget helt galt i din kode .. fjern det der <BR> sådan her prøv den..

Set Rs1 = Server.CreateObject(\"ADODB.Connection\")
Rs1.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database/database.mdb\") %><BR>

åhh åhh ny fejlmeddel..

forum/default.asp, line 61

Set Rs1 = Server.CreateObject(\"ADODB.Connection\")<BR>Rs1.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database/database.mdb\")
--------------------------------------------------------------^

Det er den jeg lige har rettet med ovenstående ;-)

helt rettet er den desværre ikke:

Microsoft VBScript compilation error \'800a0401\'

Expected end of statement

/forum/default.asp, line 61

Set Rs1 = Server.CreateObject(\"ADODB.Connection\") Rs1.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database/database.mdb\")

Det skal være TO linier

Set Rs1 = Server.CreateObject(\"ADODB.Connection\")

Rs1.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database/database.mdb\")

nu kommer der en ny:
Microsoft OLE DB Provider for ODBC Drivers error \'80004005\'

[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key \'Temporary (volatile) Jet DSN for process 0x388 Thread 0x59c DBC 0x155d6024 Jet\'.

/forum/default.asp, line 62

Din database kan ikke findes :-)

Lad os sige dit script ligger i roden af dit domæne

/noget.asp

så skal din database i det her tilfælde ligge i
/database/

og du skal huske at skrive det rigtige filnavn i Server.MapPath()

viborgnet tillader kun at min database ligger i
/database i roden ved siden af /paragliding.

min database ligger i /database/database.mdb
scriptet ligger i /paragliding/forum/default.asp

Så skal du bruge:

Rs1.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"/database/database.mdb\")

det er desværre det samme:

Microsoft OLE DB Provider for ODBC Drivers error \'80004005\'

[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key \'Temporary (volatile) Jet DSN for process 0x388 Thread 0x59c DBC 0x155d6024 Jet\'.

/forum/default.asp, line 62

HEDDER din database \"database.mdb\" ?

prøv LIGE INDEN din Rs1.Open at skrive

Response.Write Server.MapPath(\"/database/database.mdb\")

og skriv resultatet her.

d:\\web\\srv076\\paragliding.dk\\database\\database.mdb
Microsoft OLE DB Provider for ODBC Drivers error \'80004005\'

[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key \'Temporary (volatile) Jet DSN for process 0x388 Thread 0x59c DBC 0x155e1084 Jet\'.

/forum/default.asp, line 63

hmm .. og din database ligger i d:\\web\\srv076\\paragliding.dk\\database\\ og hedder Database.mdb ?

det er nu ikke helt korrekt, den ligger i
d:\\web\\srv076\\database\\database.mdb

der står øverst i dit spm. at viborgnet skriver at man skal åbne sin database vha.

D:\\web\\vibntXXXX\\database\\navn.mdb

hvor \"navn.mdb\" er navnet på din database, men hvad står de 4 X\'er for ?

ingen anelse ?? -

så skal du skrive

Rs1.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=d:\\web\\srv076\\database\\database.mdb;\"

men var dte ikke det du havde til at starte med ?

prøver lige

jeg har ringet til viborgnet de 4xxx er srv076.

nu får jeg så fejlen:
Microsoft VBScript runtime error \'800a01a8\'

Object required: \'\'

/forum/default.asp, line 61

nu har jeg:
Rs1.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=d:\\web\\srv076\\database\\database.mdb;\"

Men får nu fejl i linie 63 som ser sådan ud:

set rs = Conn.execute(strSQL)

hvad er linier 61 ?

linie 61:
set Rs1 = Server.CreateObject(\"ADODB.Connection\")

jeg kan sku godtnok ikke se nogen fejl på linie 61 .. :-(

\"Men får nu fejl i linie 63 som ser sådan ud:

set rs = Conn.execute(strSQL) \"

skrive lige hvad din strSQL indeholder og den fejl du får

her er hele min default.asp :

<% response.buffer = true %>
<html>

<head>
<META NAME=\"Generator\" CONTENT=\"Stone\'s WebWriter 3\">
<meta name=\"robots\" content=\"NOINDEX\">
<meta http-equiv=\"Content-Type\"
content=\"text/html; charset=iso-8859-1\">
<!-- Minus AutoDato -->
<title>G&aelig;stebog</title>
<style type=\"text/css\">
.css
{
font-family:verdana;
font-size:8pt;
background-color:#ffffff;
border-bottom:dotted 1px;
border-color:#000000;
border-left:dotted
1px;
border-color:#000000;
border-right:dotted 1px;
border-color:#000000;
border-top:dotted 1px;
border-color:#000000;
}

<!--
A:link {
        font-weight: normal;
        color: black;
        text-decoration: underline;
}
A:visited {
        font-weight: normal;
        color: black;
        text-decoration: underline;
}
A:active {
    color: black;
    text-decoration: underline;
}

A:hover {
        font-weight: normal;
        color: #808080;
    text-decoration: overline;
}
-->
</style>
</head>

<body bgcolor=\"#FFFFFF\" topmargin=\"10\" leftmargin=\"0\"
rightmargin=\"0\">

<div align=\"left\">
<A HREF=\"tilfoej.asp\" TARGET=\"_top\">Skriv i g&aelig;stebogen.</A><br>
<HR SIZE=\"1\" color=\"#000000\">
<%

Set Rs1 = Server.CreateObject(\"ADODB.Connection\")
Rs1.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=d:\\web\\srv076\\database\\database.mdb;\"
set rs = Conn.execute(strSQL)

if rs.EOF then
Response.write \"<font face=\"\"Arial\"\" size=\"\"2\"\">G&aelig;stebogen er tom.</font>\"
else
Do Until rs.EOF
%>
Fra: <A HREF=\"mailto:<%=RS(\"Email\")%>\"><%=RS(\"Navn\")%></A><br>
Hjemmeside: <A HREF=\"http://<%=RS(\"Hjemmeside\")%>\" TARGET=\"_blank\"><%=RS(\"Hjemmeside\")%></A><br>
<%=RS(\"Besked\")%>
<HR SIZE=\"1\" color=\"#000000\">
<p><%RS.MoveNext
Loop
end if

Conn.Close
Set Conn = Nothing%></p>
</body>
</html>
*****************\'
fejlmeddelelsen:

Microsoft VBScript runtime error \'800a01a8\'

Object required: \'\'

/forum/default.asp, line 63

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=d:\\web\\srv076\\database\\database.mdb;\"
set Rs = Conn.execute(strSQL)

if Rs.EOF then
Response.write \"<font face=\"\"Arial\"\" size=\"\"2\"\">G&aelig;stebogen er tom.</font>\"
else
Do Until rs.EOF
%>
Fra: <A HREF=\"mailto:<%=RS(\"Email\")%>\"><%=RS(\"Navn\")%></A><br>
Hjemmeside: <A HREF=\"http://<%=RS(\"Hjemmeside\")%>\" TARGET=\"_blank\"><%=RS(\"Hjemmeside\")%></A><br>
<%=RS(\"Besked\")%>
<HR SIZE=\"1\" color=\"#000000\">
<p><%RS.MoveNext
Loop
end if

Conn.Close
Set Conn = Nothing
%>

det SKAL virke .. håber jeg :-)

Det håbede jeg også.. men nu kommer der ikke engang en fejl. kun \"siden kan ikke vises, den side du bla bla\"

ak ak ak

det er ellers et færdigt script jeg har hentet fra activeserver..., hvor man \"kun\" lige skulle nogle få linier.

*G* .. ja .. \"kun liiige\" .. :-(

Microsoft VBScript compilation error \'800a0400\'

Expected statement

/forum/default.asp, line 61

<%
^


er hvad jeg får på din addr. på nettet .. prøv at post HELE din default.asp igen

nu får jeg også:
Microsoft OLE DB Provider for ODBC Drivers error \'80040e0c\'

Command text was not set for the command object.

/forum/default.asp, line 63

*********
her kommer hele default:
**********
<% response.buffer = true %>
<html>

<head>
<META NAME=\"Generator\" CONTENT=\"Stone\'s WebWriter 3\">
<meta name=\"robots\" content=\"NOINDEX\">
<meta http-equiv=\"Content-Type\"
content=\"text/html; charset=iso-8859-1\">
<!-- Minus AutoDato -->
<title>G&aelig;stebog</title>
<style type=\"text/css\">
.css
{
font-family:verdana;
font-size:8pt;
background-color:#ffffff;
border-bottom:dotted 1px;
border-color:#000000;
border-left:dotted
1px;
border-color:#000000;
border-right:dotted 1px;
border-color:#000000;
border-top:dotted 1px;
border-color:#000000;
}

<!--
A:link {
        font-weight: normal;
        color: black;
        text-decoration: underline;
}
A:visited {
        font-weight: normal;
        color: black;
        text-decoration: underline;
}
A:active {
    color: black;
    text-decoration: underline;
}

A:hover {
        font-weight: normal;
        color: #808080;
    text-decoration: overline;
}
-->
</style>
</head>

<body bgcolor=\"#FFFFFF\" topmargin=\"10\" leftmargin=\"0\"
rightmargin=\"0\">

<div align=\"left\">
<A HREF=\"tilfoej.asp\" TARGET=\"_top\">Skriv i g&aelig;stebogen.</A><br>
<HR SIZE=\"1\" color=\"#000000\">
<%

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=d:\\web\\srv076\\database\\database.mdb;\"
set Rs = Conn.execute(strSQL)

if Rs.EOF then
Response.write \"<font face=\"\"Arial\"\" size=\"\"2\"\">G&aelig;stebogen er tom.</font>\"
else
Do Until rs.EOF
%>
Fra: <A HREF=\"mailto:<%=RS(\"Email\")%>\"><%=RS(\"Navn\")%></A><br>
Hjemmeside: <A HREF=\"http://<%=RS(\"Hjemmeside\")%>\" TARGET=\"_blank\"><%=RS(\"Hjemmeside\")%></A><br>
<%=RS(\"Besked\")%>
<HR SIZE=\"1\" color=\"#000000\">
<p><%RS.MoveNext
Loop
end if

Conn.Close
Set Conn = Nothing
%>

Har du et bud på hvad jeg skal gøre ved denne fejl:

Microsoft OLE DB Provider for ODBC Drivers error \'80040e0c\'

Command text was not set for the command object.

/forum/default.asp, line 63

linie 63:
set Rs = Conn.execute(strSQL)

jeg er helt lost...