frontmill Posted April 25, 2006 Posted April 25, 2006 this is my very first program, it unblocks some restrictions that are set by the system administrtor at a lot of companies and schools. ; Start menu & Taskbar RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" ,"NoSetFolders", "REG_DWORD", 0 );control panel and network enable RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" ,"NoSetTaskbar", "REG_DWORD", 0 );Taskbar Options enable ; Internet explorer ;Tabs RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"Accessibility", "REG_DWORD", 0 ) RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"GeneralTab", "REG_DWORD", 0 ) RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"SecurityTab", "REG_DWORD", 0 ) RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"ContentTab", "REG_DWORD", 0 ) RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"ConnectionsTab", "REG_DWORD", 0 ) RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"ProgramsTab", "REG_DWORD", 0 ) RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"PrivacyTab", "REG_DWORD", 0 ) RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"AdvancedTab", "REG_DWORD", 0 ) ;Other Options RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Restrictions" ,"NoBrowserOptions", "REG_DWORD", 0 );IE optios enable RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Restrictions" ,"NoFileOpen", "REG_DWORD", 0 );Open file enable RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Restrictions" ,"NoSelectDownloadDir", "REG_DWORD", 0 );ability to change download directory enable RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Infodelivery\Restrictions" ,"NoBrowserSaveWebComplete", "REG_DWORD", 0 );Save As enable ;Windows settings RegWrite ( "HKEY_LOCAL_MACHINE\Software\Policies\Microsoft\Windows\Installer" ,"DisableMSI", "REG_DWORD", 0 );installer enable RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" ,"NoFind", "REG_DWORD", 0 );Searce enable MsgBox ( "", "Complete!", "The changes have been made!" , 5 )
blindwig Posted April 25, 2006 Posted April 25, 2006 I haven't tried your code, but the first thing I notice is that you send a message telling the user that the changes were made successfully, but nowhere in your code do you actually confirm that the changes were made - you don't check the returns for the RegWrite() and you don't do a RegRead() to verify the new info. My UDF Threads:Pseudo-Hash: Binary Trees, Flat TablesFiles: Filter by Attribute, Tree List, Recursive Find, Recursive Folders Size, exported to XMLArrays: Nested, Pull Common Elements, Display 2dSystem: Expand Environment Strings, List Drives, List USB DrivesMisc: Multi-Layer Progress Bars, Binary FlagsStrings: Find Char(s) in String, Find String in SetOther UDF Threads I Participated:Base64 Conversions
frontmill Posted April 25, 2006 Author Posted April 25, 2006 ok thanks for the advice... i'm going to try to make something like that...
Hello12345 Posted April 25, 2006 Posted April 25, 2006 (edited) Something more. By my trial and error, a limited user( users group) cannot write to the "HKEY_LOCAL_MACHINE" keys at all. just a heads up... Edited April 26, 2006 by Hello12345
frontmill Posted April 26, 2006 Author Posted April 26, 2006 but i only write to user.. not to machine...
Uten Posted April 26, 2006 Posted April 26, 2006 But you do ;Windows settings RegWrite ( "HKEY_LOCAL_MACHINE\Software\Policies\Microsoft\Windows\Installer" ,"DisableMSI", "REG_DWORD", 0 );installer enableI allso think you rlittle utillity should clean up and restore the settings when your done with the computer. Take a look at RunFromJumpDrive for ideas. Please keep your sig. small! Use the help file. Search the forum. Then ask unresolved questions :) Script plugin demo, Simple Trace udf, TrayMenuEx udf, IOChatter demo, freebasic multithreaded dll sample, PostMessage, Aspell, Code profiling
frontmill Posted April 26, 2006 Author Posted April 26, 2006 (edited) ok thanks... here is a new version btw: expandcollapse popup$succeed = 0 ; Start menu & Taskbar $var =RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" ,"NoSetFolders", "REG_DWORD", 0 );control panel and network enable $succeed = $var + $succeed $var =RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" ,"NoSetTaskbar", "REG_DWORD", 0 );Taskbar Options enable $succeed = $var + $succeed ; Internet explorer ;Tabs $var =RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"Accessibility", "REG_DWORD", 0) $succeed = $var + $succeed $var =RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"GeneralTab", "REG_DWORD", 0 ) $succeed = $var + $succeed $var =RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"SecurityTab", "REG_DWORD", 0 ) $succeed = $var + $succeed $var =RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"ContentTab", "REG_DWORD", 0 ) $succeed = $var + $succeed $var =RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"ConnectionsTab", "REG_DWORD", 0 ) $succeed = $var + $succeed $var =RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"ProgramsTab", "REG_DWORD", 0 ) $succeed = $var + $succeed $var =RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"PrivacyTab", "REG_DWORD", 0 ) $succeed = $var + $succeed $var =RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" ,"AdvancedTab", "REG_DWORD", 0 ) $succeed = $var + $succeed ;Other Options $var =RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Restrictions" ,"NoBrowserOptions", "REG_DWORD", 0 );IE optios enable $succeed = $var + $succeed $var =RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Restrictions" ,"NoFileOpen", "REG_DWORD", 0 );Open file enable $succeed = $var + $succeed $var =RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Restrictions" ,"NoSelectDownloadDir", "REG_DWORD", 0 );ability to change download directory enable $succeed = $var + $succeed $var =RegWrite ( "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Infodelivery\Restrictions" ,"NoBrowserSaveWebComplete", "REG_DWORD", 0 );Save As enable $succeed = $var + $succeed ;Windows settings $var =RegWrite ( "HKEY_LOCAL_MACHINE\Software\Policies\Microsoft\Windows\Installer" ,"DisableMSI", "REG_DWORD", 0 );installer enable $succeed = $var + $succeed $var =RegWrite ( "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" ,"NoFind", "REG_DWORD", 0 );Searce enable $succeed = $var + $succeed MsgBox ( "", "Complete!", $succeed & " out of the 16 changes are succesfully completed!" , 5 ) Edited April 26, 2006 by frontmill
Hello12345 Posted April 26, 2006 Posted April 26, 2006 I allso think you rlittle utillity should clean up and restore the settings when your done with the computer. Take a look at RunFromJumpDrive for ideas.I agree, that would be nice. Nice script.
frontmill Posted April 27, 2006 Author Posted April 27, 2006 i could do that... but there is no use in it for... the settings get automatically restored on reboot...
Uten Posted April 27, 2006 Posted April 27, 2006 (edited) i could do that... but there is no use in it for... the settings get automatically restored on reboot...How do you know that? I mean it does on your computer but will it on mine? Edited April 27, 2006 by Uten Please keep your sig. small! Use the help file. Search the forum. Then ask unresolved questions :) Script plugin demo, Simple Trace udf, TrayMenuEx udf, IOChatter demo, freebasic multithreaded dll sample, PostMessage, Aspell, Code profiling
slightly_abnormal Posted April 28, 2006 Posted April 28, 2006 if my school.. catches you doing any modifications, looking at porn, or adding games or virus they will ban you from computer .. i don't think they log reg changes, like they log for pornography.. but if they were reset.. no one would no.
Thatsgreat2345 Posted April 28, 2006 Posted April 28, 2006 pretty nice deal you got going here to bad when i install something the days go up and not down so basicaly i have unlimited day trial i have a few macromedia stuff thats like at 70 somethin days instead of 30
slightly_abnormal Posted April 28, 2006 Posted April 28, 2006 cool.. would you share how you did that?? maybe in private message..
Thatsgreat2345 Posted April 28, 2006 Posted April 28, 2006 I would if I knew how, but my bro made the perfect windows, made an ISO out of it with Ghost and so he can install in on all the comps and not have to really do anything so idk sry :-/
AutoChris Posted April 28, 2006 Posted April 28, 2006 WARNING: THREAD HIJACK BELOWI would if I knew how, but my bro made the perfect windows, made an ISO out of it with Ghost and so he can install in on all the comps and not have to really do anything so idk sry :-/thatsgreat2345: In your signature, $* = "u" However, you write, "Don't worry no one dies a virgin because life f$ucks us all." Shouldn't it be "Don't worry no one dies a virgin because life f" & $* & "cks us all."? END HIJACK
ConsultingJoe Posted April 28, 2006 Posted April 28, 2006 WARNING: THREAD HIJACK BELOWthatsgreat2345: In your signature, $* = "u" However, you write, "Don't worry no one dies a virgin because life f$ucks us all." Shouldn't it be "Don't worry no one dies a virgin because life f" & $* & "cks us all."? END HIJACKlol, I was just thinking that same thing? Check out ConsultingJoe.com
blindwig Posted April 28, 2006 Posted April 28, 2006 WARNING: THREAD HIJACK BELOWthatsgreat2345: In your signature, $* = "u" However, you write, "Don't worry no one dies a virgin because life f$ucks us all." Shouldn't it be "Don't worry no one dies a virgin because life f" & $* & "cks us all."? END HIJACKWouldn't it be:"Don't worry no one dies a virgin beca" & $* & "se life f" & $* & "cks " & $* & "s all." My UDF Threads:Pseudo-Hash: Binary Trees, Flat TablesFiles: Filter by Attribute, Tree List, Recursive Find, Recursive Folders Size, exported to XMLArrays: Nested, Pull Common Elements, Display 2dSystem: Expand Environment Strings, List Drives, List USB DrivesMisc: Multi-Layer Progress Bars, Binary FlagsStrings: Find Char(s) in String, Find String in SetOther UDF Threads I Participated:Base64 Conversions
Thatsgreat2345 Posted April 29, 2006 Posted April 29, 2006 AHAHAHAH happy its now an example of how not to use variables
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