Foros del Web » Programando para Internet » ASP Clásico »

Insert Into

Estas en el tema de Insert Into en el foro de ASP Clásico en Foros del Web. Hola a todos. estoy insertando registros asi Código PHP: set Command1  =  Server . CreateObject ( "ADODB.Command" ) Command1 . ActiveConnection  =  MM_coneccion_STRING Command1 . CommandText  ...
  #1 (permalink)  
Antiguo 24/06/2004, 21:17
Avatar de dieguicho  
Fecha de Ingreso: noviembre-2001
Ubicación: Buenos Aires
Mensajes: 1.190
Antigüedad: 22 años, 6 meses
Puntos: 1
Insert Into

Hola a todos.
estoy insertando registros asi

Código PHP:
set Command1 Server.CreateObject("ADODB.Command")
Command1.ActiveConnection MM_coneccion_STRING
Command1
.CommandText "INSERT INTO usuarios (empresa,pais,provincia,localidad,telefono,email,usuario,clave) VALUES (empresa,pais,provincia,localidad,telefono,email,usuario,clave)"
Command1.CommandType 1
Command1
.CommandTimeout 0
Command1
.Prepared true
Command1
.Execute() 
se puede en vez de declarar todo dentro del commandtext

hacerlo como si fuera agregando un registro desde un recordset?
por ej

rs1.addnew
rs1("campo") = algun valor
rs1.update

solo porque es mas comodo.. y se podria utilizar algun if o algo..
es posible?

saludossssssssssssssss
__________________
On error no hago nada porque deje de fumar...

Última edición por dieguicho; 24/06/2004 a las 21:18
  #2 (permalink)  
Antiguo 24/06/2004, 21:56
Avatar de LeCLUB  
Fecha de Ingreso: abril-2003
Ubicación: Barcelona (España)
Mensajes: 205
Antigüedad: 21 años, 1 mes
Puntos: 1
Hombre, más cómodo no creo que sea, ya que de esta manera es más rápida, limpia, y además tienes la BBDD abierta un tiempo francamente bajo.

Que lo otro sea más "amigable", más "entendible" o más "casero", pues si, puede ;)

En cuanto a los If...End If, tambien los puedes utilizar en la forma que creas la consulta SQL actualmente

Pero bueno, respondiendo a tu pregunta, SI, se puede hacer de la forma que dices, utilizando RecordSets:

Código PHP:
Conexion "Driver={Microsoft Access Driver (*.mdb)};DBQ=" Server.MapPath(".\db.mdb")
Set Conn Server.CreateObject("ADODB.Connection")
set Rs CreateObject("ADODB.Recordset")
Conn.open Conexion
SQL 
"Select * from usuarios"
Rs.open SQLConn2,3
Rs
.addnew
Rs
("campo") = algun valor
Rs
.update
Rs
.close
Conn
.close
set Rs 
Nothing
set Conn 
Nothing 
Un saludo
__________________
Documentación de VBScript V5.6 en Español:
http://download.microsoft.com/downlo...ES/scd56es.exe
  #3 (permalink)  
Antiguo 24/06/2004, 22:57
Avatar de dieguicho  
Fecha de Ingreso: noviembre-2001
Ubicación: Buenos Aires
Mensajes: 1.190
Antigüedad: 22 años, 6 meses
Puntos: 1
si, lo se, que con recordsets se puede ... pero con commands no se puede "acomodar" de esa forma? ya uqe como dices que es mas veloz, etc. conviene utilizar commands en vez de recordsets
__________________
On error no hago nada porque deje de fumar...
  #4 (permalink)  
Antiguo 25/06/2004, 03:47
Avatar de LeCLUB  
Fecha de Ingreso: abril-2003
Ubicación: Barcelona (España)
Mensajes: 205
Antigüedad: 21 años, 1 mes
Puntos: 1
También puedes ir "añadiendo" más datos a la consulta SQL:

Command1.CommandText = "SELECT * "
Command1.CommandText = Command1.CommandText & = "FROM Tabla1 "
Command1.CommandText = Command1.CommandText & = "WHERE bla bla bla"

y así tantas veces como quieras, y si quieres utilizar If...End if, tambien puedes:

Command1.CommandText = "SELECT * "
Command1.CommandText = Command1.CommandText & = "FROM Tabla1 "
if Request.QueryString("campo") = 1 Then
Command1.CommandText = Command1.CommandText & = "WHERE id=1"
else
Command1.CommandText = Command1.CommandText & = "WHERE id=2"
End if

Un saludo
__________________
Documentación de VBScript V5.6 en Español:
http://download.microsoft.com/downlo...ES/scd56es.exe
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 12:27.