Update e Delete non vanno

[DarioMarco]

Ok, riposto il codice e il tipo di errore, vi chiedo scusa.

<% 
submit = Request.Querystring("submit")

if submit then
id = Request.Querystring("id")
codice = Request.form("codice")
nome = Request.form("nome")
descrizione = Request.form("descrizione")
prezzo = Request.form("prezzo")

set conn = Server.createObject("ADODB.Connection")
conn.Open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = d:/database/vetrina.mdb")
set recset = Server.CreateObject("ADODB.Recordset")
set recset = conn.execute("UPDATE vetrina1 SET (codice ='" & codice & "', nome='" & nome & "', descrizione='"& descrizione & "', prezzo='" & prezzo &"') WHERE ID=" & id )
response.Write(recset)
conn.close
set conn = nothing

else

id = Request.QueryString("id")

set conn = Server.CreateObject("ADODB.Connection")
conn.open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = d:/database/vetrina.mdb")

set recset = Server.Createobject("ADODB.Recordset")
set recset = conn.execute("Select * from vetrina1 where id=" & id)

codice = recset("codice")
nome = recset("nome")
descrizione = recset("descrizione")
prezzo = recset("prezzo")
%>
<div align="center"><font size="5">Modificare il prodotto relativo al campo</font></div>
<div align="center"></div>
<form name="form1" action="modifica.asp?submit=true&id=<%= id %>" method="post" onSubmit="convalida(this)">
  <table width="476" border="0" align="center">
    <tr> 
    <td width="112"></td>
    <td width="354"></td>
  </tr>
  <tr> 
      <td align="right">Codice Prodotto</td>
    <td> <input name="codice" type="text" id="codice" value="<%= codice %>"> </td>
  
  <tr> 
      <td align="right">Nome Prodotto</td>
    <td> <input name="nome" type="text" id="nome" value="<%= nome %>"> </td>
  </tr>
  <tr> 
      <td align="right">Descrizione</td>
    <td> <textarea name="descrizione" cols="40" rows="4" id="descrizione"><%= descrizione %></textarea> </td>
  </tr>
  <tr>
      <td align="right">Prezzo</td>
    <td> <input name="prezzo" type="text" id="prezzo" value="<%= prezzo %>"> </td>
  </tr>
</table>
  <table width="262" border="0" align="center">
    <tr>
      <td width="95" align="right">
<input type="submit" name="Submit" value="Invia">
      </td>
      <td width="157"><input type="reset" name="Submit2" value="Reimposta"></td>
    </tr>
  </table>
</form>


 
  <% end if %>

Tipo di errore:
Microsoft JET Database Engine (0x80040E14)
Errore di sintassi nell'istruzione UPDATE.
/sample/modifica.asp, line 59

[99eros9]

sicuro che codice sia stringa e non numerico?

[maximum]

conn.execute("UPDATE vetrina1 SET codice ='" & codice & "', nome='" & nome & "', descrizione='"& descrizione & "', prezzo='" & prezzo &"' WHERE ID=" & id )

[DarioMarco]

ho provato e non va

MA P**CA P****NA!!!

[DarioMarco]

Scusa eros, codice nella mia tabella, è di tipo numerico.
Che differenza fà?????

Grazie, ciao.

[99eros9]

se numerico non ci vanno gli apici nella query

[DarioMarco]

allora, scusami un'attimo, se io ho ben capito:
nel mio database codice è di tipo numerico e prezzo è di tipo valuta, quindi dovrei fare in questo modo:

conn.execute("UPDATE vetrina1 SET codice =" & codice & ", nome='" & nome & "', descrizione='"& descrizione & "', prezzo=" & prezzo &" WHERE ID=" & id )

e dovrebbe funzionare, quando tutto va male metto gli apici a prezzo. Solo che io ho provato a fare:

conn.execute("UPDATE vetrina1 SET nome='" & nome & "',WHERE ID=" & id )

e non mi ha funzionato nemmeno, credo che se non mi funziona in questo modo dovrebbe esserci qualche problema nel codice.

Grazie, ciao.

[Sypher]

via quella virgola!

conn.execute("UPDATE vetrina1 SET nome='" & nome & "' WHERE ID=" & id )

[DarioMarco]

Ok, risolto, a dirti il vero oggi ho acceso il pc e ho notato che le virgole non c'erano, allora ho preso e ce le ho messe ed ha funzionato, adesso due sono le cose:
1) il mio pc è jellato
2) ho ho fatto qualche errore, e quando faccio gli errori vorrei capire dove sbaglio, vi posto tutto il codice corretto, e se qualcuno vuole indicarmi dove ho sbagliato glie ne sarò grato,

grazie.

<%
submit = Request.Querystring("submit")

if submit then
id = Request.Querystring("id")
codice = Request.form("codice")
nome = Request.form("nome")
descrizione = Request.form("descrizione")
prezzo = Request.form("prezzo")

set conn = Server.createObject("ADODB.Connection")
conn.Open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = d:/database/vetrina.mdb")
set recset = Server.CreateObject("ADODB.Recordset")
set recset = conn.execute("update vetrina1 set codice ='"&codice&"', nome='"&nome&"', descrizione='"&descrizione&"', prezzo='"&prezzo&"' WHERE ID=" & id )
'forse erano gli spazi tra & e ... ??
response.Write(recset)
conn.close
set conn = nothing

else

id = Request.QueryString("id")

set conn = Server.CreateObject("ADODB.Connection")
conn.open("Provider = Microsoft.Jet.OLEDB.4.0; Data Source = d:/database/vetrina.mdb")

set recset = Server.Createobject("ADODB.Recordset")
set recset = conn.execute("Select * from vetrina1 where id=" & id)

codice = recset("codice")
nome = recset("nome")
descrizione = recset("descrizione")
prezzo = recset("prezzo")
%>
<div align="center"><font size="5">Modificare il prodotto relativo al campo</font></div>
<div align="center"></div>
<form name="form1" action="modifica.asp?submit=true&id=<%= id %>" method="post" onSubmit="convalida(this)">
<table width="476" border="0" align="center">
<tr>
<td width="112"> </td>
<td width="354"> </td>
</tr>
<tr>
<td align="right">Codice Prodotto</td>
<td> <input name="codice" type="text" id="codice" value="<%= codice %>"> </td>

<tr>
<td align="right">Nome Prodotto</td>
<td> <input name="nome" type="text" id="nome" value="<%= nome %>"> </td>
</tr>
<tr>
<td align="right">Descrizione</td>
<td> <textarea name="descrizione" cols="40" rows="4" id="descrizione"><%= descrizione %></textarea> </td>
</tr>
<tr>
<td align="right">Prezzo</td>
<td> <input name="prezzo" type="text" id="prezzo" value="<%= prezzo %>"> </td>
</tr>
</table>
<table width="262" border="0" align="center">
<tr>
<td width="95" align="right">
<input type="submit" name="Submit" value="Invia">
</td>
<td width="157"><input type="reset" name="Submit2" value="Reimposta"></td>
</tr>
</table>
</form>



<% end if %>

[99eros9]

ma adesso é´corretto il codice