Projector Patrol's projector drivers may be employed in any program that supports COM. The following examples are written in VBScript:
' Turn the projector ON.
'
Set objProjector = CreateObject("EPSON_SS")
With objProjector
.IP = "192.168.1.250"
.Port = 3629
.On
End With
Set objProjector = Nothing
' Set the projector's video source.
'
Set objProjector = CreateObject("EPSON_SS")
With objProjector
.IP = "192.168.1.250"
.Port = 3629
.VideoSource = "11"
End With
Set objProjector = Nothing
' Set the projector's volume to 33%
'
Set objProjector = CreateObject("EPSON_SS")
With objProjector
.IP = "192.168.1.250"
.Port = 3629
.Volume = 33
End With
Set objProjector = Nothing
' Get and display the projector's volume.
'
Set objProjector = CreateObject("EPSON_SS")
With objProjector
.IP = "192.168.1.250"
.Port = 3629
MsgBox = .Volume
End With
Set objProjector = Nothing
' Execute a projector specific command and display
' the projector's response.
'
Set objProjector = CreateObject("EPSON_SS")
With objProjector
.IP = "192.168.1.250"
.Port = 3629
.Command "VOL?" & vbCR, 5
MsgBox .Response
End With
Set objProjector = Nothing