Help mijn script werkt niet !?

[robin04]

Hallo, ik heb een script gedownload voor skype (
https://developer.skype.com/Docs/Skype4COMLib/Sms_vbs), zodat ik kan smsen via vbs. Alleen werkt hij jammer genoeg niet. Andere vbs scripts voor skype doen het wel. Bij deze geeft hij een foutmelding bij regel 11 en 15. Weet iemand misschien wat er fout is?

'// Create a Skype4COM object:
Set oSkype = WScript.CreateObject("Skype4COM.Skype", "Skype_")

'// Start the Skype client:
If Not oSkype.Client.IsRunning Then oSkype.Client.Start() End If

'// Send SMS:
Set oSMS = oSkype.SendSms("+1234567890", "Hello!")

WScript.Sleep(60000)

'// Message event handler:
Public Sub Skype_SmsMessageStatusChanged(ByRef aSms, ByVal aStatus)
WScript.Echo ">Sms " & aSms.Id & " status " & aStatus & " " & oSkype.Convert.SmsMessageStatusToText(aStatus)
End Sub

'// Target event handler:
Public Sub Skype_SmsTargetStatusChanged(ByRef aTarget, ByVal aStatus)
WScript.Echo ">Sms " & aTarget.Message.Id & " target " & aTarget.Number & " status " & aStatus & " " & oSkype.Convert.SmsTargetStatusToText(aStatus)
End Sub


Alvast bedankt

 

[That Guy]

ik denk dat het deze regel is:

WScript.Sleep(60000)

WScript is namelijk niet gedefiniert. Bovendien, is '60000' niet in ms, dus, één minuut? (veel )

:thumb: