Translate page

VBS_Search_(Method)

Search the specified field for a text string.

Function VBS_Search(row as Variant, column as Variant, text As String) As Long

Parameters

NoNameTypeOptionalDefaultDescription
1rowVariantNo-

row in the screen where the search begins

2

column

Variant

No

-

column in the screen where the search begins

3

text

String

No

-

String to search for

Return Code

Description

JGS_OK

The search string was found. The 'cursor' parameter contains the position in the screen where the search string begins.

JGS_NOTCONNECTED

Your application is not connected to a valid session

JGS_PARAMETERERROR

Missing or invalid parameter

JGS_SYSERROR

The function failed due to a system error

JGS_POSITIONERROR

The specified screen position is invalid

JGS_NOFIELD

The screen is not formatted

Sample Code

Dim row as Variant
Dim column as Variant
Dim myText as String
Dim result as Long
row = 18
column = 45
myText = "Jolly Giant Software"
result = field.VBS_Search(row, column, myText)
If result = JGS_OK then
...   ' row and column contain the starting position of the text
Else ...

QWS3270 Automation copyright © Jolly Giant Software Inc. All rights reserved.