hjälp med "for each item in request.form"

3 svar · 222 visningar · startad av Nson 24 apr. 2002

NsonMedlem sedan juni 2001145 inlägg

Frågan24 apr. 2002 18:10#1

Skulle behöva skriva en sak som plockar in värden från en request.form och gör variabler typ som:
dator = request.form("dator")
fast att den går genom hela request.form och kör en for each item på den.

har testat följande kod:

public sub VarsFromForm
for each item in request.form
execute(item & "=""" & Replace(request.form(item), Chr(34), Chr(34) & Chr(34)) & """")
next
for each item in request.QueryString
execute(item & "=""" & Replace(request.QueryString(item), Chr(34), Chr(34) & Chr(34)) & """")
next
end sub

Men då får jag följande spännande fel meddelande:

Error Type:
Microsoft VBScript compilation (0x800A0409)
Unterminated string constant

Tacksam för hjälp!

LarsGMedlem sedan dec. 200012 464 inlägg

24 apr. 2002 18:19#2

Jag förstår inte hur du har tänkt att det skulle fungera. Hur tänker du använda dessa variabler? Varför räcker det inte med att vrdena finns iformuläret?

NsonMedlem sedan juni 2001145 inlägg

24 apr. 2002 18:26#3

Jag vill så småning om mata in datan i en databas...
Därav vill jag ha in det i strängar.

LarsGMedlem sedan dec. 200012 464 inlägg

24 apr. 2002 18:38#4

Det ligger som strängar i formuläret. Det är bara att konkatenera ihop dina sql-satser

query = "insert into ogrish values('" & _
replace(request.form("dator"),"'","''") & "')"
connect.execute query,,128

Att försöka skapa variabler är bara en onödig komplikation.