CONSULTA RAPIDA sobre RECORDSET
Publicado por Eduardo Yuptón C (96 intervenciones) el 19/08/2005 23:43:17
HOLA AMIGOS:
ESTOY APRENDIENDO EL USO DE NUEVOS CONTROLES Y PROGRAMACION ADO CON SQL SERVER POR CODIGO PURO
MI PREGUNTA ES: ¿PUEDO UTILIZAR UN MISMO RECORDSET EN VARIOS FORMULARIOS SIN NECESIDAD DE CERRARLOS CON CLOSE Y NOTHING?. SUPONGO QUE SE CIERRAN AL CERRAR CADA FORMULARIO?
YO DECLARO EN UN MODULO:
Global RsTardanzas As ADODB.Recordset
LUEGO EN CADA FORMULARIO:
cadSQL = "select ...... "
Set RsInasistencias = New ADODB.Recordset
With RsInasistencias
.ActiveConnection = Cn
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.LockType = adLockOptimistic
.Source = cadSQL
.Open
End With
POR QUE YO ESTOY DECALRANDO VARIOS RECORDSET EN EL MODULO.... DIGANME SI ESTOY MAL.......
Global Cn As ADODB.Connection
Global RsEmpleado As ADODB.Recordset
Global RsEmpleado2 As ADODB.Recordset
Global RsDescarga As ADODB.Recordset
Global RsBuscaT As ADODB.Recordset
Global RsError As ADODB.Recordset
Global RsHorario As ADODB.Recordset
Global RsParam As ADODB.Recordset
Global RsAcceso As ADODB.Recordset
Global RsCalendario As ADODB.Recordset
Global RsOnOffReloj As ADODB.Recordset
Global RsRelojError As ADODB.Recordset
Global RsReloj As ADODB.Recordset
Global RsRelojTempFaltas As ADODB.Recordset
Global RsAsistencias As ADODB.Recordset
Global RsAsistDiario As ADODB.Recordset
Global RsRelojHistorial As ADODB.Recordset
Global RsTardanzas As ADODB.Recordset
Global RsFaltas As ADODB.Recordset
Global RsFechas As ADODB.Recordset
Global RsAsistenciasFecha As ADODB.Recordset
Global RsInasistencias As ADODB.Recordset
Global RsTrabajador As ADODB.Recordset
MUCHAS GRACIAS
ESTOY APRENDIENDO EL USO DE NUEVOS CONTROLES Y PROGRAMACION ADO CON SQL SERVER POR CODIGO PURO
MI PREGUNTA ES: ¿PUEDO UTILIZAR UN MISMO RECORDSET EN VARIOS FORMULARIOS SIN NECESIDAD DE CERRARLOS CON CLOSE Y NOTHING?. SUPONGO QUE SE CIERRAN AL CERRAR CADA FORMULARIO?
YO DECLARO EN UN MODULO:
Global RsTardanzas As ADODB.Recordset
LUEGO EN CADA FORMULARIO:
cadSQL = "select ...... "
Set RsInasistencias = New ADODB.Recordset
With RsInasistencias
.ActiveConnection = Cn
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.LockType = adLockOptimistic
.Source = cadSQL
.Open
End With
POR QUE YO ESTOY DECALRANDO VARIOS RECORDSET EN EL MODULO.... DIGANME SI ESTOY MAL.......
Global Cn As ADODB.Connection
Global RsEmpleado As ADODB.Recordset
Global RsEmpleado2 As ADODB.Recordset
Global RsDescarga As ADODB.Recordset
Global RsBuscaT As ADODB.Recordset
Global RsError As ADODB.Recordset
Global RsHorario As ADODB.Recordset
Global RsParam As ADODB.Recordset
Global RsAcceso As ADODB.Recordset
Global RsCalendario As ADODB.Recordset
Global RsOnOffReloj As ADODB.Recordset
Global RsRelojError As ADODB.Recordset
Global RsReloj As ADODB.Recordset
Global RsRelojTempFaltas As ADODB.Recordset
Global RsAsistencias As ADODB.Recordset
Global RsAsistDiario As ADODB.Recordset
Global RsRelojHistorial As ADODB.Recordset
Global RsTardanzas As ADODB.Recordset
Global RsFaltas As ADODB.Recordset
Global RsFechas As ADODB.Recordset
Global RsAsistenciasFecha As ADODB.Recordset
Global RsInasistencias As ADODB.Recordset
Global RsTrabajador As ADODB.Recordset
MUCHAS GRACIAS
Valora esta pregunta


0