Eseguire UPDATE multipli

[iadream]

Salve amici,

sto provando a fare un UPDATE multiplo ma senza successo...

pensavo che bastasse scrivere:

strConn = MM_connGest_STRING
set conn = Server.CreateObject("ADODB.COnnection")
conn.Open strConn
SQL = "UPDATE cardiopatie SET terapia = '"&FixQuotes(Request.Form("CARDIO_T"))&"', annotazioni = '"&FixQuotes(Request.Form("CARDIO_N"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"';"
SQL = SQL & "UPDATE diabete SET terapia = '"&FixQuotes(Request.Form("DIABETE_T"))&"', annotazioni = '"&FixQuotes(Request.Form("DIABETE_N"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"';"
SQL = SQL & "UPDATE ipertensione SET terapia = '"&FixQuotes(Request.Form("IPER_T"))&"', annotazioni = '"&FixQuotes(Request.Form("IPER_N"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"';"
SQL = SQL & "UPDATE dislipidemie SET terapia = '"&FixQuotes(Request.Form("DISLI_T"))&"', annotazioni = '"&FixQuotes(Request.Form("DISLI_N"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"';"
SQL = SQL & "UPDATE altremalattie SET terapia = '"&FixQuotes(Request.Form("MALA_T"))&"', annotazioni = '"&FixQuotes(Request.Form("MALA_N"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"';"
SQL = SQL & "UPDATE altridati SET AltreTerapie = '"&FixQuotes(Request.Form("TERAPIE"))&"', Intolleranze = '"&FixQuotes(Request.Form("INTOLLERANZE"))&"', Interventi = '"&FixQuotes(Request.Form("INTERVENTI"))&"', Familiarita = '"&FixQuotes(Request.Form("FAMILIARITA"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"'"
conn.Execute (SQL)
conn.Close
set conn = nothing

ma invece mi restituisce errore...

non è proprio possibile fare una cosa del genere oppure scrivo male io?

[Mems]

Originariamente inviato da iadream
Salve amici,

sto provando a fare un UPDATE multiplo ma senza successo...

pensavo che bastasse scrivere:

strConn = MM_connGest_STRING
set conn = Server.CreateObject("ADODB.COnnection")
conn.Open strConn
SQL = "UPDATE cardiopatie SET terapia = '"&FixQuotes(Request.Form("CARDIO_T"))&"', annotazioni = '"&FixQuotes(Request.Form("CARDIO_N"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"';"
SQL = SQL & "UPDATE diabete SET terapia = '"&FixQuotes(Request.Form("DIABETE_T"))&"', annotazioni = '"&FixQuotes(Request.Form("DIABETE_N"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"';"
SQL = SQL & "UPDATE ipertensione SET terapia = '"&FixQuotes(Request.Form("IPER_T"))&"', annotazioni = '"&FixQuotes(Request.Form("IPER_N"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"';"
SQL = SQL & "UPDATE dislipidemie SET terapia = '"&FixQuotes(Request.Form("DISLI_T"))&"', annotazioni = '"&FixQuotes(Request.Form("DISLI_N"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"';"
SQL = SQL & "UPDATE altremalattie SET terapia = '"&FixQuotes(Request.Form("MALA_T"))&"', annotazioni = '"&FixQuotes(Request.Form("MALA_N"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"';"
SQL = SQL & "UPDATE altridati SET AltreTerapie = '"&FixQuotes(Request.Form("TERAPIE"))&"', Intolleranze = '"&FixQuotes(Request.Form("INTOLLERANZE"))&"', Interventi = '"&FixQuotes(Request.Form("INTERVENTI"))&"', Familiarita = '"&FixQuotes(Request.Form("FAMILIARITA"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"'"
conn.Execute (SQL)
conn.Close
set conn = nothing

ma invece mi restituisce errore...

non è proprio possibile fare una cosa del genere oppure scrivo male io?

L'errore che dice?

[optime]

access o sql?

[Mems]

Originariamente inviato da optime
access o sql?

access o abbidè?

[iadream]

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[MySQL][ODBC 3.51 Driver][mysqld-5.0.22-community-nt]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near ';UPDATE diabete SET terapia = 'gsg', annotazioni = 'dsgdsgsdg' WHERE ID = '1221'' at line 1

/anamnesi_generale.asp, line 19

con la riga 19 conn.Execute (SQL)

[Mems]

Originariamente inviato da iadream

Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[MySQL][ODBC 3.51 Driver][mysqld-5.0.22-community-nt]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near ';UPDATE diabete SET terapia = 'gsg', annotazioni = 'dsgdsgsdg' WHERE ID = '1221'' at line 1

/anamnesi_generale.asp, line 19

con la riga 19 conn.Execute (SQL)

ID è di tipo numerico?
Se si, allora il valore va senza apici singoli.

[optime]

Originariamente inviato da Mems
access o abbidè?

dome', lassa perde

[Mems]

Originariamente inviato da optime
dome', lassa perde

[iadream]

non penso sia problema di apici, perchè se scrivo solo una query tipo:

SQL = "UPDATE diabete SET terapia = '"&FixQuotes(Request.Form("DIABETE_T"))&"', annotazioni = '"&FixQuotes(Request.Form("DIABETE_N"))&"' WHERE ID = '"&Request.QueryString("IDVISITA")&"'"

allora funziona bene!

Cmq il database è MySQL

[optime]

ok.

allora fa'

SQL=...
execute
SQL=...
execute

cosa ti costa?