VBS_GetStringWithAttribs (Method).
Retrieve the text and attributes from specified position until the end of screen.
Function VBS_GetStringWithAttribs(row As Variant, column As Variant, buffer As Variant, bufsize As Long) As Long
Parameters
No | Name | Type | Optional | Default | Description |
---|---|---|---|---|---|
1 | row | Variant | No | - | row in the screen where copy is to begin |
2 | column | Variant | No | - | column in the screen where copy is to begin |
3 | buffer | Variant | No | - | String buffer |
4 | bufsize | Long | No | - | Double the size of the string to copy (for attribute bytes) |
Return Code | Description | ||||
JGS_OK | The function was successful | ||||
JGS_PARAMETERERROR | Missing or invalid parameter | ||||
JGS_NOTCONNECTED | Your application is not currently connected to a valid host session. | ||||
JGS_FTXSEGMENTED | The data was successfully copied; host session is waiting for a host response | ||||
JGS_INHIBITED | The data was successfully copied; the keyboard is locked | ||||
JGS_POSITIONERROR | The position value specified is invalid | ||||
JGS_SYSERROR | The function failed due a system error | ||||
JGS_MEMORY | Insufficient memory |
Sample Code
Dim myString as Variant
Dim row as Variant
Dim column as Variant
Dim myLength as Long
Dim result as Long
row = 18
column = 45
myLength = 400
result = screen.VBS_GetStringWithAttribs(row, column, myString, myLength)
QWS3270 Automation copyright © Jolly Giant Software Inc. All rights reserved.
Â