example on AutoIt language (wodXMPP)
by Autoit_user, Tuesday, February 15, 2011, 18:56 (5028 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 (5028 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 (5028 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 (5027 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 (5027 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
