example on AutoIt language - WeOnlyDo Discussion board

example on AutoIt language (wodXMPP)

by Autoit_user, Tuesday, February 15, 2011, 18:56 (4790 days ago)

Hello!
Dear developer, please make an example in a scripting language AutoIt. Or even be an example of how to get the message.
Thank you.
http://www.autoitscript.com/site/

example on AutoIt language

by AutoIt_user, Tuesday, February 15, 2011, 19:42 (4790 days ago) @ Autoit_user

or make an example of receiving a message at VBS (these languages are very similar)

Re: example on AutoIt language

by wodDamir, Tuesday, February 15, 2011, 20:03 (4790 days ago) @ AutoIt_user

Hi,

Unfortunately, we're no AutoIt developers so I'm not sure how much we can help with questions related to it.

However, in order to receive a message, you need to implement IncomingMessage event. Once you receive a message from someone, XMPPContact and XMPPMessage objects are provided there.

As for VBS sample, although an event could be implemented, there is nothing to keep the application / script *alive*. In other words, the component would connect and exit.

However, since VBS uses VB syntax, I would suggest checking the VB6 samples.

Hope this helps.

Regards,
Damba

Re: example on AutoIt language

by Autoit_user, Wednesday, February 16, 2011, 11:27 (4789 days ago) @ wodDamir

Thank you for your reply. I'm just learning programming, and I do not know other languages. I find it hard to understand the example in VB.
About VBS: please show the theoretical example of how it should be on VBS.
When I have everything working, I can send you an example in Autoit, so you add it to their base example, if you want.
Please take a look at the description of the implementation of the COM in the language AutoIt: Online Documentation
Thank you.

Re: example on AutoIt language

by wodDamir, Wednesday, February 16, 2011, 11:59 (4789 days ago) @ Autoit_user

Hi,

Well, theoretically it should look something like this in VBS (our simple sample, just added IncomingMessage event, and additional comment):

[code]Option Explicit
Dim XMPP1
Set XMPP1 = WScript.CreateObject( WeOnlyDo.wodXMPPCom.1 , wod_ )

' please change these lines, from here
WScript.echo Please edit this file to setup Login and Password properties

XMPP1.Login = somename@wippien.com
XMPP1.Password = password
XMPP1.Blocking = True
'XMPP1.Register = True ' register new account
XMPP1.Connect

'XMPP1.Contacts.Add( someone@wippien.com ).Subscribe ' you can add someone to your contact list...
XMPP1.SendText someone@wippien.com , Hello there!

'Some kind of a message loop
'should be implemented here
'to keep wodXMPP working,
'since it would otherwise die
'at the end of script execution

Sub wod_Disconnected()
WScript.Echo Done and disconnected
End Sub

Sub wod_IncomingMessage(Contact, Message)
WScript.Echo Message From & Contact.JID & vbcrlf & Text: & Message.Text
End Sub[/code]

Hope this helps.

Regards,
Damba