
ahora mi problema es el sigguiente: tengo este codigo para hacer una consutla de mi folio por medio de un timer para estar consultando el numero
a determinado tiempo, pero me aparece un error : "no se ha definido el tipo definido por el usuario" y aparece en la linea de: el recordset, y me comentan que tengo ke poner una class(ver final de mensaje).
Private Sub Timer1_Timer()
Dim rec As New Ado.Recorset '<<<<---- aki
Dim sql As String
'primero hacemos la consulta para ver cual es el folio maximo
sql = "Select max(folio) as folio from facturas"
'txtFolio.Text = sql
rec.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=C:\marketing"
If Not rec.EOF Then
'txtFolio.Text = Val(rec!Folio)
Else
'msg de error o valor por default del folio
End If
End Sub
***********
similar a esta:
CLASS FORM
IMPORTS MICROSOFT.DATA.SQLCLIENT
INHERITS
ENDFORM ' como es import o inherits??
para que me pueda aseptar mi bariable tipo record set ke onda alguien si me puede ayudar muchas gracias
