Ver Mensaje Individual
  #3 (permalink)  
Antiguo 10/01/2003, 09:04
rsuitt
 
Fecha de Ingreso: marzo-2002
Mensajes: 25
Antigüedad: 23 años, 2 meses
Puntos: 0
Codigo

Mira intente con un solo Update y me arrojo un error de Demasiados campos a actualizar, aqui va el codigo:

codigosop = Request.Form("codsop")


sql = "UPDATE SOP SET nombres = '"&rnombres&"',direccions = '"&rdireccions&"',nombrecontactos= '"&rnombrecontactos&"',fonocontactos = '"&rfonocontactos&"', emailcontactos= '"&remailcontactos&"',faxcontactos = '"&rfaxcontactos&"',celularcontactos = '"&rcelularcontactos&"',direccioncontactos = '"&rdireccioncontactos&"',nombrec='"& rnombrec&"',direccionc = '"&rdireccionc&"',nombrecontactoC='"& rnombrecontactoc&"',fonocontactoc = '"&rfonocontactoc&"',emailcontactoc = '"&remailcontactoc&"',faxcontactoc = '"&rfaxcontactoc&"',celularcontactoc = '"&rcelularcontactoc&"',direccioncontactoc = '"&rdireccioncontactoc&"' WHERE cod_sop = cint('"& codigosop &"')"
Rs_ActualizaSOP.Open sql, DataConn

sql_uno = "UPDATE SOP SET nombrenotify = '"&rnombrenotify&"',fononotify = '"&rfononotify&"',emailnotify = '"&remailnotify&"',faxnotify = '"&rfaxnotify&"',celularnotify = '"&rcelularnotify&"',direccionnotify = '"&rdireccionnotify&"',nombreorigen = '"&rnombreorigen&"',fonoorigen = '"&rfonoorigen&"',faxorigen = '"&rfaxorigen&"',emailorigen = '"&remailorigen&"',celularorigen = '"&rcelularorigen&"' WHERE cod_sop = cint('"& codigosop &"')"
Rs_ActualizaSOP.Open sql_uno, DataConn


sql_dos = "UPDATE SOP SET direccionorigen = '"&rdireccionorigen&"',nombredestino = '"&rnombredestino&"',fonodestino = '"&rfonodestino&"',faxdestino = '"&rfaxdestino&"',emaildestino = '"&remaildestino&"',celulardestino = '"&rcelulardestino&"',direcciondestino='"& rdirecciondestino&"', nombreagente = '"&rnombreagente&"',fonoagente = '"&rfonoagente&"',faxagente = '"&rfaxagente&"',emailagente = '"&remailagente&"',celularagente = '"&rcelularagente&"' WHERE cod_sop = cint('"& codigosop &"')"
Rs_ActualizaSOP.Open sql_dos, DataConn

sql_tres = "UPDATE SOP SET direccionagente = '"&rdireccionagente&"',nombreagented = '"&rnombreagented&"',fonoagented = '"&rfonoagented&"', faxagented = '"&rfaxagented&"',emailagented = '"&remailagented&"',celularagented = '"&rcelularagented&"',direccionagented = '"&rdireccionagented&"',descripcionproducto = '"&rdescripcionproducto&"',incoterm = '"&rincoterm&"',seguro = '"&rseguro&"',transporte = '"&rtransporte&"',origenrsa = '"&rorigenrsa&"',destinorsa = '"&rdestinorsa&"',minrsa='"& rminrsa&"',_45krsa = '"&r_45krsa&"',45krsa = '"&r45krsa&"',100krsa='"& r100krsa &"',300krsa='"& r300krsa&"' WHERE cod_sop = cint('"& codigosop &"')"
Rs_ActualizaSOP.Open sql_tres, DataConn

La conexion la hago antes con DataConn solo te muestro esto porque son como 10 mas sql's.

Gracias por tu ayuda.