ynbIpb

alankam58, please show your results? interested in the code on and off switch.

[deleted]

#Include <WinAPIEx.au3> $path = _WinAPI_GetModuleFileNameEx($Pid)

Thanks asdf8, but I need to work with binary data Zlib with header: 0x789C Can you give me an example?

Hi! I understand that I can use the UDF from Ward, but how do I use this library without the size of the uncompressed data? Or tell me another library (I'm interested in solutions DLL) Thanks.

Hi Ward! Thank you for this UDF I have a problem: I need to replace a few bytes of binary data. But replace the data is longer than the original data. In this situation it would fit function _BinaryReplace, but it changes, not where I want. I know the exact start Offset from which data and their length. example: Input data: 00 00 11 00 11 00 11 00 00 00 ; I need to replace the red Output data: 00 00 11 00 FF FF 00 11 00 00 00 ; like this or Input data: 00 00 11 00 11 00 11 00 00 00 Output data: 00 00 11 00 FF 11 00 00 00 I do not know exactly what it is first or last, but I know the offset and size It is possible to refine the function _BinaryReplace, so she was not looking for a string and tell it the exact offset sorry for bad english

No errors. In the console only: I do not understand how did these variables: $oContact, $oChatRoom, $oMessageFor them need to create objects?

And others can see it? Or do you need more time?

Thank you for your answers. Component developers are good people, but they do not work with AutoIt and can not make an example. Yes, the problem is Object Event - I do not understand how to work with him. And with the new "AutoItObject.au3" I am even more confused. trancexx, in your example, works only: wodXMPP1_Connected () event. Please show a working example of the incoming message without "AutoItObject.au3". I read the documentation, but I do not understand how it works. Here is the base of all examples. Please help.

Here are my achievements. I can connect to the server, send messages to the user. The main problem: How do I receive messages? #NoTrayIcon #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <GUIListBox.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> OnAutoItExitRegister( "_Jdisconnect" ) $sWodXMPP_dll = @SystemDir & "\wodXMPP.dll" $sSettings_ini = @ScriptDir & "\settings.ini" If FileExists ($sWodXMPP_dll) = 0 Then FileCopy (@ScriptDir & "\wodXMPP.dll", $sWodXMPP_dll, 1) ; copy to system folder RunWait(@SystemDir & '\regsvr32.exe /s ' & $sWodXMPP_dll) ; register a component in the system EndIf $xmpp = ObjCreate("WeOnlyDo.wodXMPPCom.1") $Form1 = GUICreate("Simple Example wodXMPP ActiveX", 528, 410) $Label1 = GUICtrlCreateLabel("Jabber ID:", 8, 8, 53, 17) $Label2 = GUICtrlCreateLabel("Password:", 8, 32, 53, 17) $Input1 = GUICtrlCreateInput("", 65, 5, 215, 21) ; jabber ID $Input2 = GUICtrlCreateInput("", 65, 30, 215, 21) ; password $List1 = GUICtrlCreateList("", 288, 5, 233, 357) $Checkbox1 = GUICtrlCreateCheckbox("Register as new user", 8, 60, 177, 17) $Button1 = GUICtrlCreateButton("Go online", 8, 90, 132, 35) $Button2 = GUICtrlCreateButton("Offline", 148, 90, 132, 35) GUICtrlSetState ($Button2, $GUI_DISABLE) $Label3 = GUICtrlCreateLabel("Send message to:", 8, 327, 89, 17) $Input3 = GUICtrlCreateInput("", 104, 324, 177, 21) $Edit1 = GUICtrlCreateEdit("", 8, 348, 218, 50, BitOR ($ES_MULTILINE, $ES_AUTOVSCROLL, $ES_MULTILINE, $ES_WANTRETURN)) $Button3 = GUICtrlCreateButton("Send", 230, 348, 50, 50) GUICtrlSetState ($Button3, $GUI_DISABLE) $Label4 = GUICtrlCreateLabel("", 288, 368, 233, 35, $SS_CENTER) If FileExists ($sSettings_ini) Then GUICtrlSetData ($Input1, IniRead ($sSettings_ini, "general", "jid", "")) GUICtrlSetData ($Input2, IniRead ($sSettings_ini, "general", "pass", "")) EndIf GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 _Connect_to_server() Case $Button2 _Disconnect_from_server() Case $Button3 _send_message () EndSwitch WEnd Func _Connect_to_server() $sJid = GUICtrlRead ($Input1) $sPass = GUICtrlRead ($Input2) If $sJid = "" Or $sPass = "" Then GUICtrlSetData ($Label4, "Error! Please enter your login and password") Return EndIf GUICtrlSetData ($Label4, "Connecting...") $xmpp.Security = 0 $xmpp.Authentication = 0 $xmpp.Login = $sJid $xmpp.Password = $sPass $conn_timer_begin = TimerInit() $iStatus = $xmpp.State If $iStatus = 0 Then $xmpp.Connect While $iStatus <> 5 sleep (200) $iStatus = $xmpp.State $conn_timer_diff = TimerDiff($conn_timer_begin) If $conn_timer_diff >= 20000 And $iStatus = 0 Then GUICtrlSetData ($Label4, "Error! Not Connected") Return EndIf WEnd EndIf GUICtrlSetData ($Label4, "Online!") GUICtrlSetState ($Button1, $GUI_DISABLE) GUICtrlSetState ($Button2, $GUI_ENABLE) GUICtrlSetState ($Button3, $GUI_ENABLE) EndFunc Func _send_message () $sMessageText = GUICtrlRead ($Edit1) $sRecipient = GUICtrlRead ($Input3) If $sMessageText = "" or $sRecipient = "" Then GUICtrlSetData ($Label4, "Error! Nothing to send or no the recipient.") Return EndIf $xmpp.SendText ($sRecipient, $sMessageText) GUICtrlSetData ($Edit1, "") EndFunc Func _Disconnect_from_server() $xmpp.Disconnect GUICtrlSetData ($Label4, "Offline!") GUICtrlSetState ($Button2, $GUI_DISABLE) GUICtrlSetState ($Button3, $GUI_DISABLE) GUICtrlSetState ($Button1, $GUI_ENABLE) EndFunc Func _Jdisconnect () $xmpp.Disconnect EndFunc

Please help convert a small example to Autoit. This is an example of interaction with the component: wodXMPP ActiveX component Need connect to the server, send and receive messages. Help please. I can not deal with COM objects. Thank you! In Attach an archive with everything you need: the project on VB 5, Component and the test account. Simple_example_VB_5.rar

UP! I, too, are interested in theme QR Code. Looking for information on code generation using Autoit. Thanks in advance.

zackrspv, Please show me an example of how to receive messages using the library wodXMPP Thank you.

How do I know what groups exist on the local machine?For example, administrators at other locales written differently

Hi! I have a problem: There are 2 types of flash. 01.swf - works well, 02.swf - can not stop. two_swf_files.rarPlease help.