Frågan#1
Hejsan...
Jag blir snart knäpp har hållt på att får rätt på denna koden ett tag nu men ser j***r inte vad som är fel :( har säkert missat något tecken men ja kan inte se var, så nu vänder ja mig till er
<%
file = Server.MapPath("forum.mdb")
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& file
Set RecSet = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM forum where reid = '0' ORDER BY ID DESC"
RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic
Do until RecSet.EOF
color = color + 1
If color Mod 2 = 0 then
colorbg = "#FFFFFF"
Else
colorbg = "#C0C0C0"
End If
%>
<table width="31%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="<%=colorbg%>"><%=RecSet("namn")%></td>
<td bgcolor="<%=colorbg%>"><%=RecSet("datum")%></td>
<td bgcolor="<%=colorbg%>"><%=RecSet("svar")%></td>
<td bgcolor="<%=colorbg%>"><%=RecSet("count")%></td>
</tr>
<%
RecSet.movenext
Loop
Recset.close
Set RecSet = nothing
%>
Ja får följande fel meddelande
Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E10)
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.
/figg3/forum.asp, line 19
Rad 19 är
RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic
Mvh FIgg3
------------------
Dont drink and drive!!! smoke shit and fly!!!