aclaracion instruccion recordset

21/01/2005 - 21:15 por Ignacio Betancor | Informe spam

hola a todos,...

no se si estoy haciendo una locura o es correcto lo que estoy haciendo,
por cada tabla que necesito abrir tengo que hacer la conexion pertinente ???

es decir yo estoy haciendo esto

Dim oConn1,oConn2,oConn3,tabla1,tabla2,tabla3
set oConn1=Server.CreateObject("ADODB.Connection")
set oConn2=Server.CreateObject("ADODB.Connection")
set oConn3=Server.CreateObject("ADODB.Connection")
set tabla1=Server.CreateObject("ADODB.Recordset")
set tabla2=Server.CreateObject("ADODB.Recordset")
set tabla3=Server.CreateObject("ADODB.Recordset")
oConn1.Open "Driver={Microsoft Visual FoxPro
Driver};SourceTypeÛc;SourceDB=c:\inetpub\wwwroot\difersa\vtasdb\webalba.db
c;exclusive=no"
oConn2.Open "Driver={Microsoft Visual FoxPro
Driver};SourceTypeÛc;SourceDB=c:\inetpub\wwwroot\difersa\vtasdb\webalba.db
c;exclusive=no"
oConn3.Open "Driver={Microsoft Visual FoxPro
Driver};SourceTypeÛc;SourceDB=c:\inetpub\wwwroot\difersa\vtasdb\webalba.db
c;exclusive=no"

y luego hago cuando quiero usar el recordset hago lo siguiente:

tabla1.open temp1,oConn
tabla2.oen temp2,oConn
tabla3.open. emp3,oConn3

es correcto o solo con uno es suficiente..

muchas gracias de antemano

Siga el debate

1 respuesta

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 Jhonny Vargas P. [MVP]

22/01/2005 - 20:44 | Informe spam

Hola Ignacio,

1. Solo necesitas una sola coneccion y un solo recordset dependiendo para
que lo necesites...

Dim oConn, oRec, Consulta
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "string de conexion"

Consulta = "Select * from tabla"
Set oRec = oConn.Execute(Consulta)

Set oRec = Nothing

Consulta = "Select * from tabla"
Set oRec = oConn.Execute(Consulta)

Set oRec = Nothing

Consulta = "Select * from tabla"
Set oRec = oConn.Execute(Consulta)

Set oRec = Nothing

oConn.Close
Set oConn = Nothing

2. Quita tus bases de datos del INETPUB y dejalo en otra carpeta fuera del
área web, ya que te los puedes descargar y robar información.
Ejemplo: colocalos en C:\Datos a esta carpeta con el botón del lado
derecho->Propiedades->seguridad dale acceso total a los usuarios anónimos
IUSR_nombreservidor e IWAM_nombreservidor

Saludos,
Jhonny Vargas P.
Santiago de Chile

"Ignacio Betancor" escribió en el mensaje
news:uVI4J7$$

hola a todos,...

no se si estoy haciendo una locura o es correcto lo que estoy
haciendo,
por cada tabla que necesito abrir tengo que hacer la conexion pertinente
???

es decir yo estoy haciendo esto

Dim oConn1,oConn2,oConn3,tabla1,tabla2,tabla3
set oConn1=Server.CreateObject("ADODB.Connection")
set oConn2=Server.CreateObject("ADODB.Connection")
set oConn3=Server.CreateObject("ADODB.Connection")
set tabla1=Server.CreateObject("ADODB.Recordset")
set tabla2=Server.CreateObject("ADODB.Recordset")
set tabla3=Server.CreateObject("ADODB.Recordset")
oConn1.Open "Driver={Microsoft Visual FoxPro
Driver};SourceTypeÛc;SourceDB=c:\inetpub\wwwroot\difersa\vtasdb\webalba.db
c;exclusive=no"
oConn2.Open "Driver={Microsoft Visual FoxPro
Driver};SourceTypeÛc;SourceDB=c:\inetpub\wwwroot\difersa\vtasdb\webalba.db
c;exclusive=no"
oConn3.Open "Driver={Microsoft Visual FoxPro
Driver};SourceTypeÛc;SourceDB=c:\inetpub\wwwroot\difersa\vtasdb\webalba.db
c;exclusive=no"

y luego hago cuando quiero usar el recordset hago lo siguiente:

tabla1.open temp1,oConn
tabla2.oen temp2,oConn
tabla3.open. emp3,oConn3

es correcto o solo con uno es suficiente..

muchas gracias de antemano

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida