Buongiorno.
Ho convertito un DB Access 2000 (.mdb) in Access 2007 (.accdb) e quando eseguo il modulo iniziale, che contiene il seguente Codice
codice:
Sub APRI()
Dim MDB, TBA, FLD, ZZZ, FS
Set MDB = DBEngine.Workspaces(0).Databases(0)
Set TBA = MDB.OpenRecordset("APERTO")
Set FLD = TBA.Fields("ORIGIN")
TBA.MoveLast
TBA.MoveFirst
ZZZ = FLD.Value
TBA.Close
With Application.FileSearch
.LookIn = "S:\MIOFILE\ARCHIVI"
.FileName = "GENERALE.MDB"
If .Execute > 0 Then
If ZZZ = "C" Then
.LookIn = "C:\MIOFILE\ARCHIVI"
.FileName = "GENERALE.MDB"
......
.....
l'esecuzione si arresta subito alla Riga "With Application.FileSearch" con il seguente errore:
Riferimento non valido alla proprietà FileSearch
Ipotizzo che manchi appunto un Riferimento, ma non so quale: qualcuno può aiutarmi?
Oppure dirmi cosa c'è di sbagliato?
Ovviamente con Access 2000 filava tutto liscio.
Grazie
P.S.: dovrei aprire questo .mdb e quindi Access 2000 nello stesso PC in cui è installato Access 2007 e ogni volta Windows 10 chiede di ripetere l'installazione dell'uno o dell'altro; così ho pensato di convertire il .mdb in .accdb ma come ho detto, mi sono subito fermato.