WizardWin
Dim X As Long X = Shell("rundll32.exe AppWiz.Cpl, NewLinkHere " & App.Path & "\", 1)
Dim X As Long
X = Shell("rundll32.exe AppWiz.Cpl, NewLinkHere " & App.Path & "\", 1)
(wizardwin.html)- by Paolo Puglisi - Modifica del 25/3/2019