I've tried the script but it doesn't work on my Swyx Server 2015 I get the following error in the log. It's seems that "DateSerial" is unknown. What can i do to get it work ?
21 11:04:22.101 001098 Info SrvScript 07ED4778 0000000f SPBXScript::OutputTrace () GSEVersion: 10.0.0.1
21 11:04:22.101 001098 Info SrvScript 07ED4778 0000000f SPBXScript::OutputTrace () case [Start0]
21 11:04:22.101 001098 Info SrvScript 07ED4778 0000000f SPBXScript::OutputTrace () --> gseStart()
21 11:04:22.101 001098 Info SrvScript 07ED4778 0000000f SPBXScript::OutputTrace () <-- gseStart, rc = 1 [gseStateStarted]
21 11:04:22.101 001098 Info SrvScript 07ED4778 0000000f SPBXScript::OutputTrace () case [Evaluate4]
21 11:04:22.101 001098 Info SrvScript 07ED4778 0000000f SPBXScript::OutputTrace () IstFeiertag(vbHE, DateSerial(Now))
21 11:04:22.112 000848 Info SwSIPSub 04B59058 00000000 SwSIPEndp::OnPresenceNotify () Notify for IpPbx user ID 18
21 11:04:22.112 000848 Info SwSIPSub 04B59058 00000000 SwSIPEndp::OnPresenceNotify () Found resource list subscription 06CDFBE0 of user for event package 'presence' in list of server subscriptions!
21 11:04:22.112 001f54 Info SwSIPSub 06CDFBE0 00000000 SFsm::OnProcessEvent () Subscribed evtUserStatusChange Result: 1 NewSt: Subscribed
21 11:04:22.117 001098 *Err SrvScrAPI 0703F468 0000000f SPBXScriptSite::OnScriptError ()
~Code: 0
~Src: Laufzeitfehler in Microsoft VBScript
~Desc: Falsche Anzahl an Argumenten oder ungültige Eigenschaftszuweisung: 'DateSerial'
~RetVal: 800a01c2
~Line: 14978
~Column: 8
~Source code:
~ PBXScriptOutputTrace "IstFeiertag(vbHE, DateSerial(Now))"
~ ^ error position