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

Consulta sobre cursores

Estas en el tema de Consulta sobre cursores en el foro de ASP Clásico en Foros del Web. Buenas tardes: Admito que me avergüenza un poco hacer esta consulta pero bueno, trato de aprender y eso ayuda. Cuando empecé a programar en ASP ...
  #1 (permalink)  
Antiguo 08/04/2012, 11:36
Avatar de freesoftwarrior  
Fecha de Ingreso: marzo-2006
Mensajes: 362
Antigüedad: 18 años, 8 meses
Puntos: 10
Consulta sobre cursores

Buenas tardes:
Admito que me avergüenza un poco hacer esta consulta pero bueno, trato de aprender y eso ayuda.

Cuando empecé a programar en ASP tuve que aprender a conectar base de datos. Por lo general utilizo Access (es lo que más me piden) y mi rutina de conexión es la siguiente:

Cita:
Dim Conexion,Tabla1, Tabla2, Tabla3
Set Conexion=Server.CreateObject("adodb.connection")
Set Tabla1=Server.CreateObject("adodb.recordset")
Set Tabla2=Server.CreateObject("adodb.recordset")
Set Tabla3=Server.CreateObject("adodb.recordset")
Conexion.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=ruta_de_la_base_de_datos"
y en cada página ASP coloco al inicio

Cita:
<!-- #include file="conector.asp" -->
<!-- #include file="adovbs.inc" -->


Y cada vez que quiero hacer una consulta simple hago esto

Cita:
Temp1="sentencia SQL de consulta"
Tabla1.Open Temp1, Conexion
...
Tabla1.Close

... cuando quiero utilizar el RecordCount uso lo siguiente

Cita:
Tabla1.Open Temp, Conexion, adOpenStatic, adCmdTable
y así puedo utilizar el RecordCount



Y finalmente, si quiero ingresar datos uso esto

Cita:
Tabla1.Open Temp, Conexion,2,3,1

Como siempre funcionó y jamás me dio problema alguno, pues no tuve motivo para curiosear sobre el tema. Sin embargo hace poco, tarde pero al fin de cuentas, encontré un artículo sobre el tema de cursores, lo que yo pongo como "2,3,1" para poder tener la conexión en modo de escritura.

Revisando en la biblioteca de código del foro encontré este

Cita:
Function conx_bd(nombre_bd)
con = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source="& Server.MapPath("carpeta/"&nombre_bd&".mdb")&";" & _
"Jet OLEDB:Database Password=tuclaveaqui;"

set conx = Server.Createobject("adodb.connection")
conx.open con
conx_bd = conx
End Function

El llamado lo hacemos asi

sql= "SELECT * FROM tutabla"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conx_bd("tubasededatossinextencion"), 3, 3
y quisiera saber ¿que significado tienen los 3,3 del final?. Me interesa esta función y me gustaría modificarla para poder usarla alternativamente para cargar una tabla en modo lectura, en modo escritura, para poder utilizar el RecordCount, etc.

Gracias por el apoyo
Un saludo desde Lima, Perú

Etiquetas: access, asp, cursores, server, sql, tabla
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 06:21.