andee_damon Posted January 25, 2010 Share Posted January 25, 2010 Hi Sin! yes, I still want that code, can you post it here? or you can send me an email?I added the Win7 line to the 1.2c version, but I haven't test it yet.Andee Link to comment Share on other sites More sharing options...
Sin_of_Nature Posted January 25, 2010 Share Posted January 25, 2010 (edited) Heres the code. Certainly not optimised (slower reading in file than 1.2c). Wont let me upload exe as its larger than 200kIgnore the line "; THIS IS WHERE IT GOES ALL WRONG!", it was were I added the 'install in order listed' code. kToolv1.2d_unoffical.zip Edited January 26, 2010 by Sin_of_Nature 1 Link to comment Share on other sites More sharing options...
Necros Posted March 5, 2010 Share Posted March 5, 2010 (edited) I'm working on KTool 1.2d to handle ZIP or 7z files.My software database is on a external hard drive, and I may use it on untrusted maybe infected computers. Therefore, I'm storing each driver or software in a zip file to protect my files against viruses.I'm about to test some new instructions in INI file to use 7Za.exe to unzip a software in a temp folder, and then run an EXE or MSI file.Do you feel theses changes useful ? Edited March 7, 2010 by Necros Link to comment Share on other sites More sharing options...
Sin_of_Nature Posted June 24, 2010 Share Posted June 24, 2010 (edited) Hi,Not sure if you still use this, but the IsAdmin() function call does not work correctly under Vista and Windows 7. Func CheckAdmin() ;Check if user has administrator rights If IsAdministrator()=0 Then If MsgBox (4,"","Administrator rights required. Continue?") = 7 then Exit EndIfEndFunc ;CheckAdmin; Replacement function for IsAdminFunc IsAdministrator($sUser = @UserName, $sCompName = ".") Local $aCall = DllCall("netapi32.dll", "long", "NetUserGetInfo", "wstr", $sCompName, "wstr", $sUser, "dword", 1, "ptr*", 0) If @error Or $aCall[0] Then Return SetError(1, 0, False) Local $fPrivAdmin = DllStructGetData(DllStructCreate("ptr;ptr;dword;dword;ptr;ptr;dword;ptr", $aCall[4]), 4) = 2 DllCall("netapi32.dll", "long", "NetApiBufferFree", "ptr", $aCall[4]) Return $fPrivAdminEndFunc The IsAdministrator was not written by me, some smart person on the AutoIt forum did. Works a treat though.Zip function would be usefull. My next step to be able to adjust the install order (+ and - buttons) window so you can move applications up and down the install list.SinI'm working on KTool 1.2d to handle ZIP or 7z files.My software database is on a external hard drive, and I may use it on untrusted maybe infected computers. Therefore, I'm storing each driver or software in a zip file to protect my files against viruses.I'm about to test some new instructions in INI file to use 7Za.exe to unzip a software in a temp folder, and then run an EXE or MSI file.Do you feel theses changes useful ? Edited June 24, 2010 by Sin_of_Nature Link to comment Share on other sites More sharing options...
Volly Posted October 12, 2011 Share Posted October 12, 2011 I've taken up the reins in managing this fine tool. You can find my version of it and my tweaks here:http://www.autoitscript.com/forum/topic/133588-the-vollatran-project-software-management-tool/I plan to make many enhancements to it but if anyone wants to contribute by all means do. 1 Link to comment Share on other sites More sharing options...
zuardin Posted December 9, 2012 Share Posted December 9, 2012 The ReturnOSVersion function should contain:Case $VER = "WIN_7"$OS = "Windows 7"Case $VER = "WIN_VISTA"$OS = "Windows Vista"Case $VER = "WIN_XP" $OS = "Windows XP"Case $VER = "WIN_2000" $OS = "Windows 2000"Case $VER = "WIN_98" $OS = "Windows 98"Case $VER = "WIN_ME" $OS = "Windows ME"Case $VER = "WIN_95" $OS = "Windows 95"Case $VER = "WIN_NT4" $OS = "Windows NT4"What you do with the new responses in that source is your own design. Note you can get the version simply by returning the @OSVersion macro:MsgBox (0, "OS Version", @OSVersion)For example:'UNKNOWN" on windows 8 Link to comment Share on other sites More sharing options...
Kelsenellenelvian Posted December 9, 2012 Share Posted December 9, 2012 As you can CLEARLY see the code does not exist for win 8...Case $VER = "WIN_7"$OS = "Windows 7"Case $VER = "WIN_VISTA"$OS = "Windows Vista"Case $VER = "WIN_XP" $OS = "Windows XP"Case $VER = "WIN_2000" $OS = "Windows 2000"Case $VER = "WIN_98" $OS = "Windows 98"Case $VER = "WIN_ME" $OS = "Windows ME"Case $VER = "WIN_95" $OS = "Windows 95"Case $VER = "WIN_NT4" $OS = "Windows NT4" Link to comment Share on other sites More sharing options...
zuardin Posted December 10, 2012 Share Posted December 10, 2012 As you can CLEARLY see the code does not exist for win 8...Case $VER = "WIN_7"$OS = "Windows 7"Case $VER = "WIN_VISTA"$OS = "Windows Vista"Case $VER = "WIN_XP" $OS = "Windows XP"Case $VER = "WIN_2000" $OS = "Windows 2000"Case $VER = "WIN_98" $OS = "Windows 98"Case $VER = "WIN_ME" $OS = "Windows ME"Case $VER = "WIN_95" $OS = "Windows 95"Case $VER = "WIN_NT4" $OS = "Windows NT4"i hope this ktool can work on windows 8,,i was add on code WIN_8 and not working, so i try the @OSVersion macro: MsgBox (0, "OS Version", @OSVersion),,and "UNKNOWN" Message Appear,, Link to comment Share on other sites More sharing options...
Kelsenellenelvian Posted December 10, 2012 Share Posted December 10, 2012 Add this to the ReturnOSVersion function:Case $VER = "8" $OS = "Windows 8" Link to comment Share on other sites More sharing options...
zuardin Posted December 10, 2012 Share Posted December 10, 2012 thanks,,solved,,i was update autolt version to 3.3.8.1 : Link to comment Share on other sites More sharing options...
BimboGigi Posted January 16, 2013 Share Posted January 16, 2013 Thanks !!!!! It's work !!!!!!!! Link to comment Share on other sites More sharing options...
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