Jump to content

screenshot of citrix windows


Recommended Posts

hello

I cannot interact with the windows inside a citrix session. so i want to take a screenshot of the existing window and save it. i would like to compare it with an already saved window to compare and see if they are identical. how can i do it. i have figured auto to the extend to which i can get the window handle of the active citrix session.

pl help.

Seede

Global Const $SUCCESS = 0

Global Const $ERROR =1

Global Const $WARNING =2

Global Const $INFORMATION =4

Global Const $AUDIT_SUCCESS =8

Global Const $AUDIT_FAILURE =16

opt("WinDetectHiddenText",1)

opt("WinTitleMatchMode",2)

$WshShell = ObjCreate("WScript.Shell")

if @error or $WshShell = 0 Then

MsgBox(266288,"WshShell","Could not create object.")

Exit

EndIf

$WshShell.LogEvent ($INFORMATION, "Script started.")

;

ShellExecute("mynr.lnk","","E:\Documents and Settings\14999\Desktop")

if WinWaitActive("Connecting","",5) Then

$WshShell.LogEvent ($INFORMATION, "Connecting to NR")

EndIf

If WinWaitActive("MetaFrame Presentation Server","",10) Then

$WshShell.LogEvent ($INFORMATION, "MetaFrame Presentation Server")

EndIf

Sleep(60*1000)

$WshShell.LogEvent ($INFORMATION, "Starting NR L")

If WinWaitActive("MetaFrame Presentation Server","",10) Then

Send("nrsupport")

Send("{TAB}")

Send("nrsupport")

Send("{TAB}")

Send("nrnldb")

Send("{ENTER}")

Sleep(15*1000)

; take a screenshot of the window

; compare the screenshot with the saved screen

; if they are the same. then its ok

; else log a ERROR IN EVENT LOG

$WshShell.LogEvent ($INFORMATION, "Stopping NR L")

Send("!f")

Send("x")

EndIf

$WshShell.LogEvent ($SUCCESS, "Script completed." )

$WshShell = 0

Exit

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...