Hei! Jeg skriver på norsk, jeg, og håper at alle skjønner det meste
iallefall...
Jeg har hatt problemer
med å få listet opp KOMMENDE konserter på en konsertside for bandet
Delaware. Har en database (access2000) der samtlige konserter bandet har
spilt ligger inne. Ønsker å plassere de kommende konsertene (altså med
datoer ETTER OG INKLUDERT dagens dato) i en seksjon og de allerede spilte
(FØR DAGENS DATO) i en annen seksjon på websiden.
Har fått til å liste
alle konserter i databasen opp i en tabell på websiden. Nå prøver jeg
meg altså med å lage et script som kun lister opp nye konserter. Det
følgende scriptet er så langt min "kunnskap" om asp bragte meg, og det var
tydeligvis ikke godt nok i det hele tatt. Fikk feilmelding
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.
/webmaster/shownewconcerts.asp, line 27
Kan noen se på dette og kommentere hva som går galt:
<HTML>
<HEAD>
<TITLE>Concerts by DELAWARE</TITLE>
</HEAD>
<body bgcolor="#FFFFFF">
<p><br>
</p>
<h2 align="center"><font face="Verdana, Arial, Helvetica, sans-serif">
<%
set conn=server.createobject("adodb.connection")
' DSNless connection to Access Database
DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtemp=dsntemp & "DBQ=" & server.mappath("allconcerts.mdb")
conn.Open DSNtemp
' DSNless connection to Access Database
date1 = Now()
set rs=conn.execute("select * from concerts where date > date1 ORDER BY date
ASC")
%>
Upcoming concerts by Delaware:</font></h2>
<table border=0 width="565" cellpadding="5" cellspacing="5" align="center">
<%
'Print records until rs = End of File
Do While Not rs.EOF
%>
<tr>
<td bgcolor="#CCCC99"><b><font face="Verdana, Arial, Helvetica,
sans-serif" size="-1"><%=rs("date")%></font></b></td>
<td bgcolor="#CCCC99"><b><font face="Verdana, Arial, Helvetica,
sans-serif" size="-1"><%=rs("city")%></font></b></td>
<td bgcolor="#FFCC66"><font face="Verdana, Arial, Helvetica, sans-serif"
size="-1"><%=rs("location")%></font></td>
<td bgcolor="#FFCC66"><font face="Verdana, Arial, Helvetica, sans-serif"
size="-1"><%=rs("info")%></font></td>
</tr>
<%
'Move rs to next line and loop do while statement
rs.MoveNext
Loop
%>
</table>
</BODY>
</HTML>
<%
'Closes variables
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
</body>
</html>
Og jeg vil være evig takknemlig...!
Hilsen Knut Børre Lindbjør fra Norge.