Jump to content

Recommended Posts

Hi All, 

 

I am a begginer in auto it. I am trying to build simple gui that will show me if for example notepad.exe process is currently running on the system. I have built something like this, but when I execute it shows me message boxes, but I want the results to show in gui. If you can help me start with this.

 

Thanks

 

 
#include <MsgBoxConstants.au3>
#include <GUIConstantsEx.au3>

ActiveProcess()

Func ActiveProcess()
GUICreate("Act")
         ProcessExists("wuauclt.exe")

       If ProcessExists("wuauclt.exe") Then
 MsgBox($MB_SYSTEMMODAL, "", "Windows Upates are running")
     Else
 MsgBox($MB_SYSTEMMODAL, "", "Windows Updates are not running")
 EndIf
   ;Notepad

         ProcessExists("notepad.exe")

         If ProcessExists("notepad.exe") Then
MsgBox($MB_SYSTEMMODAL, "", "Notepad is running")
        Else
MsgBox($MB_SYSTEMMODAL, "", "Notepad is not running")
EndIf

 

 

Share this post


Link to post
Share on other sites

Hello and welcome to the forum. Here is a simple example:

$hMain = GUICreate('Notepad process')
$Label = GUICtrlCreateLabel('',10,10,380,380,0x201) ; BitOR(SS_CENTERIMAGE, SS_CENTER)
GUISetState(@SW_SHOW, $hMain)

Do
    $PID = ProcessExists('notepad.exe')
    If $PID Then
        GUICtrlSetData($Label, 'Process notepad.exe exists. (PID: ' & $PID & ')')
    Else
        GUICtrlSetData($Label, 'Process notepad.exe doesn''t exists')
    EndIf
    Sleep(10)
Until GUIGetMsg() = -3 ; GUI_EVENT_CLOSE

 


When the words fail... music speaks

Share this post


Link to post
Share on other sites

It looks like your ultimate goal is windows updates, where you may want a start and stop message. Something like this perhaps:

#include <Date.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Local $sText = ""
Local $hGUI = GuiCreate("Act", 300, 300)
Local $hEdit = GUICtrlCreateEdit("", 10, 10, 280, 280, $ES_READONLY)

GUISetState(@SW_SHOW)

    While 1
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                ExitLoop
            Case Else
                If ProcessExists("notepad.exe") Then
                    GUICtrlSetData($hEdit, "Notepad launched at " & _Now())
                        While ProcessExists("notepad.exe")
                            Sleep(100)
                        WEnd

                        If Not (ProcessExists("notepad.exe")) Then
                            $sText = GUICtrlRead($hEdit)
                            GUICtrlSetData($hEdit, $sText & @CRLF & "Notepad closed at " & _Now())
                        EndIf
                EndIf
        EndSwitch
    WEnd

As you can see, with AutoIt there are many ways to skin the proverbial cat


"Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball

How to get your question answered on this forum!

Share this post


Link to post
Share on other sites

Thank you all! It helps a lot, but I have another question. How do I build an ini file which will save this output to a file?

Share this post


Link to post
Share on other sites

Can you explain this more? Why do you want to save whether a process is running to an ini file? How about an example of what the ini file would look like?


"Profanity is the last vestige of the feeble mind. For the man who cannot express himself forcibly through intellect must do so through shock and awe" - Spencer W. Kimball

How to get your question answered on this forum!

Share this post


Link to post
Share on other sites

Yes, so when I run the script, I want these processeses to save to a file to keep a record of them, so whether running or not I would like to log the processes to a file when running the script. I dont know if that makes sense.

Share this post


Link to post
Share on other sites

post your script for help with it. use the code tags <> to have the code formatted and displayed properly in threads. 

Edited by Earthshine

My resources are limited. You must ask the right questions

 

Share this post


Link to post
Share on other sites

Basic script based off JLogan3o13 script:

#include <Date.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Global $sIniFile = @ScriptDir & "\IniFile.ini"

