Declare IsUserAnAdmin In Shell32 If IsUserAnAdmin() Messagebox("It's an Administrator user."+Chr(13)+Chr(10)+; "Let's try to create a shortcut...",64) Local loWSH As WScript.Shell, lcStartupDir, loLnk loWSH = Createobject("WScript.Shell") lcStartupDir = loWSH.SpecialFolders("AllUsersStartup") loLnk = loWSH.CreateShortcut(Addbs(lcStartupDir) + "Test.lnk") loLnk.TargetPath = "C:\MyFolder\MyExe.exe" loLnk.WorkingDirectory = "C:\MyFolder" Store Null To loLnk, loWSH Else Messagebox("Isn't an Administrator user!",16) Endif Clear Dlls IsUserAnAdmin ReturnAll you neeed to do is create a project, place the code above in a prg (change TargetPath and WorkingDirectory properties), set it as main and generate an Install.Exe.