Custom Message box

[pranaynanda]

I want my message box to display some text followed by item checked in a listview. How do I do that?

I want something like this:

The following Text will be printed:

1. Text1

2. Text2

3. And so on

 

Text1 and Text2 are items that are checked in a listview.

[JohnOne]

Make a GUI.

[pranaynanda]

Isn't there any other way around?

[Melba23]

pranaynanda,

Use _GUICtrlListView_GetItemChecked in a loop (use _GUICtrlListView_GetItemCount  to find the loop limit) and if the item is checked, then use _GUICtrlListView_GetItemText to get the content. Concatenate these into a string and add it to your MsgBox.

You are re-asking essentially the same question that I have already answered - and my comment on not using a MsgBox is equally valid in this case.

M23

[Skysnake]

@pranaynanda Check the Help file.  Start here:

GUICreate

GUICtrlCreateListView

 

This should give you access to buttons and other ListView functions.  Once you have this, post some code and we can help with the GetItem options.

Good luck

 

 

[pranaynanda]

@Melba23 I am re-asking it because you recommended to open up a new thread in GH&S. I understand what you wish to say. But I want something with the look and feel of a message box. I want it to be a blocking function. I also get your point about the size. There can be as many as 15 items checked in a listview. So I would want the GUI to expand and adjust itself as per the content.

@Skysnake Here's that piece of code:

Func _start($computer)
   Dim $sArray[1]
   $count = _GUICtrlListView_GetItemCount($ListView1)
    $aCount = 0
    For $i = 1 To $count Step 1
        If _GUICtrlListView_GetItemChecked($ListView1, $i-1)  = True Then
            $sArray[$aCount]=_GUICtrlListView_GetItemText($ListView1, $i - 1, 1)
            ReDim $sArray[UBound($sArray) + 1]
            $aCount += 1
        EndIf
     Next


      $mbox=MsgBox(4164,"Stopping Services","Do you want to Stop these services?")

   If $mbox=6 Then

   ProgressOn("Stop services", "Stopping" & $sArray, "", -1, -1, 16)

   For $i = 1 To UBound($sArray) - 1 Step 1
      $service = $sArray[$i - 1]
      RunWait("sc \\" & $computer & " stop "  & '"' & $service & '"')
      ProgressSet($i / (UBound($sArray) - 1) * 100, Round($i / (UBound($sArray) - 1) * 100, 0) & "%", "Stopping " & $i & " of " & UBound($sArray) - 1)
   Next
   Sleep(5000)
   ProgressOff()
   _populate($machine)
   EndIf

EndFunc

I have manipulated $mbox to suit current requirement temporarily. But I actually want the statement to be followed by the items in $sArray.

Edit: My application exits on encountering an error. How do I get it to report the error and not exit?

[Skysnake]

I suggest using 

_ArrayDisplay(sArray) 

To check the content of the Array after populating it, and again just before actioning it.

Also,

ConsoleWrite("Show me $count " & $count & " * " & @ScriptLineNumber  & @CRLF) 

Will show you what AutoIt is doing.

 

I hope this helps. You seem to know what you want. 

[pranaynanda]

@Skysnake thanks for putting in faith. I kinda have some idea. But I'm not so sure about it. I would like if you could help me with the concatenating code. Also, with the message box expand itself with the size of content?

[Skysnake]

Yes, the message box will define its own size based on content, for smaller content, expect the title  to be truncated. 

Not sure what this means: 

Quote

help me with the concatenating code

Maybe spend a little more time with the Help file?  Have you explored the Wiki?  

[AutoBert]

This:

Func _start($computer)
    Dim $sArray[1]
    Local $sMsg = @CRLF & @CRLF
    $count = _GUICtrlListView_GetItemCount($ListView1)
    $aCount = 0
    For $i = 1 To $count Step 1
        If _GUICtrlListView_GetItemChecked($ListView1, $i - 1) = True Then
            $sArray[$aCount] = _GUICtrlListView_GetItemText($ListView1, $i - 1, 1)
            $sMsg &= $sArray[$aCount] & @CRLF
            ReDim $sArray[UBound($sArray) + 1]
            $aCount += 1
        EndIf
    Next
    $mbox = MsgBox(4164, "Stopping Services", "Do you want to Stop" & $sMsg & "these services?")
    If $mbox = 6 Then
        ProgressOn("Stop services", "Stopping" & $sArray, "", -1, -1, 16)
        For $i = 1 To UBound($sArray) - 1 Step 1
            $service = $sArray[$i - 1]
            RunWait("sc \\" & $computer & " stop " & '"' & $service & '"')
            ProgressSet($i / (UBound($sArray) - 1) * 100, Round($i / (UBound($sArray) - 1) * 100, 0) & "%", "Stopping " & $i & " of " & UBound($sArray) - 1)
        Next
        Sleep(5000)
        ProgressOff()
        _populate($machine)
    EndIf
EndFunc   ;==>_start

should do the job.

[pranaynanda]

Hey @AutoBert, Thank you! That did it!

[pranaynanda]

Hey, can anybody help me with this another thing? Let's say I do this:

RunWait(ping google.com)

I know it will print this to a command prompt console. How do I get the output to a message box?

[Skysnake]

See this:

StOutRead

The example is complete.  You want to assign a variable to RunWait, then use StOutRead the read the content of the RunWait output.

[BrewManNH]

Or use AutoIt's Ping function.

[Skysnake]

@BrewManNH refers to this function, again from the Help file: https://www.autoitscript.com/autoit3/docs/functions/Ping.htm, but I think the question was more aimed at the DOS output than the actual Ping values.  I could have interpreted the question wrong. :|

 

[pranaynanda]

@Skysnake You're right. Ping command was much of an example. I wanted to run a custom tool that produced some output on the console.  I got that on another thread though

The replies didn't seem to work on the client as the process takes about 30 secs to compute output.  I'm gonna try them on the server where output in instant. If that doesn't work, I'll get back right here at GH&S.

[Skysnake]

How about you force the DOS command to write to an on disk log file, then FileRead?

make a batch file with this content to test:

echo off
ping %computername% > mydoslog.txt

after this, you should have a local file named mydoslog.txt, which you can open with Notepad or AutoIt FileRead, simply wait until file exists?

Edited May 4, 2016 by Skysnake
typo