Micro Focus QTP (UFT) Forums

Full Version: how can i automatically click ok button in msgbox popup
You're currently viewing a stripped down version of our content. View the full version with proper formatting.
Pages: 1 2
Sad how can i automatically click ok button in msgbox popup.....please let me know..
Where do you get the popup from?
I mean does your code contain something like below:

Code:
Msgbox "Hello World"

If this is the case, the OK button can't be clicked automatically.

If it is not please try using:

Code:
Set WshShell = CreateObject("Wscript.Shell")
WshShell.Popup " Wait 5 seconds ", 5, "Title"

Hope it helps.
hello Prabhat
this is my case..

for i = 1 to 3
msgbox "hello Prabhat"

next

now i want to automatic click in this popup when it show hello prabhat in msgbox.
is it possible?
thanx in advance

Regards,
Ajay

Hi Ajay,

As per my knowledge its not possible, but you can create the MsgBox with time limit. use below code


Code:
For i=0 to 3
    
    Set a=createobject("wscript.shell") 'Creat one object
    msgbox_message="Your Text"
    msgbox_time=5
    msgbox_title=""
    a.popup msgbox_message,msgbox_time,msgbox_title
    
    Set a=Nothing

Next

Regards,
Ankesh
This is the alternate solution....

Istead of writing like msgbox "Hello" , u can just write ur text in the variable like msgbox_message="Your Text" if you are using the above code..
This would serve ur purpose.

Do let me know if u have a query.

Regards,
Ankesh
Hi Ankesh

thanx for this, its working dear, but i have one problem in that hope u notice that prblm is that in this script loop is not working i mean to say popup ll come only one's times but loop is from 1 to 3.....please check it....


thanks,
Ajay
@Ajay, the code is working absolutly fine. I chkd it. I request you to plz re-execute the code.
Hey Ankesh

It is working thanx dear

Thanks,
Ajay
Hello,

Please Check this script.
Collapse | Copy Code

Code:
Dim ak
Set ak = CreateObject("wscript.shell")

For i = 1 to 3

   Set DataTable = ("A",dtglobalsheet)
    MsgBox _message = "A"
    MsgBox_time = 2
    MsgBox_title = "this is demo set"
ak.Popup MsgBox, MsgBox_time,MsgBox_title

Next

I just want to print data table value in Msgbox like Column name "A".

Thanks,
Ajay Kumar
Software Test Engineer
Code:
For i = 1 to 3
Datatable.SetCurrentRow(i)  'Set the row pointer to Currentrow
strValue= Datatable("A",dtGlobalSheet)  'Get the value from datatable
MsgBox_time = 2
MsgBox_title = "this is demo set"
ak.Popup strValue, MsgBox_time,MsgBox_title


Next

Try the above for loop.. It will work.

Regards,
Ankesh
Thanks Ankesh,

It is working fine.
can you please tell me any script for descriptive programming in which we used data table.


Thanks,
A.k
Pages: 1 2