ASP vraagje... - Softwareontwikkeling

donderdag 8 augustus 2002 22:55

Acties:

Verwijderd

Topicstarter

Wie weet wat in de volgende ASP code fout is?

Als ik hem namelijk wil bekijken krijg ik de 500 Internal Server Error.
Mijn webserver is wel goed geconfigureerd aangezien ik andere asp pagina's wel kan bekijken.

--------------------------------------------------------------------------------------------------------

<html>
<head>
<title>members</title>

<!- #include file="../adovbs.inc" ->
<%
'Open een verbinding met de Access-database coinclub.mdb
Set cnn1 = Server.CreateObject("ADODB.Connection")
openStr = "driver={Microsoft Access Driver (*.mdb)};" &_
"dbq=" & Server.MapPath("coinclub.mdb")
cnn1.Open openStr,"",""
'Open een recordset die alle velden bevat van alle records in de tabel members.
sql = "SELECT * FROM members;"
Set rsMbrs = Server.CreateObject("ADODB.Recordset")
rsMbrs.Open sql, cnn1, adOpenForwardOnly, adLockReadOnly, adCmdText
%>
</head>
<body>

<table border="1" cellspacing="0" cellpadding="3">
<caption><b>members</b></caption>
<tr>
<th>memberid</th>
<th>fname</th>
<th>sname</th>
<th>position</th>
<th>phone</th>
<th>email</th>
</tr>
<%'Begin een lus door alle records
Do While Not rsMbrs.EOF
%>
<tr valign="top">

<td><%=Server.HTMLEncode(rsMbrs.Fields("memberid").Value)%>
<td><%=server.HTMLEncode(rsMbrs.Fields("fname").Value)%></td>
<td><%=server.HTMLEncode(rsMbrs.Fields("sname").Value)%></td>
<td><%=server.HTMLEncode(rsMbrs.Fields("position").Value)%></td>
<td><%=server.HTMLEncode(rsMbrs.Fields("phone").Value)%></td>
<td><%=server.HTMLEncode(rsMbrs.Fields("email").Value)%></td>
</tr>
<%
' Ga naar het volgende record.
rsMbrs.MoveNext
' Einde van lus één keer herhaald voor elk record.
loop
' Sluit de recordset en verwijder het object
rsMbrs.Close
Set rsMbrs = Nothing
' Sluit de verbinding en verwijder het object
cnn1.Close
Set cnn1 = Nothing
%>
</table>
</body>
</html>

donderdag 8 augustus 2002 23:00

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

ERh.. DAt kan van alles zijn...
Zet eens je "Show Friendly HTTP errors" in je browser uit en post dan die foutmelding erbij..
Zo is het lastig zoeken...

Ik gok dat je db-rechten niet goed staat (IUSR-account heeft geen schrijfrechten op de directory en / of je hebt geen schrijfrechten volgens volgens de IIS-snapin)

Enne.. Welkom op GoT...

(ASP vragen horen trouwens ook thuis in P&W, ik verwacht alleen dat deze daar snel gesloten wordt. Een van de eisen die ze daar hebben is een duidelijke probleemomschrijving, wat heb je zelf geprobeerd en niet alleen maar een lap code posten...)

Digitaal onderwijsmateriaal, leermateriaal voor hbo

donderdag 8 augustus 2002 23:07

Acties:

Verwijderd

Topicstarter

Foutcode:

ADODB.Recordset error '800a0bb9'

Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

/members1.asp, line 15

De fout zou zich moeten bevinden in:

rsMbrs.Open sql, cnn1, adOpenForwardOnly, adLockReadOnly, adCmdText

PS.
Ben totaal een Newbie in ASP , heb net 100 pagina's achter de rug... dus weet niet wat ik allemaal kan uitproberen en wat er allemaal fout kan zijn ... sorry

donderdag 8 augustus 2002 23:19

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

Hmmm.. Dan heb je dus ook nog niet van debuggen gehoord...

Geeft niet, volgt iets meer uitleg.

Doet rsMbrs.Open sql, cnn1, 0, 1, &H0001

Wel iets?

Eventueel kan je deze gebruiken (werkt althans bij mij in een vergelijkbare situatie):
rsMbrs.Open SQL, cnn1, 3, 1

(Die adOpenetc, zijn verwijzingen naar constanten uit je AdoVBS.inc bestand, weet niet of dit de goede is en alles erin staat, dus vandaar dat we de echte waarden even gebruiken)

Digitaal onderwijsmateriaal, leermateriaal voor hbo

donderdag 8 augustus 2002 23:24

Acties:

Verwijderd

Topicstarter

Allright

Heb het probleem gevonden.....

Het probleem zat namelijk in de volgende argumenten

adOpenForwardOnly, adLockReadOnly, adCmdText

Meer info is te vinden op:

http://support.microsoft....spx?scid=kb;en-us;Q254517

vrijdag 9 augustus 2002 00:15

Acties:

Verwijderd

Okay, maar ASP hoort niet in Webdesign & Graphics, en deguggen is werk dat je eigenlijk ltijd wel zelf kunt.