_ProcessStartEndTime("Notepad.exe")

;~ Read the IniFile
ShellExecute($sIniFile)

Func _ProcessStartEndTime($_sProcess)
    Local $sDateTime, $sText = ""
    Local $hGUI = GuiCreate("Act", 300, 300)
    Local $hEdit = GUICtrlCreateEdit("", 10, 10, 280, 280, $ES_READONLY)

    GUISetState(@SW_SHOW)

    While 1
        Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                ExitLoop
            Case Else
                If ProcessExists($_sProcess) Then
                    $sDateTime = _Now()
                    IniWrite($sIniFile, $_sProcess, $sDateTime, "Start Time")
                    GUICtrlSetData($hEdit, "Notepad launched at " & $sDateTime)
                        While ProcessExists($_sProcess)
                            Sleep(100)
                        WEnd

                        If Not (ProcessExists($_sProcess)) Then
                            $sDateTime = _Now()
                            IniWrite($sIniFile, $_sProcess, $sDateTime, "End Time")
                            $sText = GUICtrlRead($hEdit)
                            GUICtrlSetData($hEdit, $sText & @CRLF & "Notepad closed at " & $sDateTime)
                        EndIf
                EndIf
        EndSwitch
    WEnd
EndFunc

 

Share this post


Link to post
Share on other sites

Cheers guys for helping me out. I have managed to do that, but have another problem. I am saving the output to .txt file and everytime I run the script it overwrites the file, but I want it to write it into the same file, but underneath the last output, so I can compare them.
 

Global $sFilePath = "" & $pcname & ".txt"

Updates()


Func Updates()

    IniWrite($sFilePath, "Date:",@ComputerName, _Now())
    IniWrite($sFilePath, "Update:",         $arr[1][0], $arr[1][1] )
    IniWrite($sFilePath, "xxx:",            $arr[2][0], $arr[2][1])
    IniWrite($sFilePath, "xxx:",            $arr[3][0], $arr[3][1])
    IniWrite($sFilePath, "xxx:",            $arr[4][0], $arr[4][1])
    IniWrite($sFilePath, "xxx:",            $arr[5][0], $arr[5][1])
    IniWrite($sFilePath, "xxx:",            $arr[6][0], $arr[6][1])
    IniWrite($sFilePath, "xxx:",            $arr[7][0], $arr[7][1])
    IniWrite($sFilePath, "xxx:",            $arr[8][0], $arr[8][1])
    IniWrite($sFilePath, "xxx:",            $arr[9][0], $arr[9][1])
   
EndFunc

_FileWriteFromArray($sFilePath, $arr)

$From = $sFilePath
$To = "C:\xxx\xxx"

