aiuto per request.form con For

[asch]

Ciao, vorrei evitare:

str_colore1 = request.form("colore1")
str_colore2 = request.form("colore2")
str_colore3 = request.form("colore3")

ed utilizzare:

for i = 1 to 3
[str_colore & (i)] = request.form("colore" & (i) & "")
response.Write [str_colore & (i)]  & "
"     'stampa
next
response.Write str_colore1 & "
"  'non stampa
response.Write str_colore2 & "
"   'non stampa
response.Write str_colore3 & "
"   'non stampa

Ho bisogno però dei valori colore1, colore2, colore3 per poi caricarli nel DB.

strSQL = "INSERT INTO catalogo (colore1,colore2,colore3 )" & _ 
	" VALUES ('" & str_colore1  & "','" & str_colore2 & "','" & str_colore3 & "');"

Come posso fare ?

[Mems]

suffisso = "colore"

for each item in request.form
  if left(item,len(suffisso)) = suffisso then
    campi = campi & item & ","
    valori = valori & "'" & replace(request.form(item),"'","''") & "',"
  end if
next

if len(campi) > 0 then campi = left(campi,len(campi)-1)
if len(valori) > 0 then valori = left(valori,len(valori)-1)

sql = "INSERT INTO tabella (" & campi & ") VALUES(" & valori & ")"

[Roby_72]

Usa un array senza tentare di costruire variabili dinamiche.

str_colore(i)

Roby

[asch]

Grazie Mems, funziona !

[asch]

Scusami, ho difficolta per l' UPDATE, come si fa?

SQL = "UPDATE tabella SET colore='" & str_colore & "' where ID = " & ID & ";"

[Mems]

SQL = "UPDATE tabella SET colore='" & str_colore & "' where [ID] = " & ID & ";"

[asch]

intendevo sempre in riferimento al metodo usato per l'INSERT :

sql = "INSERT INTO tabella (" & campi & ") VALUES(" & valori & ")"

sql  = "UPDATE tabella SET colore='" & str_colore & "' where ID = " & ID & ";"

[Mems]

Il campo ID come lo passi?

[asch]

intendi questo:

ID = CInt(request.querystring("ID"))

[Mems]

Originariamente inviato da asch
intendi questo:

ID = CInt(request.querystring("ID"))

Capito.
Quindi tu con un click aggiorni N campi di un solo record, giusto?