Attachmate 2011 reflection vba Macro Help

[Cryogenic666]

Hi, everyone

I'v got an issue with a VBa macro I've Been writig for a couple of days now.
I would like to check on the terminal screen if there is any data a certian row, and if there is give the user
a message box with two choises overwrite or skip.

The problem is when I try to run the code I get an error:

Run-Time error '438': Object doesn't support this property and method and debug points towards an If statment (See code below)

Dim A As Variant
A = osCurrentScreen.GetCharacters(9, 20, 1)
'MsgBox (A)

If A(0) = 0 Then
Dim msg, style, title, ctxt, response, MyString
msg = "Befintlig data i givare " & gNum & " Skriva över?"
style = vbYesNo + vbCritical + vbDefaultButton2
title = "Fel i givare " & gNum

response = MsgBox(msg, style, title)
If response = vbNo Then GoTo Line1
End If

I would appreciate any help and if you can't find a solution I would also like suggestions for other solutoions.

 

[SkipVought]

Hi,

You variable A is NOT an array!

Also, the data type returned by GetCharacters is TEXT!

If A = "0" Then

Skip,
[sub]
Just traded in my OLD subtlety...
for a NUance![/sub]