Runwait(@ComSpec & " /c " & "xcopy " & '"' & $From & '"' & ' "' & $To& '"' & " /Y ","",@SW_HIDE

 

Edited by Jake_s

Share this post


Link to post
Share on other sites

Doesn't FileOpen open a file in append mode? do you need INI or a formatted log? 

if you just looked up log4a.au3 thread like i suggested you would have everything you need to dump it to log super easy. all nice and formatted with date/time stamps. but instead you asked for code the post after that one. sigh.

Edited by Earthshine

My resources are limited. You must ask the right questions

 

Share this post


Link to post
Share on other sites

Do you want to use an INI file? Then use the INI functions.

Do you want to write it directly from the array, then use _FileWriteFromArray correctly. From the help file:

Quote

If a string path is provided, the file will be overwritten and closed.
To use other write modes, like append or Unicode formats, open the file with FileOpen() first and pass the file handle instead.
If a file handle is passed, the file will still be open after writing.

 


If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.
Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag Gude
How to ask questions the smart way!

I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from.

Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays.  -  ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script.  -  Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label.  -  _FileGetProperty - Retrieve the properties of a file  -  SciTE Toolbar - A toolbar demo for use with the SciTE editor  -  GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI.  -   Latin Square password generator

Share this post


Link to post
Share on other sites

I am unclear why you are using an INI.  I use INI to manage application configs.  If you want a log, I think I would try _FileWritelog

Share this post


Link to post
Share on other sites

log4a is better though. more configurable too. you can have it log to the Editor console running from editor, and auto generate a hard log once compiled.


My resources are limited. You must ask the right questions

 

Share this post


Link to post
Share on other sites
Just now, Earthshine said:

log4a is better though. more configurable too. you can have it log to the Editor console running from editor, and auto generate a hard log once compiled.

That may be.  My only real point is that INI probably should not be used in this case

Share this post


Link to post
Share on other sites

really? I said that already in post 2 or 3 but the OP doesn't read it. I also repeated myself a few posts above yours. I guess I'm done with the "Gimme deh codez" posts like this, and the folks who make them ignored.

Edited by Earthshine

My resources are limited. You must ask the right questions

 

Share this post


Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

  • Recently Browsing   0 members

    No registered users viewing this page.

  • Similar Content

    • By TXTechie
      Hello Everyone,
      I've developed my own GUI using AutoIt and I'm allowing users to minimize the GUI, but I also want to include some kind of timer so that it will automatically restore the GUI after something like 30 minutes or an hour. However, I also want them to be able to manually restore the GUI by clicking the application's icon in the taskbar.
      I've searched through the forums, but I'm not sure how to get started.
      Any ideas or functions to research are appreciated!
      Regards,
      TX Techie
    • By Rskm
      Hi, recently i created a GUI for some calculations in AutoIT.  The GUI has 2 tabs and on the first tab, it has few inputboxes where i use to click with mouse and start entering the inputs. i recently made some changes in the position of these textboxes. I made this by changing the autoit code file instead of making changes in KODA. Now i cannot click inside these textboxes with mouse. However, i can use TAB key to cycle through/enter input in these input boxes. what could have made the inputboxes not responding to mouseclicks. thanks
    • By TheDcoder
      Hi everyone,
      I am bit stumped as to why I am not able to set the time in the Date control
      #include <DateTimeConstants.au3> #include <GUIConstantsEx.au3> #include <MsgBoxConstants.au3> Example() Func Example() GUICreate("My GUI get date", 200, 200, 800, 200) Local $idDate = GUICtrlCreateDate("1953/04/25", 10, 10, 185, 20, $DTS_TIMEFORMAT) ; to select a specific default format Local $sStyle = "HH:mm:ss" GUICtrlSendMsg($idDate, $DTM_SETFORMATW, 0, $sStyle) ; Set time Local $iRet = GUICtrlSetData($idDate, '13:33:37') ConsoleWrite('GUICtrlSetData returned ' & ($iRet = 1 ? 'success' : 'failure') & @CRLF) GUISetState(@SW_SHOW) ; Loop until the user exits. While GUIGetMsg() <> $GUI_EVENT_CLOSE WEnd MsgBox($MB_SYSTEMMODAL, "Time", GUICtrlRead($idDate)) EndFunc ;==>Example The documentation for GUICtrlSetData clearly mentions that it uses the same format as GUICtrlRead:
      But I get failure
      What gives?
      Thanks for the help in advance!
    • By thedemons
      Introduction
      ImGui is a popular library written by ocornut, it can make awesome user interface based on directx. It is being used by many big apps/games.  The UI is nice and flexible, easy to use because of frame-by-frame drawing. So I decided to convert the entire ImGui library to AutoIt
      At first it's just an experiment, i converted some basic draw functions of imgui, compile to a dll, then using DllCall in autoit to call the functions. I was testing to see how much FPS i can get in autoit, and i was expected a low FPS, since autoit is slow. Suprisingly, the FPS turned out to be so high, it works really fast, even when drawing 1000 buttons at the same time. Features
      More than +270 functions converted from ImGui (compiled dll). Has 90% of the capability of what you can do in C++; Usable ImGuiIO and ImGuiStyle, so you can set whatever configurations you like. Preview
          
      Usage
      #include <WinAPI.au3> #include "ImGui.au3" ; Create a window Local $hwnd = _ImGui_GUICreate("AutoIt ImGui", 1024, 768) _WinAPI_ShowWindow($hwnd) ; Set style color _ImGui_StyleColorsLight() ;~ _ImGui_StyleColorsDark() Local $f_value = 5 While 1 ; when the user click close button on the window, this will return false if Not _ImGui_PeekMsg() Then Exit ; must call _ImGui_BeginFrame() _ImGui_Begin("Another window") _ImGui_Text("Hello there..") If _ImGui_Button("click me") Then $f_value = 5 _ImGui_SliderFloat("slider", $f_value, 2, 20) If _ImGui_IsItemHovered() Then _ImGui_ToolTip("what r u doing?") _ImGui_End() ; must call _ImGui_EndFrame() Wend  
      Remark
      Most of the functions were converted automatically. I haven't tested all of them yet, if some function doesn't work for you, please tell me. Still missing some features of ImGui, please tell me if you needed any. Run \tools\imgui-au3-setup.au3 to add _ImGui functions to SciTE auto-complete. Source Code
      Require: DirectX GitHub: imgui-autoit
    • By MesterPerfect
      good morning
      this is the first post here in the autoit forums
      i hope that you can help me in my problem
      i have a JSON encoded
      it a map of my forums
      where i want to make a treeview that have the same type of map
      e.g
      a system (as category)
      windows (as sub category)
      software (as an child item in the windows category)
      .....
      i don't know how to do that
      so, i know that i can do that using the json functions
      but i need your help about how we can do it as the type that i told you
      by the way i need to put the sub info for each item in an array that give me the ability to manage my items
      e.g
      can post thread
      can reply
      message cound ...
      you just give me a small example and i can continue.
      am sorry if this against the rules of the forum.
      but i realy searched a lot but i couldn't
      i hope some one give me the way.
      thank you very much in advance
       
      here is the link of json forum
      https://www.autoitscript.com/forum/topic/148114-a-non-strict-json-udf-jsmn/
      and here is my encoded json file
       
      { "tree_map": { "0": [ 1, 5, 6, 7 ], "1": [ 2 ], "2": [ 4 ], "5": [ 3 ], "6": [ 8 ], "8": [ 9, 10 ] }, "nodes": [ { "breadcrumbs": [], "description": "", "display_in_list": true, "display_order": 1, "node_id": 1, "node_name": null, "node_type_id": "Category", "parent_node_id": 0, "title": "Main category", "type_data": {} }, { "breadcrumbs": [ { "node_id": 1, "title": "Main category", "node_type_id": "Category" } ], "description": "", "display_in_list": true, "display_order": 1, "node_id": 2, "node_name": null, "node_type_id": "Forum", "parent_node_id": 1, "title": "Main forum", "type_data": { "allow_poll": true, "allow_posting": true, "can_create_thread": true, "can_upload_attachment": true, "discussion_count": 0, "last_post_date": 0, "last_post_id": 0, "last_post_username": "", "last_thread_id": 0, "last_thread_prefix_id": 0, "last_thread_title": "", "message_count": 0, "min_tags": 0, "require_prefix": false } }, { "breadcrumbs": [ { "node_id": 1, "title": "Main category", "node_type_id": "Category" }, { "node_id": 2, "title": "Main forum", "node_type_id": "Forum" } ], "description": "", "display_in_list": true, "display_order": 1, "node_id": 4, "node_name": null, "node_type_id": "Forum", "parent_node_id": 2, "title": "my forums1", "type_data": { "allow_poll": true, "allow_posting": true, "can_create_thread": true, "can_upload_attachment": true, "discussion_count": 0, "last_post_date": 0, "last_post_id": 0, "last_post_username": "", "last_thread_id": 0, "last_thread_prefix_id": 0, "last_thread_title": "", "message_count": 0, "min_tags": 0, "require_prefix": false } }, { "breadcrumbs": [], "description": "", "display_in_list": true, "display_order": 2, "node_id": 5, "node_name": null, "node_type_id": "Category", "parent_node_id": 0, "title": "Perfect", "type_data": {} }, { "breadcrumbs": [ { "node_id": 5, "title": "Perfect", "node_type_id": "Category" } ], "description": "", "display_in_list": true, "display_order": 2, "node_id": 3, "node_name": null, "node_type_id": "Forum", "parent_node_id": 5, "title": "ahmed", "type_data": { "allow_poll": true, "allow_posting": true, "can_create_thread": true, "can_upload_attachment": true, "discussion_count": 0, "last_post_date": 0, "last_post_id": 0, "last_post_username": "", "last_thread_id": 0, "last_thread_prefix_id": 0, "last_thread_title": "", "message_count": 0, "min_tags": 0, "require_prefix": false } }, { "breadcrumbs": [], "description": "", "display_in_list": true, "display_order": 3, "node_id": 6, "node_name": null, "node_type_id": "Forum", "parent_node_id": 0, "title": "autoit", "type_data": { "allow_poll": true, "allow_posting": true, "can_create_thread": true, "can_upload_attachment": true, "discussion_count": 0, "last_post_date": 0, "last_post_id": 0, "last_post_username": "", "last_thread_id": 0, "last_thread_prefix_id": 0, "last_thread_title": "", "message_count": 0, "min_tags": 0, "require_prefix": false } }, { "breadcrumbs": [ { "node_id": 6, "title": "autoit", "node_type_id": "Forum" } ], "description": "", "display_in_list": true, "display_order": 3, "node_id": 8, "node_name": null, "node_type_id": "Forum", "parent_node_id": 6, "title": "examples", "type_data": { "allow_poll": true, "allow_posting": true, "can_create_thread": true, "can_upload_attachment": true, "discussion_count": 0, "last_post_date": 0, "last_post_id": 0, "last_post_username": "", "last_thread_id": 0, "last_thread_prefix_id": 0, "last_thread_title": "", "message_count": 0, "min_tags": 0, "require_prefix": false } }, { "breadcrumbs": [ { "node_id": 6, "title": "autoit", "node_type_id": "Forum" }, { "node_id": 8, "title": "examples", "node_type_id": "Forum" } ], "description": "", "display_in_list": true, "display_order": 3, "node_id": 9, "node_name": null, "node_type_id": "Forum", "parent_node_id": 8, "title": "GUI", "type_data": { "allow_poll": true, "allow_posting": true, "can_create_thread": true, "can_upload_attachment": true, "discussion_count": 0, "last_post_date": 0, "last_post_id": 0, "last_post_username": "", "last_thread_id": 0, "last_thread_prefix_id": 0, "last_thread_title": "", "message_count": 0, "min_tags": 0, "require_prefix": false } }, { "breadcrumbs": [ { "node_id": 6, "title": "autoit", "node_type_id": "Forum" }, { "node_id": 8, "title": "examples", "node_type_id": "Forum" } ], "description": "", "display_in_list": true, "display_order": 31, "node_id": 10, "node_name": null, "node_type_id": "Forum", "parent_node_id": 8, "title": "windowEX", "type_data": { "allow_poll": true, "allow_posting": true, "can_create_thread": true, "can_upload_attachment": true, "discussion_count": 0, "last_post_date": 0, "last_post_id": 0, "last_post_username": "", "last_thread_id": 0, "last_thread_prefix_id": 0, "last_thread_title": "", "message_count": 0, "min_tags": 0, "require_prefix": false } }, { "breadcrumbs": [], "description": "", "display_in_list": true, "display_order": 4, "node_id": 7, "node_name": null, "node_type_id": "Category", "parent_node_id": 0, "title": "vbs", "type_data": {} } ] }  
×
×
  • Create New...