Visual Basic - Ayuda Please

Life is soft - evento anual de software empresarial
   
Vista:

Ayuda Please

Publicado por Christian (1 intervención) el 22/07/2008 06:10:18
hola, comento, estoy realiando una aplicacion en la cual debo llenar unos formulrios los cuales contienen unos combobox , textbox, entre otros, mi problema es que logro enlazar mi base de datos asi
- priemro con un modulo

Option Explicit
'Esta variable guardara la ruta de ejecución de nuestro programa y el nombre de la base

Dim Ruta As String

Public MiBase As Database
Public MiTabla As Recordset

Public Sub EnlazarBase()
Ruta = "" & App.Path & "ase.mdb"
Set MiBase = OpenDatabase(Ruta)
Set MiTabla = MiBase.OpenRecordset("Tabla")
End Sub

luego en el formload

Private Sub Form_Load()
Call EnlazarBase
MiTabla.MoveFirst
Dim N As Integer
For N = 1 To MiTabla.RecordCount
Combo1.AddItem MiTabla("nombrecampo")
MiTabla.MoveNext
If Combo1.ListIndex = MiTabla.RecordCount Then
Exit For
End If
Next N
End Sub, pero cuando cierro la aplicacion, luego la abro y me arroja el siguiente error

error 94

uso no valido del NULL, y no se que pasa, si en primera instancia los combos me mostraban los datos y despues de un rato me rroja ese error,please alguien que me ayude
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 Please

Publicado por FEDE (189 intervenciones) el 22/07/2008 18:53:31
EN EL FORM_LOAD PONE IF MITABLA.STATE=1 THEN MITABLA.CLOSE
OSEA CERRAS EL RECORDSET TOTAL DESPUES LOS VOLVES A ABRIR EN EnlazarBase()
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