04/09/2002, 10:42
|
| | | Fecha de Ingreso: abril-2002
Mensajes: 32
Antigüedad: 22 años, 1 mes Puntos: 0 | |
| DB con codigo...
Intento manipular y trabajar con bd mediante codigo, pero el siguiente codigo:
Private Sub Form_Load()
Call CogeNombreEmpresa
Dim name
ChDrive "c:"
ChDir App.Path
Set wks = CreateWorkspace("", "admin", "", dbUseJet)
Set base = wks.OpendDataBase("Disco2.mdb")
Set rec = base.OpenRecordset("Select [NºDisco]from Disco", dbOpenSnapshot)
While Not rec.EOF
cmbDisco.AddItem rec.Fields("NºDisco")
rec.MoveNext
Wend
rec.Close
End Sub
----------
eso me da error (wks, variable no definida)y si las defino, me da este error: El objeto no acepta esa propiedad o metodo (señalando a la linea de setbase...) |