Buongiorno,
ho una fissa che mi attanaglia e che non sono riuscito a risolvere.
Volevo crearmi una sub contenente le 3 istruzioni di connessione archivio (adodb.connection), ma non riesco a passare il nome della connessione. Mi spiego:
vorrei racchiudere queste istruzioni
in una sub da richiamare dove ho dbarchivio dichiarata come variabile (ora mi scuso se non sto usando i termini tecnici corretti)codice:Set dbarchivio = New Connection dbarchivio.CursorLocation = adUseClient dbarchivio.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=miodatabase;Jet OLEDB:Database Password="
Tipo:
da richiamarecodice:public sub apridb (byval nomedb as adodb.connection) Set apridb= New Connection apridb.CursorLocation = adUseClient apridb.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=miodatabase;Jet OLEDB:Database Password=" end sub
codice:apridb dbarchivio
Il problema è che dopo l'struzione, dbarchivio non è inizializzata. Questo perchè non inizializza le prime due istruzioni, che se le metto fuori dalla sub, prima del richiamo della stessa, allora funge. Ma io volevo generalizzare anche loro, per scrivere meno codice
Grazie.