01. maj 2002 - 09:23Der er
4 kommentarer og 2 løsninger
søgefunktion der fejler!
Jeg har lidt problemer med denne søgefunktion! Hvis brugeren ikke indtaster noget i "alder"-søgefeltet går den kold! Det skyldes det "and" der står i slutningen af "for løkken".
Hvordan undgår jeg, at ASP'en kører "alder SQl'en" igennem når der ikke står noget i felterne og at den i dét tilfælde fjerner det sidste "and" i "for løkken"??
Den er sgu' lidt for tricky til mig!
Håber der er nogen der kan hjælpe!?
-Mescalito
<% ' database forbindelse set conndb = Server.CreateObject("ADODB.Connection") conndb.Open "DSN=Nyt_DSN"
' normale indtastnings felter og dropdowns Felt = split("Fornavn,Efternavn,Email",",")
for i = 0 to 2 ' 2 er det antal felter der står i Felt - 1 if request(Felt(i)) <> "" then sql = sql & "[" & Felt(i) & "] like '%" & request(Felt(i)) & "%"' and " tmpFound = true end if next
sql = sql & "[Alder] BETWEEN " & request("alder") & " and " & request("alder2") & ""
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
' normale indtastnings felter og dropdowns Felt = split("Fornavn,Efternavn,Email",",")
for i = 0 to 2 ' 2 er det antal felter der står i Felt - 1 if request(Felt(i)) <> "" then sql = sql & "[" & Felt(i) & "] like '%" & request(Felt(i)) & "%' and " tmpFound = true end if next
sql = sql & "[Alder] BETWEEN " & request("alder") & " and " & request("alder2") & ""
set rs = conndb.Execute(sql) %>
Der kom lige for mange " foran det sidste "and" i løkken!
Tak skal du have! Idéen var god, men jeg ændrede lige lidt i din kode!
-Mescalito
<% ' din database forbindelse set conndb = Server.CreateObject("ADODB.Connection") conndb.Open "DSN=Nyt_DSN"
'Søgning opbygges sql = "select * from [PersonTabel] WHERE "
' normale indtastnings felter og dropdowns Felt = split("Fornavn,Efternavn,Email",",")
for i = 0 to 2 ' 2 er det antal felter der står i Felt - 1 if request(Felt(i)) <> "" then sql = sql & "[" & Felt(i) & "] like '%" & request(Felt(i)) & "%' and " tmpFound = true end if next
If request("alder") = "" Then sql = sql & "[Alder] BETWEEN 1 and 99" else sql = sql & "[Alder] BETWEEN " & request("alder") & " and " & request("alder2") & "" End if
Ej - det er bare iorden...man skal huske at belønne sig selv! ;0)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.