Visual Basic - ayuda con esto...

Life is soft - evento anual de software empresarial
 
Vista:

ayuda con esto...

Publicado por Novato (143 intervenciones) el 26/10/2004 01:12:05
declaro esto en Module1.Bas (ya probe con Public tambien)
Global Conexion As ADODB.Connection
Global RsVendedores As ADODB.Recordset

Public Sub AbirBD()
Set Conexion = New ADODB.Connection
Conexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Negocio.mdb;Persist Security Info=False"
Conexion.Open
Conexion.CursorLocation = adUseClient

Set RsVendedores = New ADODB.Recordset
RsVendedores.Open "Vendedores", Conexion, adOpenDynamic, adLockOptimistic

todo bien en todos los formularios, pero lo que necesito es withevents es decir tener los eventos del rsvendedores como si lo hiciera con un adodc1 local del formulario

gracias de ya
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:ayuda con esto...

Publicado por Ruri (583 intervenciones) el 26/10/2004 03:50:39
En los módulos Standar no se admiten eventos. la instrución Withevents no funciona. La forma de encapsular tu objeto ADO es con una Clase y recibir los eventos allí. Las limitaciones de withevents son las siguientes:

1. Una variable WithEvents no pueden declararse As Object
2. No pueden declararse As New.
3. No pueden declararse variables WithEvents en un módulo estándar. 4. 4. No pueden crearse matrices de variables WithEvents.

Saludos Ruri
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar