Scripting vraag Voipbuster

Post by **TANE** » Tue Apr 08, 2008 11:36 pm

Ik heb op dit moment een script in gebruik die een SMS stuurt als er wordt aangebeld.
Dit gaat via Voipbuster. Just for the fun (gratis)

hs.launch "iexplore.exe", "https://myaccount.voipbuster.com/clx/se ... xt=Deurbel"

Ik wil ook een e-mail sturen met een foto die wordt gemaakt met netcam plugin.
Heeft iemand een voorbeeld van een script waarbij je een bijlage mee kan sturen?

Voipbuster tip is van Bert

Post by **Snelvuur** » Wed Apr 09, 2008 12:20 am

je krijgt zeker een paar smsjes gratis per dag ofzo? ik heb gewoon een simonly met een sms bundeltje (10tje) kan dan 1000 smsjes versturen in de maand. Kom hooguit aan de 200 a 300 met een beetje geluk (meerder mensen die gebruik maken van mijn flits service dienst)

voor linux kan je een wget doen of een lynx -dump met een >/dev/null eronder. Onder linux maak je een mail met mailx en pak je het plaatje van je ipcam en die uuencode je dan en duw je ook in de mail. Misschien is een uuencode ook wat jij kan doen. Zie ook http://en.wikipedia.org/wiki/Uuencode voor de opbouw (ook een windows tooltje zag ik) maar het kan vast makkelijker.

// Erik (binkey.nl)

Post by **TANE** » Wed Apr 09, 2008 12:35 am

dienst van Voipbuster heeft nu geen beperkingen...
maar ik verwacht wel dat ze in de toekomst geld voor gaan vragen...als je naar de tarieven kijkt staat duidelijk

VoipBuster offers very cheap sms to Nederland for 0.010 Euro

With VoipBuster you can sms Nederland for only 0.010 Euro!
ook nog niet veel...maar ja zonder internet heb je geen sms..

Post by **TANE** » Wed Apr 09, 2008 9:31 am

na een dag kan ik geen gratis smsjes sturen.
maar probleem is simpel te verhelpen door geld te storten op je voipbuster rekening of naar een 0900 (1,30euro) bellen en je krijg 1,04 bijgeschreven.
per sms betaal je dan 1 euro cent.
Ik heb nu verschillende events lopen die een sms sturen
Rookmelder
Brand
voordeur bel

Post by **Snelvuur** » Wed Apr 09, 2008 11:30 am

ik heb express een telefoon zodat ik later ook b.v. me router kan resetten via x10 als hij weer is hangt. Handig als ik op vakantie ben en ik moet wat van me pc hebben ofzo en ik kan er niet bij. Dan kan ik gewoon met een sms resetten (ik kan ook inkomende smsjes verwerken dan) vergeet ook niet dat je meestal 2 gratis smsjes ofzo hebt via je gsm provider (vodafone heeft dat b.v. daar heb ik geen scrippie voor die vanaf de commandline die dingen kan versturen) werkt via perl maar dat kan ook onder windows draaien he.

// Erik (binkey.nl)

Post by **Antoon** » Wed Apr 09, 2008 6:36 pm

Chak, ik krijg dat script niet aan het werken.
Heb de account usernaam en paswoord ingevuld maar wat moet er op "from" en "to"?
Ik heb nu bij "from" ook de usernaam en bij "to" het telefoon nummer.

Post by **TANE** » Wed Apr 09, 2008 8:49 pm

Anton,

From is je naam mag een andere zijn dan je accountnaam het kan ook een nummer zijn.
bij to je gsm nummer bv +316123456

Post by **Noob** » Wed Apr 09, 2008 9:05 pm

Chak,

Hier een voorbeeld VBScript om een email met attachment te sturen.

Code: Select all

Set objMessage = CreateObject("CDO.Message") 
objMessage.Subject = "Example CDO Message" 
objMessage.From = "me@my.com" 
objMessage.To = "test@paulsadowski.com" 
objMessage.TextBody = "This is some sample message text."

'==This section provides the configuration information for the remote SMTP server.
'==Normally you will only change the server name or IP.
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 

'Name or IP of Remote SMTP Server
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.myserver.com"

'Server port (typically 25)
objMessage.Configuration.Fields.Item _
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 

objMessage.Configuration.Fields.Update

'==End remote SMTP server configuration section==
objMessage.AddAttachment "c:\temp\readme.txt"
objMessage.Send

Voorbeeldje komt van http://www.paulsadowski.com/WSH/cdo.htm

Post by **Bwired** » Wed Apr 09, 2008 9:37 pm

Additional to the above VBscript:
You can include the image as html in the body and you don't have to click on the image it's directly shown.

Post by **TANE** » Wed Apr 09, 2008 9:52 pm

Ron,
Thanks for the script.
Ik ga zo uitproberen.

nu een selectie tool om de juiste foto's te selecteren.

In image folder zijn er ruim 1000 foto's
per actie worden er 5 foto's gemaakt met de juiste tijd.

zie voorbeeld
laatste 5 foto's wil ik dan als bijlage sturen...of een pagina maken met een link die de foto's op een homeseer url kan laten zien.
..nog even zoeken naar de juiste oplossing

bedankt

[img]uploaded/Chak/200849215039_netcam.jpg[/img]

Post by **Bwired** » Wed Apr 09, 2008 10:26 pm

Geen Engels dit keer [:D]
Dan moet je een VB scriptje zoeken wat een laatste foto uit een directory kan halen.
Ik heb geen Homeseer dus kan dit niet testen helaas.

zoiets als dit:

Code: Select all

Set fso = CreateObject _
("Scripting.FileSystemObject")
Set f = _ fso.GetFolder("C:\mydir")
For Each file In f.Files
MsgBox f.Name
Next

Post by **Antoon** » Wed Apr 09, 2008 10:28 pm

Kreeg het niet werkend maar toen zag ik dat voor de deurbel de &text ontbrak [:D]
Thanks

Antoon

Post by **Noob** » Thu Apr 10, 2008 8:45 pm

<blockquote id="quote">quote:<hr height="1" noshade id="quote">You can include the image as html in the body and you don't have to click on the image it's directly shown<hr height="1" noshade id="quote"></blockquote id="quote">Precies...dan moet je natuurlijk wel objMessage.TextBody vervangen door objMessage.htmlbody.

<blockquote id="quote">quote:<hr height="1" noshade id="quote">laatste 5 foto's wil ik dan als bijlage sturen<hr height="1" noshade id="quote"></blockquote id="quote">Zoals Pieter al aangaf moet je dan het filesystemobject gebruiken.
Als je dit combineert met het ADODB.Recordset object kun je gemakkelijk doen wat jij wilt.
Zie voorbeeldcode op
http://www.roubaixinteractive.com/PlayG ... ntents.asp

Succes