
Sublime
Active Members-
Posts
55 -
Joined
-
Last visited
Everything posted by Sublime
-
Have used the search button havent seen anything. Atleast not anything of any use other than the windows product keys. Product Keys, Email Account Info, Wireless Info .... Identity Theft.... How in the world did you manage to link the two O_o I work for a computer company backing up customer data is well a part of life and can get tedious, in essense thisis...... Essential.. Lol, Anywho guess no one has any input.
-
Well I have gotten tired of using the nirsoft utilities as well most antivirus products detect them as viruses and our customers think they have a virus when a tech accidently forgets to delete the folder when done. I have done some reading as to the storage locations and how the keys are encrypted. My real question is, before I embark on this endeavor to create an application to read and export/backup this information has anyone on this forum already created such a utility to export/backup Wireless Information, IE Stored Passwords, Mail Account Settings & Passwords, Windows Product Key, Office Product Keys. I have already seen the posts and work done for the Windows/Office Product keys and that has offered insight into those. Any advice or tips would be greatly appreciated. Thank you.
-
I think it was clear... But my problem is this.. I managed to dig up something out of the scripts and scraps and example sections.. To Capture/Render an image of the screen. And using GDI+ to create an axis is easy enough.. I just can not wrap my head around whether or not Autoit has the capability to identify shapes... I was thinking if maybe I could identify 1 color shade with a slightly loose method to identify the top than identify the other 2 corners in a similiar fasion, but now I am stuck trying to figure out how to do that. I Just Have This Ominous Feeling I Am Going To Have To Write A UDF for this So I guess my plan of action right now is going to be: ==Capture/Render a BMP of the screen ==Locate Points 1, 2, 3 (Using PixelSearch) ==Measure Pixels Between The Points (Being its an isosceles triangle) ==Find The Direction The Arrow Is Pointing In Based On Those Measurements (Point Adjacent To The Short End) ==Take The Center Of The Short End And Draw A Line From There Extending Through/Past the Point Adjacent ==Measure Pixels Of Bolth That Line and Distance From That Line To X Axis (Giving Me Lengths B and C) ==Do Tan(A)= C / B ==Do ArcTan(A)= "Angle" I Also Am Not Sure If PixelSearch Is Still A Viable Solution Or Not, I Guess I Am Just Going To Have To Code It Out To Find Out. Is There An Easier Way To Do This.... I Guess For Now I Have It Figured Out But I Would Imaging Someone With More Knowledge Than Me, Would Have A Simpler Solution....
-
Goal: A)Identify Mark On Either Screen or a Rendered BMP of the screen B)So I can accertain a triangular angle. I just can not seem to visualize or even come up with a starting point on how to do part A.... part B is easy enough as I already have the code setup to do just that given some minor tweaking based on what I have to do for part a. Hypothetical Example: You got a clock shaped widget on your computer that displays wind speed and direction with a arrow. (LINE B[1-3] IS LAYING DOWN THE CENTER OF SAID ARROW) 90 (3) ----/---\ ---/B----\C(Unknown) --/---------\ (1)=====(2) 0 _____A 270 You kind of get the idea..... Ok Kind Of How I Have This Pictured In My Head.... Take A ScreenShot Draw a cross on it and marked 3 red points. (1, 2, 3) Together they form a triangle. To know the angle (a)formed by the legs 1-2 and 1-3 (wich is the wind angle) we use the tangent formula which is: tan(a)= c / b. Now we need to measure, in pixels, the lenght of c and b and make such division. The result is not the angle yet, but the tangent of the angle. To get the angle you have to calculate the arctan of the previous result. Easy! Lets see: c=3 and b=21. Then 3 / 21 = 0,14285 which is the tangent of the angle. Finaly, arctan(0,14285)= 8 degrees. That's what we were lookin for!!! Here is my question one more time so there is no confusion as to what I am asking >>How exactly could I take my screenshot and lay down a line on it, so the arrow was where line 1-3 in my example above is...... >>Measure That Lines Pixels >>Measure Angles Hypoteneus Pixels If what I am asking for still isnt clear enough I will post a picture or something
-
Could An Admin Delete This... Internet Goofed On Me And Double Posted.... Thanks.
-
Well.. I have looked through this forum to have found many examples of use of the dllcall function but havent really found anything that has brought any light on to the function itself for me.... I have reached a point in my coding to where the examples I keep finding for the things I am trying to do are using this function and I have realised that I just can not wrap my head around this function without some help from someone.... I puzzle on its inner workings.. I just do not understand it.. Could anyone please provide a somewhat pretty enlihgtening link for this function or write a explanation of practical use and how it works...
-
Label From _GUICtrlTreeView_GetSelection
Sublime replied to Sublime's topic in AutoIt General Help and Support
Thx that works great.... I wish I understood more about the DllStruct function but hey.. That can come later on.. -
Label From _GUICtrlTreeView_GetSelection
Sublime replied to Sublime's topic in AutoIt General Help and Support
Well this more or less demonstrates the basic concept of what I am trying to accomplish.... Anyone any thoughts??? I cant get it to properly update the label... I've tried using GuiCtrlSetData also to no avail.... #include <GUIConstantsEx.au3> #Include <GuiTreeView.au3> #include <TreeViewConstants.au3> #include <WindowsConstants.au3> $Form1_1 = GUICreate("Form1", 536, 536, 251, 124) GUISetBkColor(0xDADBE5) Local $iStyle = BitOR($TVS_EDITLABELS, $TVS_HASBUTTONS, $TVS_HASLINES, $TVS_LINESATROOT, $TVS_DISABLEDRAGDROP, $TVS_SHOWSELALWAYS, $TVS_CHECKBOXES) $TreeView1 = GUICtrlCreateTreeView(8, 56, 521, 313, $iStyle, $WS_EX_CLIENTEDGE) _GUICtrlTreeView_BeginUpdate($TreeView1) ;====================================Start GUI Tree#1============================================== $TREE1 = _GUICtrlTreeView_Add($TreeView1, "", "Applications") Local $Applications[10], $Tree1_Item[10] ;Populate Array For $x = 1 To 9 $Random = Random(1, 10, 1) $Applications[$x] = $Random Next For $x = 1 To UBound($Applications) - 1 $Tree1_Item[$x] = _GUICtrlTreeView_AddChild($TreeView1, $TREE1, $Applications[$x], "") Next ;====================================Start GUI Tree#1============================================== _GUICtrlTreeView_EndUpdate($TreeView1) $Group1 = GUICtrlCreateGroup("ITEM DESCRIPTION", 8, 376, 521, 73) $Button1 = GUICtrlCreateButton("EXIT", 216, 456, 113, 25, 0) $Label1 = GUICtrlCreateLabel("GUI FOR TESTING ERRORS", 16, 16, 147, 17) GUISetState(@SW_SHOW) While 1 $Selection = _GuiCtrlTreeView_GetSelection($TreeView1) If $Selection <> 0 Then GUICtrlCreateLabel($Selection, 16, 392) _GUICtrlTreeView_SetSelected($TreeView1, $Selection, False) $Selection = 0 EndIf $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 Exit EndSwitch WEnd -
Label From _GUICtrlTreeView_GetSelection
Sublime replied to Sublime's topic in AutoIt General Help and Support
Well see in my tree I have all the control held by an array and everything works fine the array reads from the ini files fills in nicely reacts to selected items as I am using the checkbox option. I am just adding this to give a bit more explanation on each of the items prior to checking them off as an option. I understand the code there was skimp.... My program is currently 1800 lines of code so to just throw it up would be counteractive to solving the problem as it is just to much... I am currently throwin together a gui of somewhat similarity to what I am trying to do so we can move forward with the problem. Ill be posting the code that demonstrates the error shortly -
EDIT1: SEE POST #4 I have looked around and have found many examples with listboxes and such... But I am trying to create a description label read from an ini file based on the currently selected tree view item. I am trying to get the currently selected TreeView Item... I use _GuiCtrlTreeView_GetSelection... That is dandy.. I Have this in my While loop... $Selection = _GuiCtrlTreeView_GetSelection($AppTree) $Description = _GUICtrlTreeView_GetText(_GuiCtrlTreeView_GetSelection($AppTree)) If $Selection <> 0 Then GUICtrlCreateLabel(IniRead($Descriptions, "Descriptions", $Description, ""), 4, 395) For somereason it just keeps throwin up the descriptions for all items just one after another as if i was clicking on all the items one after another. Then once I actually do click on an item it stops on that items description then the script exits.... I have been going at this thing for about 2 hrs and it drivin me nuts as it should be simple but it just eluding me. Someone elightin me O_o
-
I realize this probably already exists.. But anywho... FYI: look at the 3rd include. All application scripts for install are located in the same directory as INCLUDES.au3 that file simply houses the #include arguments for all of them. Which contains there functions. ;=========================================================================== ;=================================Program Variables============================== ;=========================================================================== #include <File.au3> #include <Array.au3> #include <E:\Auto Progs\AutoIT\Program Functions\INCLUDES.au3> Opt("WinTitleMatchMode", 2) Dim $InstallerSettings = ".\AutoIT\Installer V3.ini" Dim $AutoInstallLog = ".\AutoIT\AutoInstall.dat" Dim $x, $time = 1000, $Run = 0, $ProgramX, $SplitArray[3] Dim $_FileDest = @HomeDrive Dim $_FileDest2 = @ScriptDir Global $Paused ;================================================================================ ;=================================RUNS PROGRAM=================================== ;================================================================================ HotKeySet("{PAUSE}", "TogglePause") HotKeySet("{ESC}", "Terminate") $oShell = ObjCreate("shell.application") $oShell.MinimizeAll Program() Func Program() $Run = 1 If FileExists($AutoInstallLog) Then FileDelete($AutoInstallLog) _FileWriteLog($AutoInstallLog, "*AutoInstall* INI READ INITIATED") $FUNCTION = IniReadSection($InstallerSettings, "Program Functions") _FileWriteLog($AutoInstallLog, "*AutoInstall* Reading INI: Program Functions: Finished Reading with error code of:" & @error) $PROGRAM = IniReadSection($InstallerSettings, "Program File Locations") _FileWriteLog($AutoInstallLog, "*AutoInstall* Program File Locations: Finished Reading with error code of:" & @error) _FileWriteLog($AutoInstallLog, "*AutoInstall* Starting Main Program") _FileWriteLog($AutoInstallLog, "*AutoInstall* Main Program was Initiated") For $x = 1 To $PROGRAM[0][0] $ProgramX = FileDirective($PROGRAM[$x][1]) ToolTip("AutoInstall currently on " & " Function: " & $FUNCTION[$x][1] & " - " & $ProgramX, 0, 0) If Not FileExists($ProgramX) Then Call($FUNCTION[$x][1]) _FileWriteLog($AutoInstallLog, "*AutoInstall* HAS COMPLETED STEP " & $x & " " & $FUNCTION[$x][1]) Else _FileWriteLog($AutoInstallLog, "*AutoInstall* " & "Already Exists:" & $FUNCTION[$x][1] & " - " & $ProgramX) EndIf Sleep($time) Next _FileWriteLog($AutoInstallLog, "*AutoInstall* HAS FINISHED.") $Run = 0 Exit EndFunc ;==>Program Func FileDirective($ProgramFileLocation) While @error = 0 Local $SplitArray = StringSplit($ProgramFileLocation, "*") Local $ProgramX = _ArrayToString($SplitArray, "", 2, 2) $ProgramX = MacroRef($ProgramX) & $SplitArray[$SplitArray[0]] Return ($ProgramX) ExitLoop WEnd EndFunc ;==>FileDirective Func MacroRef($ZogramX) Switch $ZogramX Case "@AppDataCommonDir" $ZogramX = @AppDataCommonDir Case "@DesktopCommonDir" $ZogramX = @DesktopCommonDir Case "@DocumentsCommonDir" $ZogramX = @DocumentsCommonDir Case "@FavoritesCommonDir" $ZogramX = @FavoritesCommonDir Case "@ProgramsCommonDir" $ZogramX = @ProgramsCommonDir Case "@StartMenuCommonDir" $ZogramX = @StartMenuCommonDir Case "@StartupCommonDir" $ZogramX = @StartupCommonDir Case "@AppDataDir" $ZogramX = @AppDataDir Case "@DesktopDir" $ZogramX = @DesktopDir Case "@MyDocumentsDir" $ZogramX = @MyDocumentsDir Case "@FavoritesDir" $ZogramX = @FavoritesDir Case "@ProgramsDir" $ZogramX = @ProgramsDir Case "@StartMenuDir" $ZogramX = @StartMenuDir Case "@StartupDir" $ZogramX = @StartupDir Case "@UserProfileDir" $ZogramX = @UserProfileDir Case "@HomeDrive" $ZogramX = @HomeDrive Case "@HomePath" $ZogramX = @HomePath Case "@HomeShare" $ZogramX = @HomeShare Case "@LogonDNSDomain" $ZogramX = @LogonDNSDomain Case "@LogonDomain" $ZogramX = @LogonDomain Case "@LogonServer" $ZogramX = @LogonServer Case "@ProgramFilesDir" $ZogramX = @ProgramFilesDir Case "@CommonFilesDir" $ZogramX = @CommonFilesDir Case "@WindowsDir" $ZogramX = @WindowsDir Case "@SystemDir" $ZogramX = @SystemDir Case "@TempDir" $ZogramX = @TempDir Case Else ;;; EndSwitch Return ($ZogramX) EndFunc ;==>MacroRef ;========================================================================== ;=================================File Functions================================= ;========================================================================== Func TogglePause() $Paused = Not $Paused While $Paused Sleep(100) ToolTip('AutoInstall "Paused"', 0, 0) WEnd ToolTip("") EndFunc ;==>TogglePause Func Terminate() _FileWriteLog($AutoInstallLog, "*AutoInstall* PANIC KEY PRESSED. EXITING.") Exit 900 EndFunc ;==>Terminate Func OnAutoItExit() _FileWriteLog($AutoInstallLog, "*AutoInstall* Exit with Error Code:" & @error) _FileWriteLog($AutoInstallLog, "*AutoInstall* Exit with Exit Code:" & @exitCode) _FileWriteLog($AutoInstallLog, "*AutoInstall* Exit with Exit Method:" & @exitMethod) EndFunc ;==>OnAutoItExit And the INI FILE: [Program Functions] $FUNCTION[1]=CHKDSK $FUNCTION[2]=DOTNETFX20 $FUNCTION[3]=ATF $FUNCTION[4]=DRIVERAGENT $FUNCTION[5]=PRIMOPDF $FUNCTION[6]=SPYBOT $FUNCTION[7]=ANTIVIRUS $FUNCTION[8]=ADOBE $FUNCTION[9]=OPENOFFICE $FUNCTION[10]=NERO $FUNCTION[11]=DISKKEEPER $FUNCTION[12]=DLLS $FUNCTION[13]=WINDOC $FUNCTION[14]=PICASA $FUNCTION[15]=CPSURL $FUNCTION[16]=SYSTEMRESTORE $FUNCTION[17]=IEPROPERTIES $FUNCTION[18]=DISKCLEANUP $FUNCTION[19]=CALLINGCARD $FUNCTION[20]=ACRONIS [Program File Locations] $PROGRAM[1]=CHKDSK $PROGRAM[2]=DOTNETFX20 $PROGRAM[3]=*@DesktopDir*\ATF-Cleaner.exe $PROGRAM[4]=*@DesktopDir*\driveragent_488.exe $PROGRAM[5]=*@ProgramFilesDir*\activePDF\PrimoPDF\ $PROGRAM[6]=*@DesktopDir*\Spybot - Search & Destroy.lnk $PROGRAM[7]=Antivirus $PROGRAM[8]=*@ProgramFilesDir*\Adobe\Reader 8.0\ $PROGRAM[9]=*@ProgramFilesDir*\OpenOffice.org 3\ $PROGRAM[10]=*@ProgramFilesDir*\Nero\Nero 7\ $PROGRAM[11]=*@ProgramFilesDir*\Diskeeper Corporation\Diskeeper\ $PROGRAM[12]=DLLS $PROGRAM[13]=WinDoc $PROGRAM[14]=*@ProgramFilesDir*\Google\Picasa3\ $PROGRAM[15]=*@DesktopDir*\CPS Fix My Pc.url $PROGRAM[16]=System Restore $PROGRAM[17]=IE Properties $PROGRAM[18]=*@HomeDrive*\CCleaner\ $PROGRAM[19]=*@ProgramFilesDir*\LogMeIn Rescue Calling Card\ $PROGRAM[20]=*@ProgramFilesDir*\Acronis\
-
O_o oh so that how it works.... Not familiar with the Bit functions what so ever.. But that is alot more effecient and I dont have to use the extra variable... Thanks the last snipplet you put out should work perfectly
-
@MDiesel It is binary why no matter how you add up the numbers when you break it down you get the correct options Look: 128 64 32 16 8 4 2 1 <---- The numbers were using for adding 0 0 0 0 0 0 0 0 <---- Just now if you picked the number above it just like putting a 1 below that number 1 option1 2 option2 4 option3 8 option4 16 option5 32 option6 64 option7 Anotherwords 69 is 01100011 in binary another words as per my example earlier options 7, 6, 2, and 1 would run On a side note This is kind of what I am going to be using. I am not on a computer with Scite or even autoit so cant test it. Dim $oArray, $count = 0 Local $code = 85 Local $Remainder = $code For $y = 6 to 0 Step -1 Local $x = 2^$y If BitAND($Remainder,$x) Then $oArray[$count] Local $Remainder = $code - $x $count += 1 Next End //EDIT I didnt see your repost WeaponX. Would BitSHIFT work for shifting by exponents?
-
Thanks WeaponX That should work perfectly Much appreciated.
-
See the thing is.... What i wrote was just an example... There are 108 options total so to write a function to start at 2^108 and down one by one is fairly well just doesnt work
-
Alright well I have searched up and down these forums looking for anything to point me in the right direction and can not find anything.... How would I go about creating a function that would take a number and break it down.... for instance 1 option1 2 option2 4 option3 8 option4 16 option5 32 option6 64 option7 Say you wanted to run your script with options 1, 3, and 7 so you would just add together there numbers and use those numbers as the switch for example Run("Example.exe" & " /69") Your script than would run options 1, 3 ,7 I have played with the idea and I searched all around the forums for any udfs or other topics that this may have been covered.
-
.... well that might be the problem........ well I think I may be just a tid bit tired O_o I think it is time to get some sleep and takle this in the morning
-
Welp..... I think it is just me or something but I am trying to make a simple script to see if there is an updated version of the antivirus installer before continuing with the install. Here is the code I used to test the results for the FileGetVersion $file3 = FileGetSize("http://consumerdownloads.ca.com/consumer/apps/iss3_en.exe") MsgBox(0, "test", $file3) Here is the actual function I am using Func CAISS2007_Installer_Full_Version() $file1 = FileGetVersion(".\iss3_en.exe") $file3 = FileGetVersion("http://consumerdownloads.ca.com/consumer/apps/iss3_en.exe") Select Case $file1 = $file3 CAISS2007_Installer_Full() Case $file3 = "0.0.0.0" CAISS2007_Installer_Full() Case $file1 <> $file3 And $file3 <> "0.0.0.0" $NewVersionFull = MsgBox(3, "Udated Installation File", "There is a newer installation file out would you like to download it? If you would like to continue without updating press 'NO'.") EndSelect It is not exactly a finished function but I do not like to continue things unless it works up to the point I am at. Anywho the problem is that no matter what the my $file3 result always comes back '0.0.0.0' Anyone have a way to fix this or a workaround?
-
Automated Application Installer
Sublime replied to joshiieeii's topic in AutoIt General Help and Support
do you think you can do us all a favor and change your [ code] tags to [ codebox] tags. Thx. page was taking forever to open so I hit stop o_O not really sure if this post is even guna go through. -
first post - program for work
Sublime replied to pounders's topic in AutoIt General Help and Support
I have made a similar program and still am except it is far more complicated all I did to overcome this without chaning to much as make an array for all your programs that could be run at once than set values for each than when your process starts have it right to its variable say the key running with the value 1 than simply code the next to check to c if anything is set as running. Though I do not know why you said runwait is not working as that has workd for me I just did the above as a backup measure incase there are anyproblems with runwait. I didn't spend much time looking at your code as I am extremely tired and would probably rewrite sumthing wrong so. But anywho that is my suggestion or you could have it just write values to a ini in the temp dir and set the attribs to it hidden. Just another thought as they say there is more than 1 way to skin a cat. -
Yes I know you cant thats understandable was just letting you know it didnt work on yet another but I decided to spend just a tad bit of time looking at where it is having errors and trying to figure out why it is. I have figured out some of them its called the Function "iniwrite" it screws up on every single one of those so far. It comes up with this for every instance of iniwrite ERROR: $FEA76BD341F960FE: undeclared global variable. offcourse the obfuscation variable is different for each. Ill tell you what esle as I get more time to spend on fixing the simple little issues as I get more free time to do so. As I would like to use it on my script. Anywho I love it and the idea behind it. BTW just out of curiosity havnt yet tried it on any of my other scripts can you run this multiple times on the same script to add more and more obfuscation?
-
Just to let you know it gave me more errors than I could count: 59 is when I decided to stop counting. My script is 4863 lines of code and about 259kb in size. I read about the first 5 pages of this and none of that applies to what is in my script. Anywho love the idea just doesnt work for me. And I have so much code written I just do not feal sifting through it after printing pages of it to try and find and correct the incompatabilities in my script and your obfuscation method. On a side note it has workd on all my small scripts Love it.
-
?? would this INI be random or would it be the same as always and to answer your question yes it would but unless you code autoit to deal with an ini and to read it and react it would have to be of similar guide lines regardless of what it is. If it would be the same ini each time just use hte FileInstall("") function but my impression of what you have said is that this is not the case. Also why would you want to parse an INI? unless it is to allow for expandability without having to recode and have the script adjust based on the settings specified in the ini. It would help more if you could explain on the purpose and give a "short" scenario to illaborate on what you are asking.
-
Just out of curiosity what does this have to do with autopatcher? Considering from what I know about the program you dont have to download anything but the main program and from there it does the rest or are you speaking to making your own program similar to autopatcher?
-
How do you add command line parameters to your compiled autoit executable. I have searched through the forums and could not find anything, I know its out thr sumwhere considering I have seen it done on quite a few scripts around here.