JayHawkfl

this is a combination of my ping set up and cmd line pull from below. I probably still have some extraneous lines in here from my last version but it works. I will fine tune it in the coming weeks, but I gotta get this project started before my bosses rip me up. Thanks for the help @francescodimuro #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Outfile=QuickInv0_1.exe #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** ;This will grab information from the network from our network spread sheets ;Things to clean up ;After the second while loop, the ip results array will be larger then needed. https://www.autoitscript.com/forum/topic/132027-array-delete-blank-element/ Hannes08 had a good idea posted august 18 of 2011 ;Add 30 second timer after the msgbox indicating timer #include <Array.au3> ; Required for _ArrayDisplay only. #include <AutoItConstants.au3> #include <ButtonConstants.au3> #include <EditConstants.au3> #include <File.au3> #include <GUIConstantsEx.au3> #include <Inet.au3> #include <MsgBoxConstants.au3> #include <StaticConstants.au3> #include <WinAPIFiles.au3> #include <WindowsConstants.au3> Global $VersionNumber = "1.0" Global $varArp ;store results from Arp CMD Global $arrayArp Global $sFilePath = @ScriptDir ; Search the current script directory. Global $localIP = @IPAddress1 Global $varOctet1 Global $varOctet2 Global $varOctet3 Global $varOctet4 Global $i = 151 ;counter Global $m = 1 ;secondary counter Global $IParray[8] = ['192','168','200','21'] Global $pingTestResult[255] Global $IPListArray[255] Global $deviceName[0] Global $filePathExcel = @ScriptDir& "\_netExport.html" Global $deviceNameStorage = '' Global $sClientName = "10.70.140.21" Global $sUserID = 0 Global $sPassword = 0 Global $sOutput = "" Global $iniPath = @ScriptDir&'\NetworkDiscovery.ini' Global $sWMICquery = "Test" Global $proceedOrCancel Global $adminAccount = "aaaa" Global $adminPassword = "aaa" Global $inilist = 0 $proceedOrCancel = MsgBox(17,"Warning",'This will delete any previous Network scans in the '& @ScriptDir&' OK to proceed, cancel to exit and save previous data elsewhere.') If $proceedOrCancel <> 1 Then Exit EndIf FileDelete($iniPath) TCPStartup() If $localIP = "127.0.0.1" Then MsgBox(0,"Invalid IP for this application","The IP address is a loopback Address. Please enter IPv4 address manually") Run(@ComSpec &' /k ipconfig') Sleep(250) ;MsgBox(0,"",$localIP) $Form1 = GUICreate("IP Input", 485, 178, 192, 124) $Input1 = GUICtrlCreateInput("192", 32, 64, 121, 21) $Input2 = GUICtrlCreateInput("168", 168, 64, 121, 21) $Input3 = GUICtrlCreateInput("200", 304, 64, 121, 21) $Button1 = GUICtrlCreateButton("You got it", 96, 128, 235, 25) $Label1 = GUICtrlCreateLabel("X", 435, 68, 14, 17) $Label2 = GUICtrlCreateLabel("Please enter the First three octets from the IPv4 address, with out any '.'", 48, 32, 347, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 $varOctet1 = GUICtrlRead($Input1) $varOctet2 = GUICtrlRead($Input2) $varOctet3 = GUICtrlRead($Input3) GUIDelete($Form1) ExitLoop EndSwitch WEnd EndIf $localIPString = IsString($localIP) If $localIPString <> 1 Then MsgBox(0,"","Making an adjustment, one moment.",1) $localIP = String($localIP) Sleep(750) MsgBox(0,"","Done, lets keep moving.",1) EndIf FileCopy(@ScriptDir&'\config.ini','\\masterpc\C$\scripts',1) $IParray = StringSplit($localIP,'.',3) $varOctet1 = $IParray[0] $varOctet2 = $IParray[1] $varOctet3 = $IParray[2] $varOctet4 = $IParray[3] PingAll() ResetTimers() while $i <254 $IPtoPing = $varOctet1&'.'&$varOctet2&'.'&$varOctet3&'.'&$i $pingtemp = Ping($IPtoPing,15) if $pingtemp <> 0 Then $IPListArray[$m] = $pingtemp $pingTestResult[$m] = $IPtoPing $sIp = TCPNameToIP($IPtoPing) $sResult = _TCPIpToName($sIp) IniWrite($iniPath,$sResult,'IP Address',$IPtoPing) $iniStorage = $sResult&'Discovered.ini' _ArrayAdd($inilist,$iniStorage) _ArrayAdd($deviceName,$sResult) $sClientName = $IPtoPing $domain = @LogonDNSDomain RunWait(@ComSpec & ' /c ' & 'wmic /node:' & $sClientName &' bios get serialnumber > %temp%\serial.txt' ,"", @SW_HIDE) $file=(@TempDir & "/serial.txt") $fileread= FileRead($file) IniWrite($iniPath,$sResult,'',$fileread) ;MsgBox(0, $sClientName , $fileread) FileDelete(@TempDir & "/serial.txt") $m = $m + 1 EndIf $i = $i + 1 WEnd Func ResetTimers() $i = 1 $m = 1 EndFunc func PingAll() $IPtoPing = $varOctet1&'.'&$varOctet2&'.'&$varOctet3&'.'&$i While $i <> 256 $IPtoPing = $varOctet1&'.'&$varOctet2&'.'&$varOctet3&'.'&$i Ping($IPtoPing,5) $i = $i+1 WEnd EndFunc

