Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 08/30/2023 in all areas

  1. argumentum

    Ribbon

    ..the old exe from way back then. ( I believe that he's looking for this ) Edit: for what I see this zip will be there for 14 days only.
    1 point
  2. UEZ

    Ribbon

    You can download the RibRes.dll from here: RibRes.7z
    1 point
  3. makeithere

    ADR2200

    I know this question was asked many, many years ago. But after recent frustration in dealing with this box, here is the script I wrote to communicate with the Ontrak ADU200. Just copy AduHid.dll to the same folder and run. ;Tested with ONTRAK ADU200 Global $DisplayMsgBox='' ;global $DisplayMsgBox='1' Global $dll = DllOpen( "AduHid.DLL" ) Global $iHandle=0 _TestAduDevice() Func _TestAduDevice() $iHandle=_OpenAduDevice(1) ConsoleWrite(Number($iHandle)&@CRLF) if @error then ConsoleWrite('','','failed open'&@CRLF) _WriteAduDevice($iHandle,'SK0',0,500) sleep(500) _WriteAduDevice($iHandle,'RK0',0,500) _WriteAduDevice($iHandle,'SPK1011',0,500) ;Binary Output Relay Set 1011 _WriteAduDevice($iHandle,'RPK',0,500) ; Read Relay Bits $ret=(_ReadAduDevice($iHandle,'RPK',0,500)) ConsoleWrite('Relay Binary Bits Set to: '&($ret)&@CRLF) sleep(500) ;_WriteAduDevice($iHandle,'RC0',0,500) ; Clear Switch 0 Counter ; sleep(1000) _WriteAduDevice($iHandle,'RPA',0,500) ; Read input Switch Bits $ret=(_ReadAduDevice($iHandle,'RPA',0,500)) ConsoleWrite('Input Switch Bits Set to: '&($ret)&@CRLF) sleep(500) _WriteAduDevice($iHandle,'RE0',0,500) ; Read Switch 0 Count $ret=(_ReadAduDevice($iHandle,'RE0',0,500)) ConsoleWrite(Number($ret)&@CRLF) _WriteAduDevice($iHandle,'DB2',0,500) ; Set Debounce to 100ms _WriteAduDevice($iHandle,'DB',0,500) ; Read Debounce setting $ret=(_ReadAduDevice($iHandle,'DB',0,500)) ConsoleWrite('Debounce Set to: '&($ret)&@CRLF) _WriteAduDevice($iHandle,'WD3',0,500) ; Set Watchdog Timeout to 1min _WriteAduDevice($iHandle,'WD',0,500) ; Read Watchdog Timeout setting $ret=(_ReadAduDevice($iHandle,'WD',0,500)) ConsoleWrite('Watchdog Timeout Set to: '&($ret)&@CRLF) _WriteAduDevice($iHandle,'WD0',0,500) ; Set Watchdog Timeout OFF _CloseAduDevice($iHandle) DllClose( $dll ) EndFunc Func _OpenAduDevice($aduHandle) Local $ret $ret = DllCall( $dll, 'long','OpenAduDevice','long', 500 ) if @error then ConsoleWrite('failed open'&@CRLF) If $DisplayMsgBox <> "" Then MsgBox(0,"_GetLastErrorMessage",$DisplayMsgBox & @CRLF & $ret[0]) return $ret[0] EndFunc Func _CloseAduDevice($aduHandle) Local $ret $ret = DllCall( $dll, 'long','CloseAduDevice','long', $aduHandle ) if @error then ConsoleWrite('failed close'&@CRLF) If $DisplayMsgBox <> "" Then MsgBox(0,"_GetLastErrorMessage",$DisplayMsgBox & @CRLF & $ret[0]) return $ret[0] EndFunc Func _WriteAduDevice($aduHandle,$lpBuffer,$lBytesWritten,$iTimeout) Local $ret $lNumberOfBytesToWrite=StringLen($lpBuffer) $ret = DllCall( $dll, 'long','WriteAduDevice','long', $aduHandle, 'str',$lpBuffer, 'long',$lNumberOfBytesToWrite, 'long', $lBytesWritten, 'long', $iTimeout ) if @error then ConsoleWrite('failed write'&@CRLF) If $DisplayMsgBox <> "" Then MsgBox(0,"_GetLastErrorMessage",$DisplayMsgBox & @CRLF & $ret[0]) return $ret[0] EndFunc Func _ReadAduDevice($aduHandle,$sResponse,$iBytesRead,$iTimeout) Local $ret $ret = DllCall( $dll, 'long','ReadAduDevice','long', $aduHandle, 'str',$sResponse,'str',7, 'long',$iBytesRead, 'long', $iTimeout ) if @error then ConsoleWrite('failed read'&@CRLF) If $DisplayMsgBox <> "" Then MsgBox(0,"_GetLastErrorMessage",$DisplayMsgBox & @CRLF & $ret[0]) return $ret[2] EndFunc
    1 point
  4. You need to figure out why this command is failing. Other issues -- Take a look at _WD_SelectFiles in the help file. This command is intended to work on your target element. Look at the help file entry for _WD_ElementAction for the valid actions, which you should note that "sendKeys" isn't one of them P.S. You really can't expect us to debug your script for you. Please get in the habit of reviewing your own logs to determine which commands are failing so that you can better troubleshoot your own scripts.
    1 point
  5. Danp2

    please help me

    It appears that you are attempting to perform an image search. What program are you trying to automate? P.S. Now would be a good time to review the forum rules if you haven't already done so
    1 point
  6. Did you add? _GDIPlus_Startup() WebView2() _GDIPlus_Shutdown()
    1 point
  7. Danp2

    please help me

    Probably because that file doesn't exist. Curious why you are trying to use AutoItX from within AutoIt. 🤨 P.S. Next time please give your topics a meaningful title.
    1 point
  8. On 64-bit systems you need to run 64-bit version of cmd, example: ;~ The following script can be compiled as 32-bit #include <WinAPIFiles.au3> _WinAPI_Wow64EnableWow64FsRedirection(False) RunWait(@ComSpec & " /k " &'ssh -o "StrictHostKeyChecking no" user@server' ,"", @SW_SHOW) _WinAPI_Wow64EnableWow64FsRedirection(True) Or just compile the script as 64-bit #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_UseX64=y #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** RunWait(@ComSpec & " /k " &'ssh -o "StrictHostKeyChecking no" user@server' ,"", @SW_SHOW)
    1 point
  9. Why not use Opt("TrayIconDebug", 1) read line number from your tray icon.
    1 point
×
×
  • Create New...