Hello i'm having a issue creating a script to Control HomeSeer from external script
'Script Start
Dim hs
Set hsi = createobject("HomeSeer2.application")
hsi.SetHost "192.168.1.103:221"
rval = hsi.Connect("default","default")
if rval <> "" then
msgbox rval
end if
Set hs = hsi.GetHSRef
hs.speak "Hello World"
'Script End
but I get the error
Script: E:\a.vbs
Line: 2
Char: 1
Error: Active x component can't create object:'HomeSeere.application'
Code: 800A01AD
Sorce: Microsoft VBScript runtime error
my specs:
Windows 8.1
Architecture: 64x
System Drive: C:\
Homeseer Home Folder: D:\Homeseer HSPRO\
Script Location: E:\
Help please thank you!!
'Script Start
Dim hs
Set hsi = createobject("HomeSeer2.application")
hsi.SetHost "192.168.1.103:221"
rval = hsi.Connect("default","default")
if rval <> "" then
msgbox rval
end if
Set hs = hsi.GetHSRef
hs.speak "Hello World"
'Script End
but I get the error
Script: E:\a.vbs
Line: 2
Char: 1
Error: Active x component can't create object:'HomeSeere.application'
Code: 800A01AD
Sorce: Microsoft VBScript runtime error
my specs:
Windows 8.1
Architecture: 64x
System Drive: C:\
Homeseer Home Folder: D:\Homeseer HSPRO\
Script Location: E:\
Help please thank you!!
Comment