Fel i min aspkod?

tri · 2005-05-02, 14:11

Försöker att få till en sida som kan länka till en bild på min server. Jag får det här felmeddelandet på min kod
"Microsoft VBScript compilation error '800a03fa'

Expected 'Wend'"

Min kod ser ut som följer "

</head>

<%

set db = Server.CreateObject("ADODB.Connection")
connect="Driver={Microsoft Access Driver (*.mdb)}; DBQ="& server.mappath("cyklar2.mdb")
db.Open connect
sql = "markeID"
set rs = db.Execute(sql)
while not rs.eof
%>

<%
Dim BNAMN
BNAMN="bild"
%>

<body>
<h2>
<%=rs("modell")%></h2>
<tr>
<td>Modell
<td><%=rs("bild")%></td>
<td><img src=("bild")</td>
</body>"

Vart är felet och är koden rätt för att få fram "bilden"?

Lindahl · 2005-05-02, 15:05

Felet är precis det som meddelandet säger, du har glömt ett "wend". Du har alltså en while-loop som du inte har avslutat.

Robert · 2005-05-03, 09:38

det verkar saknas ett stycke kod längre ned. Du bör ju även, innan "wend" stega till nästa record i ditt rs (som exempel då)...

StefanBergfeldt · 2005-05-04, 09:22

Citat:

<body>
<h2>
<%=rs("modell")%></h2>
<tr>
<td>Modell
<td><%=rs("bild")%></td>
<td><img src=("bild")</td>
</body>"

Du har rader och kolumner i en tabell som inte finns. Detta fungerar säkert bra i IE, men är inte hur man bör göra tabeller. Börja med en <table> och sluta med en </table>
Du skriver ut rs("bild") i en cell. Detta har du gjort på exakt rätt sätt. Har du lagrat sökvägen i databasen är det denna som skrivs ut, har du lagrat bilden, då kommer det att bli knas.
Nästa cell försöker du visa en bild [img]<%=rs([/img]" />

Efter detta borde också ett Wend komma, precis som felmeddelandet säger. Du bör också stänga anslutningen till databasen (efter wend)

Aktiva användare som för närvarande tittar på det här ämnet: 1 (0 medlemmar och 1 gäster)

Menu

Fel i min aspkod?