View Single Post
  #2  
Old 05-08-2015, 01:12 PM
jbd1300 jbd1300 is offline
Registered User
 
Join Date: Dec 2014
Posts: 18
I figured it out! I apologize to waste everyone's time.

I was making it way more difficult than it really should have been.

# $language = "VBScript"
# $interface = "1.0"
crt.Screen.Synchronous = True
crt.Screen.IgnoreEscape = True

crt.Screen.Send "show version" & vbcr

strOutput = crt.Screen.ReadString(">")

'crt.Dialog.MessageBox strOutput

Set re = New RegExp
re.MultiLine = True
re.Global = True
re.IgnoreCase = True
re.Pattern = "4200"
If re.Test(strOutput) Then
'crt.Dialog.MessageBox re.Test(strOutput) ' Will send a true
'crt.Dialog.MessageBox re.Pattern ' Will show me exactly what it finds
crt.Dialog.MessageBox "4200 snaps"
Else
crt.Dialog.MessageBox "4550 Snaps"
End If