CIAO,
ho un problema con una query di Update ....
NN riesco a modificare i campi...
VORREI MODIFICARE SOLO IL CAMPO MAIL , MA OGNI VOLTA CHE INSERISCO UN DATO PER MODIFICARE ME L'HO LASCIA VUOTO...
cOME VEDETE NELLA PAGINA DEL FORM IL LINK E MODIFICA.ASP E HO PURE PASSATO IL VALORE id E mail...potete darmi una mano ?
la pagina del form è :
MENTRE QUELLA DEL MODIFICAcodice:<head> <title>INSERISCI DOCUMENTO</title> <link href="stile.css" rel="stylesheet" type="text/css"> <script type="text/javascript" src="js/jquery.js"></script> <script type="text/javascript" src="js/interface.js"></script> <link href="stylemenu.css" rel="stylesheet" type="text/css" /> <script type="text/javascript" src="./js/datepicker.js"></script> <link href="./css/datepicker.css" rel="stylesheet" type="text/css" /> </head> <SCRIPT LANGUAGE="JavaScript"> function controllo() { var ret = true if(document.forms['form'].elements['Tipo'].value=="") { alert("SELEZIONARE IL TIPO DI POSTA"); ret = false; } else if(document.forms['form'].elements['Data_ricevimento'].value=="") { alert('INSERIRE LA DATA DI RICEVIMENTO'); ret = false; } else if(document.forms['form'].elements['Mittente'].value=="") { alert('INSERIRE IL MITTENTE'); ret = false; } else if(document.forms['form'].elements['Destinatario'].value=="") { alert('INSERIRE IL DESTINATARIO'); ret = false; } else { document.form.submit(); } return ret; } </SCRIPT> </head> <body> <p align="center"> <% ID = request.queryString("ID") session("ID") = ID 'connessione al database Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" &_ "DBQ="& Server.MapPath("Posta.mdb") sql = "SELECT * FROM T_Posta WHERE ID = " & ID sqlDestinatari = "SELECT distinct Mittente FROM T_Posta" ' inserisco Distinct per fare in modo che nella tabella venga ' visualizzato solamente una sola riga per volta sqlTipo = "SELECT Distinct Tipo FROM T_Tipo" set rsMittente = conn.execute(sqlDestinatari) set rsTipo = conn.execute(sqlTipo) set rs = conn.execute(sql) %> <form action="Copia di Inserisci_Upload.asp" method="post" enctype="multipart/form-data" name="form"> <input type="hidden" name="id" value="<%=rs("ID")%>"> <div class="titoletto">MODIFICA POSTA</div> <center> <table class="text" border="1"> <tr> <td>Tipo</td> <td> <select name="Tipo"> <option value="<%=rs("Tipo")%>"><%=rs("Tipo")%></option> <% do while not rsTipo.eof response.write("<option value='"& rsTipo("Tipo") &"'>" & rsTipo("Tipo") &"</option>") rsTipo.movenext loop %> </select> </td> </tr> <tr> <td>Data Ricevimento</td> <td><input READONLY name="Data_ricevimento" class="w16em dateformat-d-sl-m-sl-Y" type="text" style="width: 70px;" value="<%=rs("Data_ricevimento")%>"></input></td> </tr> <tr> <td>Mittente</td> <td><input name="Mittente" type="text" value="<%=rs("Mittente")%>"></input> </td> </tr> <tr> <td>Destinatario</td> <td> <select name="Destinatario"> <option value="<%=rs("Destinatario")%>"><%=rs("Destinatario")%></option> <option value="Ammin. Manitalidea S.p.A.">Ammin. Manitalidea S.p.A.</option> <option value="Ammin. Manital s.c.p.a.">Ammin. Manital s.c.p.a.</option> <option value="Ammin. Coplus GS s.r.l.">Ammin. Coplus GS s.r.l.</option> <option value="Uff. Workinglab">Uff. Workinglab</option> </select> </td> </tr> <tr> <td>Ritirato da utente</td> <td><input name="Ritirato_da" type="text" value="<%=rs("Ritirato_da")%>"></input> </td> </tr> <tr> <td>Data Ritiro</td> <td><input name="Data_ritiro" type="text" value="<%=rs("Data_ritiro")%>"></input> </td> </tr> <tr> <td>Priorita</td> <td> <select name="Priorita" class="text"> <option value="<%=rs("Priorita")%>"><%=rs("Priorita")%></option> <option value="Bassa">Bassa</option> <option value="Media">Media</option> <option value="Alta">Alta</option> </select> </td> <tr> <td>Indirizzo Mail</td> <td><input name="Mail" type="text" value="<%=rs("Mail")%>"></input> </td> </tr> <tr> <td>Note</td> <td><input name="Note" type="text" value="<%=rs("Note")%>"></input> </td> </tr> <tr> <td>Allegato</td> <td><input name="Allegato" type="text" value="<%=rs("Allegato")%>"></input> <td><input type="file" name="File1"></td> </td> </tr> </p> <tr> <td>Stato Posta</td> <td> <select name="StatoPosta" class="text"> <option value="<%=rs("StatoPosta")%>"><%=rs("StatoPosta")%></option> <option value="SI">SI</option> <option value="NO">NO</option> </select> </td> <tr> <TD style="height: 22px" align="center">Cancella l'allegato<td align="center"><%Response.write "[img]Img//img_menu/cestino.png[/img]</img>" & vbCrLf%></TD> <%Response.write "MODIFICA I CAMPI" & vbCrLf%></TD> </tr> <input type="submit" value="RIAPLODA" Onclick="return controllo()"> </form>
codice:<% ID = Session("ID") Mail = request.form("Mail") Mail = replace(Mail,"'","´") 'connessione al database Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" &_ "DBQ="& Server.MapPath("Posta.mdb") sql = "UPDATE T_Posta set Mail= '" & Mail & "' WHERE ID = " & ID conn.execute(sql) conn.close set conn = nothing AzioneLog = "Modificata registrazione con ID " & Tipo & " ricevuta in data " & ID %> <% 'response.redirect "visualizza.asp" %>
Rispondi quotando
