pradeep,krishna has asked for the wisdom of the Perl Monks concerning the following question:
Hai monks.
I have the following code to login into server.
use Win32::GuiTest qw(FindWindowLike GetListText MouseClick PushButton + PushChildById GetChildWindows SetFocus SelListViewItemText SelTabIte +mText GetFocus WaitWindow SendKeys GetFocus PushChildButton); system('"start %windir%\system32\mstsc.exe"'); $Win32::GuiTest::debug = 0; $max_Sleep_time=5; WaitWindow("Remote Desktop Connection",$max_Sleep_time); @windows = FindWindowLike(0, "Remote Desktop Connection"); for (@windows) { $fc_hwnd = GetFocus( $_ ); SendKeys($fc_hwnd ,"Server_name"); PushChildButton( $_, 1); $max_Sleep_time=20; WaitWindow("Windows Security",$max_Sleep_time); @windows_seq = FindWindowLike(0, "Windows Security"); for (@windows_seq) { PushChildButton( $_, "Use another account"); SelTabItemText( $_, "Use another account"); SelListViewItemText( $_, "Use another account"); @wnds = GetChildWindows($_); PushButton("Use another account"); MouseClick("Use another account",$_); $f=$_; for(@wnds) { $txt = GetListText($f,$_); print "$txt : $_\n"; MouseClick( $_ ,$f); sleep(2); } #--$fc_hwnd = GetFocus( $_ ); #--SendKeys($fc_hwnd ,"Password01"); #--PushChildButton( $_, "OK"); } }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: How to perform click operation on 'Use another account' Option in the 'Windows Security' Window which popups in 'Remote Desktop Connection' process?
by Kenosis (Priest) on Feb 07, 2014 at 05:27 UTC | |
|
Re: How to perform click operation on 'Use another account' Option in the 'Windows Security' Window which popups in 'Remote Desktop Connection' process?
by Anonymous Monk on Feb 07, 2014 at 08:02 UTC | |