venerdì 18 giugno 2010

Apri Directory da Pulsante Access

Volendo aprire, mediante un pulsante (chiamato "Comando1") dalla nostra maschera Access, una directory posizionata nel nostro PC, allora il codice VBA da inserire è:

Private Sub Comando1_Click()
On Error GoTo Err_Comando1_Click


Application.FollowHyperlink "C:\Prova\"

Exit_Comando226_Click:
Exit Sub

Err_Comando1_Click:
MsgBox Err.Description
Resume Exit_Comando1_Click
End Sub

In questo modo, quando andiamo a cliccare sul "Comando1" ovvero il nostro pulsante posizionato sulla Form di Access, l'azione che si va a compiere è quella di andare ad aprire la cartella desiderata, ovvero "Prova", posizionata in C:\.
Allo stesso modo possiamo fare per altre cartelle posizionate in ogni angolo del nostro pc, basta andare a sostituire il percorso tra apici indicato nel codice VBA posto di sopra.

Come si vede il comando basilare per questa operazione è Application.FollowHyperlink "percorso" .

Nessun commento:

Posta un commento

Lascia la tua opinione...