Jump to content

MikahS

Active Members
  • Posts

    1,513
  • Joined

  • Last visited

Reputation Activity

  1. Like
    MikahS got a reaction from AnonymousX in How to loop through all sheets in a workbook   
    Have a look at _Excel_SheetList
  2. Like
    MikahS got a reaction from TheDcoder in AuPad - Notepad in AutoIt ; Updated - Oct 26th, 2015   
    ---==== 1.9.5 ====---
    - Fixed crash when selecting AutoIt Help
    - Set version number as 1.9.5
    - Updated version history
  3. Like
    MikahS reacted to Bert in Could I get a program created please?   
    The best way to think of this forum is simple. It is a classroom. Not a take away restaurant.
    You came in here to order food, not learn. We don't have food here. We teach people.
     
  4. Like
    MikahS reacted to minxomat in The open source programming language Perseus - Wanna join the project?   
    I have no idea what this is supposed to mean. 
  5. Like
    MikahS got a reaction from Maarten90 in WM_Notify with multiple listviews   
    Thank you for including the script. I shall have a look and let you know what I find.
  6. Like
    MikahS got a reaction from Maarten90 in WM_Notify with multiple listviews   
    It looks like you didn't get the handle for the second ListView like you did for your first one. 
    P.S. a testable script would be nice, too. 
     
  7. Like
    MikahS reacted to mLipok in AuPad - Notepad in AutoIt ; Updated - Oct 26th, 2015   
    You are welcome.
    My friend.
     
  8. Like
    MikahS reacted to guinness in Starting out in JavaScript and coming from PHP?   
    Just came across this library on GitHub and just thought how awesome it was that I had to tell the community.
    PHPJS: https://github.com/kvz/phpjs
  9. Like
    MikahS reacted to minxomat in The open source programming language Perseus - Wanna join the project?   
    And another one joined. Cool.
    I'd say I'll be finished setting things up by next weekend (7+ Aug.). I'll send a message to everyone when we're ready to go.
  10. Like
    MikahS reacted to Jon in Windows 10 release 29th of July   
    Just using the tool now to download Windows 10 Pro to my games machine. Doesn't matter if that goes wrong - there's no data on it. 
    Quick download. I read that Microsoft had reserved 40 TB/s of CDN bandwidth for today. 
    It's slower writing the download to my USB than it was downloading. I need to get some faster USBs  
  11. Like
    MikahS reacted to jvanegmond in Windows 10 release 29th of July   
    You can now manually initiate the update by going here: https://www.microsoft.com/en-us/software-download/windows10
  12. Like
    MikahS got a reaction from Voltaire in [NOOB QUESTION] Variable must be of type "Object   
    Seemed _StringBetween was objecting to this: '_regular">'
    Try this:
    #include <String.au3> $sourcec = BinaryToString(InetRead('https://leakforums.net/forum-536', 1)) $FirstChunk = _StringBetween($sourcec, 'forumdisplay', '</a>') For $a In $FirstChunk ConsoleWrite($a & @CRLF) Next 
  13. Like
    MikahS got a reaction from Cyborg5000 in Cannot use _GUICtrlEdit_SetText for 3-4 inputs..   
    A while loop is an event loop. Meaning that it is looking for events on the GUI. If you're trying to autofill these values before there has been an event on the GUI, then you need to fill them before going into the loop, like so:
    #include <GUIConstants.au3> #include <GUIEdit.au3> #Region ### START Koda GUI section ### Form=c:\users\slingaya\desktop\system.kxf Local $System = GUICreate("BIOS", 652, 222, 194, 129, BitOR($GUI_SS_DEFAULT_GUI, $WS_MINIMIZE)) Local $Sysname = GUICtrlCreateLabel("System Name", 16, 8, 100, 20, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") Local $Sysbiosver = GUICtrlCreateLabel("System BIOS Version", 16, 104, 151, 20, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") Local $biosreldt = GUICtrlCreateLabel("BIOS Release Date", 16, 72, 139, 20, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") Local $model = GUICtrlCreateLabel("System Model", 16, 40, 102, 20, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") Local $dellavlbi = GUICtrlCreateLabel("Available Dell Bios Version", 16, 136, 194, 20, -1, BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") Local $Checkbox1 = GUICtrlCreateCheckbox("Download", 488, 136, 105, 33, $BS_CHECKBOX) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") Local $Button1 = GUICtrlCreateButton("Download and FLASH", 488, 168, 145, 41, $BS_DEFPUSHBUTTON) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") Local $Progress1 = GUICtrlCreateProgress(272, 176, 172, 25, BitOR($PBS_SMOOTH, $WS_BORDER), BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) Local $Button2 = GUICtrlCreateButton("Check BIOS Status", 488, 8, 145, 33, $BS_DEFPUSHBUTTON) GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif") Local $sysmodel = GUICtrlCreateInput("", 272, 40, 177, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_CENTER), BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) Local $Biorlsdt = GUICtrlCreateInput("", 272, 72, 177, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_CENTER), BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) Local $sysbiover = GUICtrlCreateInput("", 272, 104, 177, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_CENTER), BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) Local $Avdlbiovr = GUICtrlCreateInput("", 272, 136, 177, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_CENTER), BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) Local $sysnamd = GUICtrlCreateInput("", 272, 8, 177, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_CENTER), BitOR($WS_EX_CLIENTEDGE, $WS_EX_STATICEDGE)) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### Local $compname = @ComputerName Local $sysmod = RegRead("HKLM64\HARDWARE\DESCRIPTION\System\BIOS", "SystemProductName") Local $biorldt = RegRead("HKLM64\HARDWARE\DESCRIPTION\System\BIOS", "BIOSReleaseDate") _GUICtrlEdit_SetText($sysmodel, $sysmod) _GUICtrlEdit_SetText($sysnamd, $compname) _GUICtrlEdit_SetText($Biorlsdt, $biorldt) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Sysname Case $Sysbiosver Case $biosreldt Case $model Case $dellavlbi Case $Checkbox1 Case $Button1 Case $Button2 Case $sysmodel _GUICtrlEdit_SetText($sysmodel, $sysmod) Case $Biorlsdt Case $sysbiover Case $Avdlbiovr Case $sysnamd _GUICtrlEdit_SetText($sysnamd, $compname) EndSwitch WEnd  
  14. Like
    MikahS got a reaction from Scrappy53 in Upload File With WinHTTP   
    Have a look at this topic: link
    Otherwise, give it a try and post what you've come up with. 
  15. Like
    MikahS got a reaction from MuffinMan in ControlClick Call   
    Put #RequireAdmin at the top, as this program might require Administrative credentials to be automated.
  16. Like
    MikahS reacted to guinness in How do I get my mouse cursor trap inside a app?   
    Just did a bit of "spring cleaning" on that example. Expect an update in the next beta (no deadline currently set).
  17. Like
    MikahS reacted to Melba23 in Wannabee Mods   
    Hi,
    A number of recent threads have degenerated into discussions between no doubt well-meaning members over the legality of the question asked - such spats are both unseemly and unnecessary. If you have not already noticed, there is a Moderation team charged by the site owner with keeping the site running smoothly in accordance with his wishes - so please leave the decisions to them.
    If the question is obviously illegal, then perhaps the first responder might point at the Forum rules as well as reporting the thread so that normal moderation action can be taken. But if there is any doubt, please still report the thread, but do NOT get involved in pointless discussions as to whether or not it is allowable - the Moderation team will make the final decision and will not be swayed by any other opinions, so save the wear on typing fingers and keyboards. In particular, if a Moderation team member has already posted permitting the thread to continue, it is completely out of order for a third party to post again questioning the decision - from now on this will be regarded as an unfriendly act and is likely to attract sanctions upon the wannabee-Mod. If there is really a burning need to discuss the matter further, please do so by PM - the Moderation team do not bite and are open to reasoned debate.
    M23
     
  18. Like
    MikahS got a reaction from stealth in [SOLVED] Enable Checkbox only when another check box is checked   
    I added some comments to show what I did:
    #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <StaticConstants.au3> #include <EditConstants.au3> ;#include <MsgBoxConstants.au3> AutoItSetOption("SendKeyDelay", 50) ;Opt("SendKeyDelay", 5) Global $iCount, $InputCatNo While 1 _Animal() Run("notepad.exe") WinWaitActive("Untitled - Notepad") If $iCount <> "" Then Send($iCount & "{ENTER}") ExitLoop WEnd Func _Animal() $aAnimal = GUICreate("Animals", 342, 273, 509, 166) $CBcCats = GUICtrlCreateCheckbox("Cats?", 115, 25, 97, 25) $LblCat = GUICtrlCreateLabel("Number of Cats", 32, 54, 113, 23, $SS_RIGHT) GUICtrlSetState($LblCat, $GUI_DISABLE) $InputCatNo = GUICtrlCreateInput("", 152, 54, 137, 23, BitOR($GUI_SS_DEFAULT_INPUT, $ES_NUMBER)) GUICtrlSetState($InputCatNo, $GUI_DISABLE) $BTNGo = GUICtrlCreateButton("GO", 104, 176, 97, 57) GUISetState(@SW_SHOW) $msg = 0 While 1 $msg = GUIGetMsg() Select Case $msg = $BTNGo $iCount = GUICtrlRead($InputCatNo) ; read the input If $iCount Then ; if we have something in the box $iCount = $iCount ; set the count Else $iCount = "" ; if there is nothing, then set $iCount to nothing EndIf ContinueLoop ; keep going in the loop Case $msg = $GUI_EVENT_CLOSE ; we need to make sure we are accounting for the red "x" $iCount = "" ; set the count to nothing, since we did not want to go ExitLoop ; exit the entire loop EndSelect Switch $msg Case $CBcCats If GUICtrlRead($CBcCats) = $GUI_CHECKED Then GUICtrlSetState($LblCat, $GUI_ENABLE) GUICtrlSetState($InputCatNo, $GUI_ENABLE) ElseIf GUICtrlRead($CBcCats) = $GUI_UNCHECKED Then GUICtrlSetState($LblCat, $GUI_DISABLE) GUICtrlSetState($InputCatNo, $GUI_DISABLE) EndIf EndSwitch WEnd Select Case $msg = $BTNGo GUISetState(@SW_HIDE) EndSelect EndFunc ;==>_AnimalGlad to help. 
  19. Like
    MikahS got a reaction from CaptainSparky in StringLeft help!   
    @TheNewHunter Make sure you post your solution, so that anyone that has the same problem can see how you solved it. 
  20. Like
    MikahS reacted to TheSaint in KindEbook Price Query (old version)   
    Just reporting that I have been sidetracked by other things, including working on my Audio DVD Producer program, and doing my head in from reworking the predictive elements for projected project time and size ... so many variables now.
    That all means I have avoided further testing and investigation with the latest issue here.
    Despite that, I have still been using the program and making purchases, and not experienced any further trouble. So upon a little more thought, I reckon the issue only occurs in a specific set of conditions, and probably very unlikely ones at that. The prompt I have already mentioned should address that and make the likelihood of the same conditions even more remote.
  21. Like
    MikahS got a reaction from faustf in automatic login site   
    This works for me:
    #include <IE.au3> Local $oIE, $username, $password, $oSubmit $oIE = _IECreate("http://www.atixo.de/") $username = _IEGetObjById($oIE, "infoBarLoginName") _IEFormElementSetValue($username, "demade") $password = _IEGetObjById($oIE, "infoBarLoginPassword") _IEFormElementSetValue($password, "demande") $oSubmit = _IEGetObjById($oIE, "infoBarLoginButton") _IEAction($oSubmit, "click")All good?
  22. Like
    MikahS reacted to l3ill in Excel - Filling cells from radio button groups on autoit form - help me please   
    Very Cool MikahS !
    So using this additional code I have updated my example.
    Now you can click on your excel sheet where you want to insert and then click the send button on the GUI...
     
    #include <GUIConstantsEx.au3> #include <Excel.au3> Example() Func Example() ; Create a GUI with various controls. Local $hGUI = GUICreate("Example") Local $idOK = GUICtrlCreateButton("OK", 310, 370, 85, 25) Local $idSend = GUICtrlCreateButton("Send", 200, 200, 85, 25) Global $Radio1 = GUICtrlCreateRadio("22", 56, 136, 49, 17) ; Display the GUI. GUISetState(@SW_SHOW, $hGUI) ; Loop until the user exits. While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE, $idOK ExitLoop Case $idSend ;---------------------------------Send Button Calls Case $iDSend----------Case calls Function named ""SendToExcel()"" below SendToExcel() EndSwitch WEnd ; Delete the previous GUI and all controls. GUIDelete($hGUI) EndFunc ;==>Example Func SendToExcel() $radioVar = GUICtrlRead($Radio1) Local $sWorkbook = @ScriptDir & "\_Excel1.xls" Local $oWorkbook = _Excel_BookAttach($sWorkbook) Local $oRange = $oWorkbook.Application.Activecell.Address Local $oAddress = StringReplace($oRange, "$", "") _Excel_RangeWrite($oWorkbook, $oWorkbook.Activesheet, $radioVar, $oAddress) If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeWrite Example 2", "Error writing to worksheet." & @CRLF & "@error = " & @error & ", @extended = " & @extended) EndFunc ;==>SendToExcel 
     
     
  23. Like
    MikahS got a reaction from 232showtime in Need help for Hotkey/Excel Read   
    It's just a variable with a number that gets incremented. Here is an example:
    #include <GUIConstants.au3> HotKeySet("{F1}", "Example") Local $counter = 0 While 1 WEnd Func Example() Switch $counter Case 0 MsgBox(0, "Test", "You have run the function for the first time!") $counter += 1 Case 1 extFunc1() $counter += 1 Case 2 extFunc2() $counter += 1 Case 3 extFunc3() $counter += 1 Case Else MsgBox(0, "Test", "You've run through my examples already!") Exit EndSwitch EndFunc Func extFunc1() MsgBox(0, "Test", "We are in extFunc1!") EndFunc Func extFunc2() MsgBox(0, "Test", "We are in extFunc2!") EndFunc Func extFunc3() MsgBox(0, "Test", "We are in extFunc3!") EndFunc 
  24. Like
    MikahS got a reaction from kcvinu in How to loop through all sheets in a workbook   
    My pleasure.
  25. Like
    MikahS reacted to DesireDenied in Windows context menu   
    Thanks all for your support, I've already completely solved my problem
×
×
  • Create New...