Alguem pode me explica como se faz um update completo ?
Olhem como eu fiz:
<%
if Request("Action") = "Submit this form for processing" then
Dim nomedocontato, sobrenomedocontato
nomedocontato = Request.Form("fistname")
sobrenomedocontato = Request.Form("lastname")
dim endereconocorreioeletronico
endereconocorreioeletronico = Session("endereco")
Dim oConn
Dim oRs
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("../fpdb/novo.mdb")
Set oRs = oConn.Execute("UPDATE Clientes SET nomedocontato='" & nomedocontato & "', sobrenomedocontato='" & sobrenomedocontato & "' Where endereconocorreioeletronico = '" & strNome & "' ")
oConn.Close
Set oConn = Nothing
if err = 0 then
Response.Write "Update completed with success."
else
Response.Write "Erro. Please revise your form." & nomedocontato
end if
end if
%>
Edição feita por: imagination, 20/10/2003, 10:06.