Jag får upp ett felmeddelande som jag inte förstår varför jag får, jag tror att det är pga SQL-satsen men jag vet inte hur man annars ska skriva. Det går inte att ha bindestreck i namn eftersom Går alldeles utmärkt att använda dem. Men det är ej rekomenderat att göra det eftersom man får dessa problem. För att SQL motorn skall tolka namnen korrekt om gedem med []:SQL problem eller...?
Jag vill bara komma åt b-datum, b-text och b-bild som ligger i tabellen download i databasen db2002.mdb så här ser koden ut som jag använder om jag skriver * i SQL satsen så funkar det men jag vill inte öppna alla:
<code>
<%
Dim colNumber
Dim Connect
Dim SQL
Dim rs
Dim x
colNumber = 2
Set Connect = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("/roos/text/wiktors_db/db2002.mdb")
SQL = "SELECT b-datum, b-text, b-bild FROM download"
rs.Open SQL, Connect
If rs.EOF then
Response.Write "Det finns inga bilder att ladda hem ännu!"
Else
%>
<table width="430" border="0" cellpadding="0" cellspacing="0">
<%Do Until rs.EOF%>
<tr>
<%For x = 1 to colNumber%>
<td align="left" valign="top" width="50%" span class="brod">
<%If rs.EOF then%>
<%Else%>
<%=rs("b-datum")%><br>
<%=rs("b-text")%><br><br>
"><br><br><br>
<%rs.MoveNext
End If%>
</td>
<%Next%>
</tr>
<%Loop%>
</table>
<%End If
rs.Close
Set rs = Nothing
Connect.Close
Set Connect = Nothing
%>
</code>
Och så här ser felmedellandet ut:
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 4.
/roos/text/supportmapp/download.asp, line 147
Vad är det för fel?
//JWSv: SQL problem eller...?
b-datum
tolkas som b minus datum. Det bästa är att byta namn på dessa kolumner, t.ex. b_datum eller bDatumSv: SQL problem eller...?
<code>
SQL = "SELECT [b-datum], [b-text], [b-bild] FROM download"
</code>