Tomasz Otap wrote in dk.edb.internet.webdesign.serverside.asp:
> mik Thomsen wrote:
> > Jeg kan heller ikke i nu forstå din løkke med WEND. Skal man ikke lukke
> > forbindelsen bagefter eller skal den bare slutte sådan som du har skrevet.
> > Hvis jeg har dette indsat, siger den at siden ikke vil vises.
>
> Du skal naturligvis lukke og slukke for databaseforbindelsen bagefter;
> dette var blot eksemplet på, hvordan WHILE-WEND løkken skal se ud. Koden
> slutter derefter med noget a'la:
>
> --------
> ' Luk recordset
> rs.close
> set rs = nothing
> ' Luk databaseforbindelse
> Conn.Close
> Set Conn = Nothing
> ---------
Er min Løkke rigtig nok, og ovenstående bare indsættes efter løkken ??
> > Jeg får følgende fejl, når jeg vælger "alle" fra listen:
> > [Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in
> > query expression 'haand = 'H'and model = 'dame' and maerke =IS NOT NULL'.
>
> Se Jørns svar tidligere - som han også skriver, er det altid en god idé
> at udskrive din SQL-sætning inden du kører den. Så kan du hurtigt checke
> den for evt. mellemrumsfejl og forkerte operatorer.
Min SQL og koder ser sådan nu
<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=C:\Data\Web\golfudstyret.dk\users\mwt\database\udstyr.mdb"
Conn.Open DSN
if request.form("DMAERKE") = "alle" then
strMaerke = "IS NOT NULL"
else
strMaerke = "'" & request.form("DMAERKE") & "'"
end if
' SQL forespørgsel
strSQL = "Select * from udstyr Where haand = '"& Request.Form("haand") &"'and
model = '"& Request.Form("model") &"' and maerke =" & strMaerke
' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL) <-------------- linie 181
' Gennemløb Recordset (rs) med en løkke
Do
' Udskriv værdien af kolonnen Udstyr efter kristere "model" og "Haand"
Response.Write "" &"<h2>" &"<font color='#FF000000'>" & rs("kategori")
&"</font>" &"</h2>"
Response.Write "<b>Mærke: </b>" & rs("maerke") & " " & "<b>Pris :
</b>" & rs("pris") & " " & "kr." & " " & "<b>Hånd: </b>" & " " &
rs("haand") & " " & "<b>Forhandler:</b>" & " " & rs("Forhandler") &
" " &"<b>Link: </b>" & rs("link") & " " & "<b>Model:
</b>" & rs("model") & "<hr>"
' Gå til næste Record i rs
rs.MoveNext
' Fortsæt indtil rs er gennemløbet (EOF = End Of File)
Loop While Not rs.EOF
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
fejl Kode :
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in
query expression 'haand = 'H'and model = 'herre' and maerke =IS NOT NULL'.
/driverresultat1.asp, line 181
Hvad er der galt ??
Jeg er et felt, som jeg også skal have med i kriterieterne. Et felt hvor man kan
indtaste en max pris. og hvor man så skal have resultater på alle dem, hvor
prisen er lig med eller mindre end det indtastet. Det kan godt være at felt ikke
bliver udfyldt af brugeren.
Kan I hjælpe mig med det.
For hånd 1000 tak
MIK
skriv eventuelt direkte pr.mail mwt@image.dk
--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials