replace multiplo

[nextart]

ciao a tutti io us questo codice per inserire in un db i dati provenienti da un form:

<%
For Each Item In Request.Form  
   strTemp = Item & "= Request.Form(""" & Item & """)"
  Execute(strTemp)
 
Next

SQL="UPDATE formazioni set g1='"&g1&"' ,g2='"&g2&"' ,g3='"&g3&"' ,g4='"&g4&"',g5='"&g5&"',g6='"&g6&"',g7='"&g7&"',g8='"&g8&"',g9='"&g9&"',g10='"&g10&"',g11='"&g11&"',g12='"&g12&"',g13='"&g13&"',g14='"&g14&"',g15='"&g15&"',g16='"&g16&"',g17='"&g17&"',g18='"&g18&"',g19='"&g19&"',g20='"&g20&"',g21='"&g21&"',orario='"&orario&"',giorno_ins='"&giorno_ins&"' WHERE nome='"&nome&"'"
Conn.Execute(SQL)
Response.write("esito=OK")
%>

funziona alla grande,, ma se in un campo e' presente il carattere apice (') ovviamnete mi da errore, se i campi sono pochi usavo:

variabile = Request.Form("campo1")
variabile=replace(variabile,"'","''")

sostiutendo eventuiali ' con i doppi apici.. siccome ora i campi sono un po' di piu' volevo integrare il replace nel ciclo FOR, avevo pensato a questo codice da inserire ma non funziona:

Item=replace(Request.Form(""" & Item & """),"'","''")

perche'?

grazie....

[Killer99]

non lo sò
però sta cosa è stupida:

variabile = Request.Form("campo1")
variabile=replace(variabile,"'","''")

inquanto basta fare: variabile = replace(request.form("campo1"),"'","''")

[nextart]

ok, e' stupida, ma se scrivo cosi' il ciclo for non funziona!!! LA SINTASSI E' CORRETTA?

<%
For Each Item In Request.Form 
 Item=replace(Request.Form(""" & Item & """),"'","''")
   strTemp = Item & "= Request.Form(""" & Item & """)"
  Execute(strTemp)
 
Next

SQL="UPDATE formazioni set g1='"&g1&"' ,g2='"&g2&"' ,g3='"&g3&"' ,g4='"&g4&"',g5='"&g5&"',g6='"&g6&"',g7='"&g7&"',g8='"&g8&"',g9='"&g9&"',g10='"&g10&"',g11='"&g11&"',g12='"&g12&"',g13='"&g13&"',g14='"&g14&"',g15='"&g15&"',g16='"&g16&"',g17='"&g17&"',g18='"&g18&"',g19='"&g19&"',g20='"&g20&"',g21='"&g21&"',orario='"&orario&"',giorno_ins='"&giorno_ins&"' WHERE nome='"&nome&"'"
Conn.Execute(SQL)
Response.write("esito=OK")
%>

GRAZIE

[santino83]

apparte che la sintassi è tutta sbagliata...come si chiamao i campi del form? vabbeh, diciamo che sono chiamati da g1 a g21

for i=1 to 21
execute "g" & i & "=replace(""request.Form(""g" & i & """),""'"",""''"")" & vbcrlf 'magari & vbcrlf toglilo, non so se serve

next

for i=1 to 21
execute "response.write(g" & i & " & ""
"")"
next

[nextart]

ciao grazie del suggerimento, ho risolto cosi':

For Each Item In Request.Form
  strTemp = Item & "= replace(Request.Form(""" & Item & """),""'"",""''"")"

  Execute(strTemp)
Next

SQL="UPDATE formazioni set g1='"&g1&"' ,g2='"&g2&"' ,g3='"&g3&"' ,g4='"&g4&"',g5='"&g5&"',g6='"&g6&"',g7='"&g7&"',g8='"&g8&"',g9='"&g9&"',g10='"&g10&"',g11='"&g11&"',g12='"&g12&"',g13='"&g13&"',g14='"&g14&"',g15='"&g15&"',g16='"&g16&"',g17='"&g17&"',g18='"&g18&"',g19='"&g19&"',g20='"&g20&"',g21='"&g21&"',orario='"&orario&"',giorno_ins='"&giorno_ins&"' WHERE nome='"&nome&"'"
Conn.Execute(SQL)
Response.write("esito=OK")