PeterDa Posted December 18, 2011 Posted December 18, 2011 Hello, I have been trying to delete a file by using the following code, I also tried moving the file specified in the commented out line below. The code does not work even if when prompted user credentials high enough to join a domain, and install software are entered. RequireAdmin #NoTrayIcon Opt("WinTextMatchMode", 2) ;1=complete, 2=quick Opt("WinTitleMatchMode", 2) ;1=start, 2=subStr, 3=exact, 4=advanced, -1 to -4=Nocase Opt("TrayAutoPause",0) Opt("TrayIconHide", 1) Phase1() Func Phase1() ;IsAdmin() ;If IsAdmin() Then MsgBox(0, "", "Admin rights detected",2) RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System","ConsentPromptBehaviorAdmin","REG_DWORD", "0") FileDelete("C:\Program Files\Microsoft Office\Office14\STARTUP\Math*.*") FileDelete("C:\Program Files\Microsoft Office\Office14\STARTUP\*.dotm") Sleep(2000) ;FileMove("C:\Program Files\Microsoft Office\Office14\STARTUP\Math Type Commands 6 For Word 2010.dotm", "C:\temp\Math Type Commands 6 For Word 2010.dotm") EndFunc Any ideas ? Regards Peter
rcmaehl Posted December 18, 2011 Posted December 18, 2011 (edited) Did you check file attributes to make sure they were not Read-only? Also, you should check to see which parts error out. (See: @error in the Documentation) Edited December 18, 2011 by rcmaehl My UDFs are generally for me. If they aren't updated for a while, it means I'm not using them myself. As soon as I start using them again, they'll get updated. My Projects WhyNotWin11, MSEdgeRedirect Cisco Finesse, Github, IRC UDF, WindowEx UDF
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now