Ver Mensaje Individual
  #2 (permalink)  
Antiguo 10/07/2002, 21:06
Avatar de Sir Matrix
Sir Matrix
 
Fecha de Ingreso: octubre-2000
Ubicación: Dentro de mi cabeza. ono?
Mensajes: 1.264
Antigüedad: 24 años, 7 meses
Puntos: 3
Re: Insertar en 2 tablas con Ultradev, sugerencias?

hola, lo mejor es que te independizes del ultradev, pues crea código muy estándar. A ver si puedo ayudarte en algo, aunque te confieso que yo usaba mucho el ultradev y todavía necesito estar viendo código para programar.

sólo se deben crear 2 consultas a las 2 tablas y luego insertar los datos del form repartidos.

Código:
<%LANGUAGE="VBSCRIPT"%>
<% 
' suponiendo que estos son los datos de tu form y que quieres meter nombre y rut en la tablaA y direccion y observaciones en la tablaB

nombre=Request.Form("nombre")
rut=Request.Form("rut")
direccion=Request.Form("direccion")
observaciones=Request.Form("observaciones")

' insert en tablaA
DIM conexion,rs,basedatos
Set conexion=Server.CreateObject("ADODB.connection")
basedatos=Server.MapPath("data/mibase.mdb")
conexion.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& basedatos & ";" 
sql="Insert Into tablaA (nombre,rut) values ('" & nombre & "','" & rut & "')"

set rs=conexion.execute(sql)
conexion.Close

DIM conexion2,rs2
Set conexion2=Server.CreateObject("ADODB.connection")

conexion2.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& basedatos & ";" 
sql2="Insert Into tablaB(direccion,observaciones) values ('"& direccion &"','"& observaciones &"')"

set rs=conexion2.execute(sql2)
conexion2.Close
%>
espero te sirva. Saludos


<p align="center">
<EMBED src="http://www.webmagic.cl/firmafdw.swf" quality=high wmode=transparent WIDTH="260" HEIGHT="60" NAME="wc"></EMBED>
</p>