Stig Johansen wrote in dk.edb.internet.webdesign.serverside.asp:
> Inline og svar.
>
> j p wrote:
>
> > Stig Johansen wrote in dk.edb.internet.webdesign.serverside.asp:
> >> Her forudsætter jeg, at denne funktion er inkluderet (så er du også
> >> sikret mod SQL injection;):
> >> <
http://w-o-p-r.dk/tips/asp/sql.inc.asp.txt>
>
> Den skal du bare downloade og gemme som eks. include_files/sql.inc.asp, og
> så include den i din ASP.
>
> >> addSQL "sex",Request.form("sex")
> >> addSQL "alder",Request.form("alder")
> >> addSQL "amt",Request.form("amt")
> >> addSQL "uddannelse",Request.form("uddannelse")
>
> Disse linie kalder subrutinen, som generer SQL fra WHERE og resten (hvis
der
> er noget)
> Prøv evt at lægge en response.write SQL efter hvert kald.
>
>
> >> SQL = "SELECT <noget> from <table>" + SQL
>
> Da vi kun har bygget WHERE delen, skal vi have SELECT delene med - hov,
> huske lige en ekstra blank.
>
> SQL = "SELECT <noget> from <table> " + SQL
>
> Hvis du udskrive SQL'en skulle der gerne være noget "WHERE <noget> = ?
> AND.."
>
> >> rs = Query(Conn,SQL,Parameters,Paramcount)
> Her kaldes funktionen, skal dog være:
> set rs = Query(Conn,SQL,Parameters,Paramcount)
>
> >> While not rs.eof do
> Det sædvanlige, bortset fra jeg tænkte pascal da jeg skrev det
>
> Og her defineres subrutinen
> >> Sub addSQL (Navn,value)
> >> if value = 'Alle' then exit sub
> Her går jeg ud fra, at der står 'Alle' i din select, og hvis der gør det,
> skal den ikke indgå i WHERE delen.
>
> >> if left(SQL,5) = "WHERE" then
> >> SQL = SQL + " AND "
> >> else
> >> SQL = "WHERE "
> >> end if
>
> Her tjekkers om der er en WHERE i forvejen.
> Hvis der er det, skal vi fortsætte med AND, ellers starter vi med WHERE
>
> >> SQL = SQL + Navn + "=? "
> >> Parameters(Paramcount) = value
> Her sættes værdien ind i den tilhørende parameter (svarende til ?-tegnene)
> >> Paramcount = Paramcount + 1
> >> End Sub
> > Det ser smart ud....men også indviklet...kunne du evt. sætte kommentare
på
> > så kan jeg måske se logikken bedre, tak.
>
> Det burde være lige til at klippe klistre over, bortset fra jeg ikke kender
> dine felt og form navne.
>
> Og så tager jeg forbehold for syntaxfejl ;)
>
> Men prøv at lave nogle response.write undervejs, så kan du bedre se hvad
der
> foregår.
>
> --
> Med venlig hilsen
> Stig Johansen
Jeg takker mange gange, nu gik den ind på lystavlen :)
mvh
Johnny
PS. kender du noget script som kan vise whoisonline med asp og mysql ?
--
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