Edit - I think I got it, give me 20 minutes to make my changes I had it. I got it working, and then I changed something and now I don't know what I've done. I've tried it with and without the ' /c'. I think that part needs to be out for what ever reason. I got it to work with a cmd line export. RunWait(@ComSpec & 'wmic /node:' & $sClientName &' bios get serialnumber > c:\users\abs\desktop\'&$sClientName&' serial.txt',"", @SW_HIDE) But it's giving me 0 error codes again. $sWMICquery ="wmic /node:" & $sClientName & " bios get serialnumber" MsgBox(0,'',$sWMICquery) ;$sWMICquery = "wmic bios get serialnumber" Local $iPID = RunWait(@ComSpec & ' /c' & $sWMICquery,"",@SW_SHOW) MsgBox(0,'153',$iPID) While ProcessExists($iPID) $sOutput = StdoutRead($iPID) WEnd MsgBox(0,'157',$iPID) I'll keep going on it shortly, I just gotta walk away from this for a minute. Thanks again for any and all help.

Hello friends, Long time no see, sorry I've been gone, and only come back when I need help. I'm trying to grab serial numbers to help with inventory. We have multiple locations with 4 to 14 devices. Inventory has never been a high priority, but I was hired to try to tackle it. I am getting a error code of 0, which I believe means the cmd didn't run successfully. $sclientname comes from a ping test that part is working. $admin account and password comes from a gui input. I've tested that those are good as well. So I'm doing something wrong with my send. Maybe @comspec would work better? I tried it, and I'm getting the same issue. I'm missing something here. Thanks for any help provided, please let me know if more code is needed to work through this. $domain = @LogonDNSDomain ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; $sWMICquery = "wmic /node:" & $sClientName & " /user:" & $adminAccount & " /password:" & $adminPassword & " bios get serialnumber /format:value" Local $iPID = RunAs($adminAccount,$domain,$adminPassword,2,'cmd.exe',$sWMICquery)

