Fel i SQL statement

Hvad sker der hvis du kun laver:

<%
SQL2 = \"SELECT * FROM etiketter\"
Set rs2 = MyConn.Execute(SQL2)
%>

<%
SQL2 = \"SELECT * FROM etiketter where ID=\" & pallarray(i) & \" and bildnamn like \'A%\'\"
Set rs2 = MyConn.Execute(SQL2)
%>

og prøv lige at check om der overhovedet er nogle poster i db\'en der starter med A.

zeptic...

<%
SQL2 = \"SELECT * FROM etiketter\"
Set rs2 = MyConn.Execute(SQL2)
%>

då listar den bara första posten i databasen många gånger... det är därför jag har med arrayen... men så vill jag gärna kunna sortera i listningen...

Din SQL-sætning finder ikke noget i databasen.

if not (rs2.BOF and rs2.EOF) than
  \'udskrive data
else
  \'Søgningen fandt ikke noget.
end if

når du skriver ud, husker du så en rs2.MoveNext()?

så här ser hela sidan ut...

<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\">
    <%
Set MyConn=Server.CreateObject(\"ADODB.Connection\")
MyConn.Open \"DSN=freshetiketter;UID=;PWD=\"%>

<%SQL = \"SELECT * FROM kunder where kund=\'Fresh\'\"
Set rs = MyConn.Execute(SQL)%>
<html>
<head>
    <title>Ettikett beställning...</title>
        <link rel=\"stylesheet\" href=\"stilmall.css\" type=\"text/css\">
</head>
<body bgcolor=\"White\">
<%pallista=trim(rs(\"pallista\"))%>
<% pallarray=split(pallista,\" \")%>
<%maxcounter=ubound(pallarray)%>
<table width=\"500\" border=\"0\" cellspacing=\"5\">
<tr>
<td bgcolor=\"#C0C0C0\"><span class=\"tdtextul\">Etikett</span></td>
<td bgcolor=\"#C0C0C0\"><span class=\"tdtextul\">Preview</span></td>
<td bgcolor=\"#C0C0C0\"><span class=\"tdtextul\">Antal</span></td>
<td bgcolor=\"#C0C0C0\"><span class=\"tdtextul\">Färg</span></td>
</tr>

<%Do while Not rs.EOF %>
<tr>
<% i = 0 %>
<% for i = 0 to maxcounter %>


<%SQL2 = \"SELECT * FROM etiketter where ID=\" & pallarray(i) & \" and bildnamn like \'A%\' \"
Set rs2 = MyConn.Execute(SQL2)%>
<tr>
<td bgcolor=\"#E6E6E6\"><span class=\"tdtext\"><%=rs2(\"bildnamn\")%></span></td>
<td bgcolor=\"#E6E6E6\"><span class=\"tdtext\"><img src=\"http://192.168.62.201/webnative/getimage?-small+/disk1_2/Jobb/Demo2/fresh/<%=rs2(\"ettikett\")%>.eps\"></span></td>
<form action=\"confirmation.asp\" method=\"post\">

<input name=\"bildnamn<%=i%>\" type=\"hidden\" value=\"<%=rs2(\"bildnamn\")%>\">
<td><input type=\"Text\" size=\"10\" name=\"antal<%=i%>\"></td>
<td><input type=\"hidden\" name=\"farg<%=i%>\" value=\"<%=rs2(\"farg\")%>\"><span class=\"tdtext\"><%=rs2(\"farg\")%></span></td>
</tr>
<% next %>
<tr><td><img src=\"1pixel.gif\" width=\"15\" height=\"10\" border=\"0\" alt=\"\"></td></tr>
<tr><td colspan=\"5\"><br><span class=\"tdtext\">Meddelande:<br></span><br><TEXTAREA NAME=\"meddelande\" ROWS=\"6\" COLS=\"40\"></TEXTAREA><br><br><input name=\"max\" type=\"hidden\" value=\"<%=maxcounter%>\"><input type=\"submit\" value=\"Skicka beställning...\"></td></tr>
</form>
</tr>
<% rs.MoveNext
loop%>
</table>
</body>
</html>

<%
SQL2 = \"SELECT * FROM etiketter where bildnamn like \'A%\'\"
SQL2 = SQL2 & \" ORDER BY bildnamn\"
Set rs2 = MyConn.Execute(SQL2)

if not (rs2.BOF and rs2.EOF) than
   while NOT(rs2.EOF)
      Response.Write(rs2(\"bildnamn\"))
      Response.Write(\"<br>\")
      rs2.MoveNext()
  wend
else
  Response.Write(\"Søgningen fandt ikke noget.\")
end if

%>

Er du sikker på at alle ID\'er findes?

zeptic...

näääh det funkar ändå inte...

så prøvat skifte

Set rs2 = MyConn.Execute(SQL2)

ud med:

Set rs2 = Server.CreateObject(\"ADODB.Recordset\")
rs2.open SQL2, MyConn

prøv med

<%SQL2 = \"SELECT * FROM etiketter where ID=\'\" & pallarray(i) & \"\' and bildnamn like \'A%\'

doomstone...

Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)
[Microsoft][Drivrutin för ODBC Microsoft Access] Typblandningsfel i villkorsuttryck.
/fresh/index.asp, line 33

ID er et reserveret ord i de fleste databaser. Prøv derfor at sætte [] rundt om ID, så det bliver til [ID]

Prøv lige at udskrive din SQL2 :

<%
SQL2 = \"SELECT * FROM etiketter where ID=\" & pallarray(i) & \" and bildnamn like \'A%\' \"
response.write SQL2
Set rs2 = MyConn.Execute(SQL2)%>

og jeg ville lave denne for sætning
<% for i = 0 to maxcounter %>

om til:
<% for i = LBound(pallarray) to UBound(pallarray)%>

ok det verkar vara svårt att få in ännu ett uttryck i sql statementet... någon som har en ide om hur man skall sortera databasen... jag vill kunna visa bilder som börjar på A, T, J, D och Integra... exempelvis så heter en bild \"A 100 HTP\" och så finns det lite olika varianter... jag vill lista alla som börjar på \"A \"...

SQL2 = \"SELECT * FROM etiketter where bildnamn like \'A%\'\"

eagleeye...

ID=\" & pallarray(i) & \" måste vara med annars listas inte alla bilderna i data basen utan bar den första men den listas så många gånger som det finns poster i databasen...

er ID et tal eller en streng i databasen`?

ID är det som access alltid vill lägga till... ett fält som automatiskt räknar...

ID er autonumber ??

ja det stämmer... det kallas väl för \"primary key\"...

OK, så hvis ID er autonummer, så ligger der en begrænsning i SQL\'en  ID=\" & pallarray(i) & \"  Den begrænser til 1 record som kan bliver valgt. og AND med: like \'A%\'\" Hvis denne ene ikke lige starter med a findes ingen records. Eks:

ID  bildnamn
1  Bild1
2  A-bild

Hvis ID = 1 så får ingen record da bildnamn starte med B i rækker 1.

hur ska man då göra för att sortera recordsetet...

Du kan lave en ORDER BY:

SQL2 = \"SELECT * FROM etiketter where bildnamn like \'A%\' ORDER BY bildnamn\"

denna måste ju finnas med...
ID=\" & pallarray(i) & \" 

annars listas bara första posten i databasen lika många gånger som dwet finns poster i databasen...

Du kan skrive et hvilken som helt kolonne efter ORDER BY medkomma mellem. Du kan også angive ASC (default) stigne, DESC for faldene.

SQL2 = \"SELECT * FROM etiketter where ID=\" & pallarray(i) & \" and bildnamn like \'A%\' ORDER BY bildnamn\"

jaja... här kommer vi nog inte längre