How Do i create a new event using script

[~Ghost~]

How Do i create a new event using script.. if you would please give me a good example like it runs at a specific time and executes a script.. thanks so much.

~Ghost~

[mrhappy]

How Do i create a new event using script.. if you would please give me a good example like it runs at a specific time and executes a script.. thanks so much.

~Ghost~

I have never done it but it is going to be similar in style to when you create a device, the event is declared as an object and you can set the options as per the event class. There is the beginnings of a script in the help file;

sub new_event(name)

dim ev

set ev=hs.NewEventEx(name)

ev.group = "System"
msgbox ev.name

end sub

which in vb.net I would imagine you would want something like (not tested);

Dim ev As Object

ev = hs.NewEventEx("Event Name")
ev.ev_abs_time = 0 'this is the type of trigger
ev.ev_time = "10:00" 'I think this is the correct format
ev.group = "Test Group"

'then you will need to get the reference for this event to add an action

hs.addaction(hs.GetEventRefByName("Event Name"), 5, "testscript.vb")

[~Ghost~]

thank you

Thank you mr. happy for responding so quickly!! one more thing umm it keeps saying
Error - Running script, script run or compile error in file: Compile New Script1025:Expected end of statement in line 1 More info: Expected end of statement
i have no clue how to fix this

thanks
~Ghost~

[mrhappy]

Thank you mr. happy for responding so quickly!! one more thing umm it keeps saying
Error - Running script, script run or compile error in file: Compile New Script1025:Expected end of statement in line 1 More info: Expected end of statement
i have no clue how to fix this

thanks
~Ghost~

Seems to work OK here, ensure you have Sub/End Sub around it and it is named as a .vb file.

Sub Main(ByVal Parms As Object)

Dim ev As Object

ev = hs.NewEventEx("Event Name")
ev.ev_abs_time = 0 'this is the type of trigger
ev.ev_time = "10:00" 'I think this is the correct format
ev.group = "Test Group"

'then you will need to get the reference for this event to add an action

'hs.waitsecs(1)

hs.addaction(hs.GetEventRefByName("Event Name"), 5, "testscript.vb")


End Sub

Just monitor whether you need to put a wait command into the script before you add the action, I can't see that you can add the action from the event class and I am just mindful whether when you get to add the action if the event has been created in the database (probably has but might be worse on a slow PC?). It might be worth waiting a second to add the action to ensure it is created, change testscript.vb to the name of your script.

[~Ghost~]

thanks Mr. Happy your awesome

[AshaiRey]

How do i do this in HS3?

[mrhappy]

How do i do this in HS3?

There are less options than in HS2 for event configuration by script (search for the discussions on that one and the reasoning) but you should be able to create it and add some limited actions and have limited triggers. http://www.homeseer.com/support/home...ing_events.htm should get you going.

[AshaiRey]

Thx for your help on this.
I did find the help pages already but i ran into some problems there like a 404 on the eventclass page and none of them had any examples. So if you can prove an example then that will be much appreciated. If not i will have to dive in and experiment myself.

[mrhappy]

Thx for your help on this.
I did find the help pages already but i ran into some problems there like a 404 on the eventclass page and none of them had any examples. So if you can prove an example then that will be much appreciated. If not i will have to dive in and experiment myself.

I am afraid I do not have any examples - I have seen a couple posted on this board though, there is perhaps not as much need to create events in this way any more (I barely used it in HS2). There is no event class AFAIK any more.

[jon00]

Maybe this thread will help: http://board.homeseer.com/showthread.php?p=1146650