Super simple super quick script I made to randomize teams for mixed doubles. Haven't coded for a while so it felt good to write anything. #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <SliderConstants.au3> #include <WindowsConstants.au3> #include <MsgBoxConstants.au3> #include <Array.au3> #include <Excel.au3> Local $arraySize = 2 local $array1[50] = ["Doug","Julio"] local $array2[50] = ["Hannah","Sheila"] Local $oBook #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Doubles Team Mixer", 615, 438, 192, 124) $Bachround = GUICtrlCreatePic("C:\Users\a607150\Pictures\2.jpg",0,0,615,438) $Input1 = GUICtrlCreateInput("", 64, 128, 121, 175) $Input2 = GUICtrlCreateInput("", 364, 128, 121, 175) $Button1 = GUICtrlCreateButton("Serve",216,140,121,42) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 $array1 = GUICtrlRead($input1) $array1 = StringSplit($array1,",") $array2 = GUICtrlRead($input2) $array2 = StringSplit($array2,",") _ArrayDelete($array1,0) _ArrayDelete($array2,0) _ArrayShuffle($array2) $oBook = _Excel_Open(Default, Default, Default, Default, True) $oWorkBook = _Excel_BookNew($oBook, 1) _Excel_RangeWrite($oWorkBook,$oWorkBook.activesheet,"Guys","A1") _Excel_RangeWrite($oWorkBook,$oWorkBook.activesheet,"Gals","B1") _Excel_RangeWrite($oWorkBook,$oWorkBook.activesheet,$array1,"A2") If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeWrite Example 2", "Error writing $array1 to worksheet." & @CRLF & "@error = " & @error & ", @extended = " & @extended) _Excel_RangeWrite($oWorkBook,$oWorkBook.activesheet,$array2,"B2") EndSwitch WEnd

I see so I didn't convert it properly. Thanks Everyone

#include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form2 = GUICreate("Form1", 1409, 694, 190, 122) $Pic1 = GUICtrlCreatePic("C:\Users\Unity\Documents\remember wanting to shave\Apartment.bmp", 8, 8, 908, 476) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd I'm using Autoit to make a game and I need to display pictures of what going on in this 2d story thing I've tried a few diffrent things resizing both the file and the gui and the the GUICtrlCreatePic i've tried all the supported file extensions and double and triple checked my file path. What am I doing wrong here.... Attached pic Apartment.bmp

You create a second variable. You can call it what ever you want

Your telling autoit that the first window is $oIE and so when you say $oIE.quit it closes the first window Name the second window something else like $SecondIE or $NotoIE

So your code snipet is this Const $ie_new_in_tab=0x0800 $oIE = _IECreate("http://www.autoitscript.com") $oIE.Navigate("http://www.autoitscript.com/forum/", $ie_new_in_tab) $oIE.Quit The second line $oIE = is the important part. You've said I want this IE window to be marked as this variable $oIE so when in your last line you say $oIE.Quit your telling autoit to close that first window you specified to be the variable $oIE The second window you open DOES NOT have a variable name for you to tell autoit that you want to close it. You need to tell autoit what the second window is called before you can do anything with it.

Disclaimer, it's been a year since I fixed this for on of my programs This is windows security stuff, I had the same issue with a few of my programs, you need to run the program from an admin account or just be signing in as as admin to make it work. I think that's how I fixed it, like I said it's been a while

Looks like even though you navigated to the new /forums page $oIE is still set to autoitscript.com so to close out the new game you need to specify it a variable and tell autoit to close that $var

