Ciao ragazzi!! vi chiedo un'enorme AIUTO!
Vorrei creare tramite vba access 2010: che pigiando un tasto si crei un collegamento (link) di una cartella (esistente in C:\programmi file) nello stesso posto in cui è ubicato il DataBase che sto utilizzando.
Il codice che ho creato è:


Dim WshShell
Dim oMyShortcut
Dim strDesktop
Dim MyDB As Database
Dim MyDBpath


Set MyDB = DBEngine.Workspaces(0).Databases(0)
Set MyDBpath = MyDB.Name
Set WshShell = CreateObject("WScript.Shell")
Set oMyShortcut = WshShell.CreateShortcut(MyDBpath + "\CartDB_Indicatori.lnk")


oMyShortcut.WindowStyle = 1
oMyShortcut.IconLocation = "C:\Program Files\CartDB_Indicatori"
oMyShortcut.TargetPath = "C:\Program Files\CartDB_Indicatori"
oMyShortcut.WorkingDirectory = "c:\"
oMyShortcut.Save


Dove sbaglio? ...please!