So I skyped my brother in to a board game session with my tablet so I could move the cam around easy to show him the board. Now, because he is pretty familur with the game it went pretty well, but he was frustrated that he couldn't keep up with his own Char or roll dice so I did this #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form=c:\dev\augment house on the hill\form1.kxf $Form1_1 = GUICreate("Betrayal at House on the Hill", 506, 539, 192, 124) $rollSpeed = GUICtrlCreateButton("Roll", 358, 244, 75, 25) $rollMight = GUICtrlCreateButton("Roll", 358, 304, 75, 25) $rollSanity = GUICtrlCreateButton("Roll", 358, 369, 75, 25) $rollKnowledge = GUICtrlCreateButton("Roll", 358, 432, 75, 25) $rollHaunt = GUICtrlCreateButton("Test Your Fate", 354, 488, 83, 25) $labelCharName = GUICtrlCreateLabel("Ox Bellows", 16, 16, 162, 41) GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif") $labelAge = GUICtrlCreateLabel("Age: 23", 15, 72, 69, 28) GUICtrlSetFont(-1, 16, 400, 0, "MS Sans Serif") $labelHeightWeight = GUICtrlCreateLabel("Height: 6'4'' Weight: 288lbs", 15, 105, 234, 28) GUICtrlSetFont(-1, 16, 400, 0, "MS Sans Serif") $labelHobbies = GUICtrlCreateLabel("Hobbies: Football, Shiney Objects", 15, 143, 289, 28) GUICtrlSetFont(-1, 16, 400, 0, "MS Sans Serif") $labelBirthday = GUICtrlCreateLabel("Birthday: October 18th", 15, 182, 189, 28) GUICtrlSetFont(-1, 16, 400, 0, "MS Sans Serif") $labelSpeed = GUICtrlCreateLabel("Speed", 10, 241, 60, 28) GUICtrlSetFont(-1, 16, 400, 0, "MS Sans Serif") $Pic1 = GUICtrlCreatePic("C:\Dev\Augment House on the Hill\ox_Face.jpg", 304, 16, 116, 108) $labelMight = GUICtrlCreateLabel("Might", 10, 305, 50, 28) GUICtrlSetFont(-1, 16, 400, 0, "MS Sans Serif") $labelSanity = GUICtrlCreateLabel("Sanity", 10, 369, 54, 28) GUICtrlSetFont(-1, 16, 400, 0, "MS Sans Serif") $resultSpeed = GUICtrlCreateLabel("0", 457, 240, 22, 33) GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif") $resultMight = GUICtrlCreateLabel("0", 457, 300, 22, 33) GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif") $resultSanity = GUICtrlCreateLabel("0", 457, 365, 22, 33) GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif") $resultKnowledge = GUICtrlCreateLabel("0", 457, 428, 22, 33) GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif") $LabelHaunt = GUICtrlCreateLabel("Will the haunt begin with you? ", 14, 487, 257, 32) GUICtrlSetFont(-1, 12, 800, 2, "Segoe Print") $resultHaunt = GUICtrlCreateLabel("0", 457, 484, 22, 33) GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif") $labelKnowledge = GUICtrlCreateLabel("Knowledge", 10, 433, 91, 24) GUICtrlSetFont(-1, 13, 800, 0, "MS Sans Serif") $GroupSpeed = GUICtrlCreateGroup("", 112, 224, 233, 57) $Radio1 = GUICtrlCreateRadio("", 132, 254, 17, 17) $Radio2 = GUICtrlCreateRadio("", 157, 254, 17, 17) $Radio3 = GUICtrlCreateRadio("", 182, 254, 17, 17) $Radio4 = GUICtrlCreateRadio("", 207, 254, 17, 17) $Radio5 = GUICtrlCreateRadio("", 232, 254, 17, 17) GUICtrlSetState($Radio5, $GUI_CHECKED) $Radio6 = GUICtrlCreateRadio("", 257, 254, 17, 17) $Radio7 = GUICtrlCreateRadio("", 282, 254, 17, 17) $Radio8 = GUICtrlCreateRadio("", 307, 254, 17, 17) $Label1 = GUICtrlCreateLabel("2", 134, 237, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label2 = GUICtrlCreateLabel("2", 160, 237, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label3 = GUICtrlCreateLabel("2", 184, 237, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label4 = GUICtrlCreateLabel("3", 209, 237, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label7 = GUICtrlCreateLabel("5", 284, 237, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label5 = GUICtrlCreateLabel("4", 233, 237, 12, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label6 = GUICtrlCreateLabel("5", 259, 237, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label8 = GUICtrlCreateLabel("6", 309, 237, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") GUICtrlCreateGroup("", -99, -99, 1, 1) $GroupMight = GUICtrlCreateGroup("", 112, 288, 233, 57) $Radio9 = GUICtrlCreateRadio("", 132, 318, 17, 17) $Radio10 = GUICtrlCreateRadio("", 157, 318, 17, 17) $Radio11 = GUICtrlCreateRadio("", 182, 318, 17, 17) GUICtrlSetState($Radio11, $GUI_CHECKED) $Radio12 = GUICtrlCreateRadio("", 207, 318, 17, 17) $Radio13 = GUICtrlCreateRadio("", 232, 318, 17, 17) $Radio14 = GUICtrlCreateRadio("", 257, 318, 17, 17) $Radio15 = GUICtrlCreateRadio("", 282, 318, 17, 17) $Radio16 = GUICtrlCreateRadio("", 307, 318, 17, 17) $Label9 = GUICtrlCreateLabel("4", 134, 301, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label10 = GUICtrlCreateLabel("5", 160, 301, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label11 = GUICtrlCreateLabel("5", 184, 301, 12, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label12 = GUICtrlCreateLabel("6", 209, 301, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label15 = GUICtrlCreateLabel("8", 284, 301, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label13 = GUICtrlCreateLabel("6", 233, 301, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label14 = GUICtrlCreateLabel("7", 259, 301, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label16 = GUICtrlCreateLabel("8", 309, 301, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") GUICtrlCreateGroup("", -99, -99, 1, 1) $GroupSanity = GUICtrlCreateGroup("", 111, 352, 233, 57) $Radio17 = GUICtrlCreateRadio("", 131, 382, 17, 17) $Radio18 = GUICtrlCreateRadio("", 156, 382, 17, 17) $Radio19 = GUICtrlCreateRadio("", 181, 382, 17, 17) GUICtrlSetState($Radio19, $GUI_CHECKED) $Radio20 = GUICtrlCreateRadio("", 206, 382, 17, 17) $Radio21 = GUICtrlCreateRadio("", 231, 382, 17, 17) $Radio22 = GUICtrlCreateRadio("", 256, 382, 17, 17) $Radio23 = GUICtrlCreateRadio("", 281, 382, 17, 17) $Radio24 = GUICtrlCreateRadio("", 306, 382, 17, 17) $Label17 = GUICtrlCreateLabel("2", 133, 365, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label18 = GUICtrlCreateLabel("2", 159, 365, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label19 = GUICtrlCreateLabel("3", 183, 365, 12, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label20 = GUICtrlCreateLabel("4", 208, 365, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label23 = GUICtrlCreateLabel("6", 283, 365, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label21 = GUICtrlCreateLabel("5", 232, 365, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label22 = GUICtrlCreateLabel("5", 258, 365, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label24 = GUICtrlCreateLabel("7", 308, 365, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") GUICtrlCreateGroup("", -99, -99, 1, 1) $GroupKnowledge = GUICtrlCreateGroup("", 111, 416, 233, 57) $Radio25 = GUICtrlCreateRadio("", 131, 446, 17, 17) $Radio26 = GUICtrlCreateRadio("", 156, 446, 17, 17) $Radio27 = GUICtrlCreateRadio("", 181, 446, 17, 17) GUICtrlSetState($Radio27, $GUI_CHECKED) $Radio28 = GUICtrlCreateRadio("", 206, 446, 17, 17) $Radio29 = GUICtrlCreateRadio("", 231, 446, 17, 17) $Radio30 = GUICtrlCreateRadio("", 256, 446, 17, 17) $Radio31 = GUICtrlCreateRadio("", 281, 446, 17, 17) $Radio32 = GUICtrlCreateRadio("", 306, 446, 17, 17) $Label25 = GUICtrlCreateLabel("2", 133, 429, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label26 = GUICtrlCreateLabel("2", 159, 429, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label27 = GUICtrlCreateLabel("3", 183, 429, 12, 20) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") $Label28 = GUICtrlCreateLabel("3", 208, 429, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label31 = GUICtrlCreateLabel("5", 283, 429, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label29 = GUICtrlCreateLabel("5", 232, 429, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label30 = GUICtrlCreateLabel("5", 258, 429, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") $Label32 = GUICtrlCreateLabel("6", 308, 429, 11, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd I haven't done any of the coding to make the dice roll work but that wont be hard So HERE is the question, The game uses sliders on the side of the Charecter card and I wanted to use the slider we have but the numbers on the side of the card are not in a regular order. If you don't want to run or dig through the code, this is the order for one of that stats, Speed - 2,2,2,3,4,5,5,6 so that Char starts with his speed at 4 and based on what happens his speed can get better or worse. Is there a way to make the slider display 8 numbers in any config or order? This is the link to a picture of the cards '> Also this game is EPIC! if anyone wants a run down of the game youtube table flip- betrayal at house on the hill it really is a lot of fun.

I've been running hardware calls all day. I'll try this the next time I get a minute. Thank you for the quick responce

I wrote a program to automate the tickets at the office. My problem is, I'm using ClipPut to make the process faster, and 1 in every 10 to 15 lines it pastes I just get a letter "v" or, I get what ever is in the users clipboard at that moment. The reason that is such a large issue is sometimes the program could need to put out 30 lines of text, and if the program throws bad text the user will have to 1 notice and 2 go reenter their parameters. I'll list my attempts in the code box. Func SendFast($ClipVar) $UserClipBoard = ClipGet() ClipPut($ClipVar) Send("{CTRLDOWN}") Send("v") Send("{CTRLUP}") Send("{ENTER}") ClipPut($UserClipBoard) EndFunc Func SendFast($ClipVar) $UserClipBoard = ClipGet() ClipPut($ClipVar) Send("{CTRLDOWN}v") Send("{CTRLUP}") Send("{ENTER}") ClipPut($UserClipBoard) EndFunc Func SendFast($ClipVar) $UserClipBoard = ClipGet() ClipPut($ClipVar) Send("^v") Send("{ENTER}") ClipPut($UserClipBoard) EndFunc Is there a more reliable way to send the paste command?

I use that function for a game I built for my boy, and it seems to work alright. Good luck, keep us posted

Are you trying to get the brand name/model of the CPU. What do you mean by name? Edit: Running on that assumption, I did a little digging and found the CPU info in the registry, you can also do a regread to pull that info out. You'll have to do something to confirm the file path for Win7, Win8, and WinXP but there might be a cleaner way to do it. I'm at work so I can only put so much time towards this.

That's a really cool idea. I can't work on this at work, but I'll put my mind to this when I get home

Hate to necro a post, but I hate not giving credit where it's due more. This worked like a charm. Thank you

The language is hokey. Example: how you declare a variable, depends on what your using it for. If it's going to be in a loop its done one way, if your using it for comparison, like a if/then statement its done a different way.

Do not do AutoHotKey. Autoit will work, but even if you don't use Autoit, for your own sake, anything other then AutoHotKey.

Have you tried GUISetState(@SW_ENABLE, $Gui1) GUISetState(@SW_ENABLE, $Gui2)

This maybe be just unnecessary lines of code but normally it I'm going to compare two things, I use String($input) or Number($input) before I make the comparison, just to be 100% sure. Some of the code I write with has to transition between the two. Does the required math then sends so... might be worth doing

I didn't have my full thoughts together, but apparently I'm off base any way. I'll tinker with it and get back to you

Which of these three will be the most reliable or which would be the "primary" varable. You can compare the other two to the most "stable" or "reliable" one and get the results you want. It would look like If $host_Count and $ip_Count = $pw_Count Then

Works like a dream, Showed it to the other programmer at the office, and we're thinking about swapping out the program we use to retreive keys from our remote sites with this.