Jump to content

Recommended Posts

Hello,

i have a file containing a list of card names i want to send to internet explorer page.

while sending it misses characters in the middle of the sent text.

i decided to do a test to be sure and automate the process to detect the error,  so i send the text to explorer, copy it from explorer, save it in a file then read that file and compare it to the original list using stringinstr.

here's a video of the error.

Link

Edit: you might want to turn down the sound ^

is it a known issue? what can i do to resolve this issue?

using windows 10, US keyboard...

Edited by CrypticKiwi
Link to post
Share on other sites

Sure, here is the original script i used to grab the images...

#include <IE.au3>
$Handle = fileopen("C:\Users\User\Desktop\MTG\CardList.txt",0)
$Read = FileRead($Handle)
$OCCR = 0
Sleep(10000)
While 1
    $OCCR += 1
    $CardEndLoc = StringInStr($Read,@CR,0,$OCCR)
    $Find = StringInStr($Read,"x ",0,$OCCR)
if $Find <> 0 Then
        $Mid =StringMid($Read,$Find -1,$CardEndLoc - ($Find - 1))
        $XX = StringMid($Mid,1,2)
        $CardName = StringMid($Mid,4,$CardEndLoc)

Else
    ExitLoop
        EndIf
Sleep(2000)
send("{CTRLDOWN}f{CTRLUP}Gatherer{Enter}")
Send("{TAB}{TAB}")
Sleep(1000)
ToolTip($CardName)
Send($CardName)

Send("{Enter}")
Sleep(10000)
$oIE = _IEAttach("Gatherer")
;_IELoadWait($oIE)
$ImageURL = _IEPropertyGet($oIE, "locationurl")
$ImageURL = StringReplace($ImageURL,"/Pages/Card/Details.aspx","/Handlers/Image.ashx")
$ImageURL = $ImageURL&"&type=card"
InetGet($ImageURL,"C:\Users\user\Desktop\MTG\Fridges\"&$XX&" "&$CardName&".png",0,0)
WEnd

i dont think its an error in the script because if you look at the vid the missing character is in the middle of the word.

this is what i used to test...

#include <IE.au3>
$Handle = fileopen("C:\Users\User\Desktop\MTG\CardList.txt",0)
$Read = FileRead($Handle)
$OCCR = 0
Sleep(10000)
While 1
    $OCCR += 1
    $CardEndLoc = StringInStr($Read,@CR,0,$OCCR)
    $Find = StringInStr($Read,"x ",0,$OCCR)
if $Find <> 0 Then
        $Mid =StringMid($Read,$Find -1,$CardEndLoc - ($Find - 1))
        $XX = StringMid($Mid,1,2)
        $CardName = StringMid($Mid,4,$CardEndLoc)

Else
    ExitLoop
        EndIf
Sleep(2000)
send("{CTRLDOWN}f{CTRLUP}Gatherer{Enter}")
Send("{TAB}{TAB}")
Sleep(1000)
ToolTip($CardName)
Send($CardName)
Sleep(1000)
Send("{CTRLDOWN}ac{CTRLUP}")
Sleep(500)
Send("{ALTDOWN}{TAB}{ALTUP}")
Sleep(500)
Send("{CTRLDOWN}a{CTRLUP}{BACKSPACE}")
Sleep(500)
Send("{CTRLDOWN}vs{CTRLUP}")
Sleep(500)
Send("{ALTDOWN}{TAB}{ALTUP}")
Sleep(500)
$Handle2 = FileOpen("C:\Users\User\Desktop\MTG\TestSend.txt",0)
$read2 = FileRead($Handle2)
if StringInStr($Read,$read2) = 0 Then MsgBox("","","Not Found"&"-"&$read2)
WEnd

i also tested this with notepad and no errors found...

CardList.txt

Link to post
Share on other sites
1 minute ago, Jos said:

This look very much in conflict with our game automation forum rules ....  right?

hi jos, this is not a game to be automated, and i am not using a bot or automating a "game", i just want to download the images...its a long process to do it manually..

Link to post
Share on other sites
5 minutes ago, Danyfirex said:

Can you share main url?

 

Saludos

sure dany, URL but inorder to start my script you have to first search for a card for {tab} {tab} to work ,pick a name from the list and search for it.

Edited by CrypticKiwi
Link to post
Share on other sites

I can't help you right now. But maybe you can do it using a POST method wait the response and then get the image using inetget.

 

Saludos

Link to post
Share on other sites
27 minutes ago, Danyfirex said:

I can't help you right now. But maybe you can do it using a POST method wait the response and then get the image using inetget.

 

Saludos

Thanks dan, ill try to use post, but this is not the whole issue. i use the send command for alot of tasks unattended and i want to know/be sure if i can depend on it.

Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    No registered users viewing this page.

  • Similar Content

    • By dejhost
      Hi.
      I am trying to automate a software called "LabelImg" (https://pypi.org/project/labelImg/).
      My autoit-script is started once I selected a folder with images within LabelImg. Pressing the button "Next Image" or pressing the shortcut "d" (https://github.com/tzutalin/labelImg#Hotkeys) jumps to the next image in the selected folder. This shall happen once per second.
      #include <Misc.au3> #include <MsgBoxConstants.au3> #include <AutoItConstants.au3> Opt("WinTitleMatchMode", 1) Local $hDLL = DllOpen("user32.dll") While 1 If _IsPressed("1B", $hDLL) Then ExitLoop Else Local $temp = WinActivate("labelImg") ConsoleWrite($temp & @CRLF) If WinActivate("labelImg") Then ConsoleWrite("All Set!" & @CRLF) EndIf ;Send("d") Local $temp = MouseClick($MOUSE_CLICK_RIGHT, 50, 200) If $temp <> 1 Then MsgBox(1, "$temp", $temp) ExitLoop EndIf Sleep(1000) EndIf WEnd DllClose($hDLL) So the Send ("d")-command and the MouseClick are alternative methods to jump to the next image. Both fail.
      Both ConsoleWrite's deliver proper feedback (I continiously get the handle and "All set" ).

      Could you tell me what I'm doing wrong? 
      Thank you.
    • By Danyfirex
      AT Command UDF - for control AT Modems, send SMS, get SMS
       
      Changelog:
      #cs 1.0.0 2020/10/03 . First version - Danyfirex + mLipok 1.0.1 2020/10/04 . Added - Function - _ATCmd_IsPINReady - Danyfirex . Added - Function - _ATCmd_IsPINRequired - Danyfirex . Added - Function - _ATCmd_IsSIMInserted - Danyfirex . Added - Function - _ATCmd_IsSenderSupported - Danyfirex . Added - Function - _ATCmd_OnPINReques - Danyfirex . Added - Function - _ATCmd_SMS_ListTextMessages - Danyfirex . Added - Function - _ATCmd_SetPIN - Danyfirex . Added - Function - __ATCmd_GetPINCounter - Danyfirex - Added - ENUM - $ATCmd_ERR_PIN - Danyfirex - Added - ENUM - $ATCmd_ERR_SIM - Danyfirex . Changed - __ATCmd_ComposePDU() - using _ATCmd_UseUCS2() internally instead parameter - Danyfirex . Suplemented - #CURRENT# - Danyfirex . . 1.0.2 2020/10/05 . Added - ENUM - $ATCmd_MSGLIST_* - mLipok . Added - ENUM - $ATCmd_STATUS__* - mLipok - Added - ENUM - $ATCmd_ERR_PARAMETER - mLipok . Added - _ATCmd_UsePDU() - parameter validation - mLipok . Added - _ATCmd_UseUCS2() - parameter validation - mLipok . Added - more error logs . Changed - MagicNumber replaced with Standard UDF constants - mLipok . Small refactoring - mLipok . . 1.0.3 2020/10/05 . CleanUp - Danyfirex . . 1.0.4 2020/10/05 . Small refactoring - Danyfirex . CleanUp - Danyfirex . . 1.0.5 2020/10/23 . _ATCmd_FullLoging - mLipok . _ATCmd_CMEESetup() ... @WIP - mLipok . $ATCMD_STATUS_11_SUBSCRIBERNUMBER - mLipok . . 1.0.6 2020/10/25 . __ATCmd_CMSErrorParser() - mLipok . . @LAST https://www.nowsms.com/gsm-modem-cms-error-code-list https://m2msupport.net/m2msupport/at-command-to-enable-error-codes/ https://www.micromedia-int.com/en/gsm-2/73-gsm/669-cme-error-gsm-equipment-related-errors https://assets.nagios.com/downloads/nagiosxi/docs/ATCommandReference.pdf https://www.maritex.com.pl/product/attachment/40451/15b4db6d1a10eada42700f7293353776 https://www.multitech.net/developer/wp-content/uploads/2010/10/S000463C.pdf https://www.telit.com/wp-content/uploads/2017/09/Telit_AT_Commands_Reference_Guide_r24_B.pdf https://docs.rs-online.com/5931/0900766b80bec52c.pdf PDU Format / Testers / Encoders / decoders https://m2msupport.net/m2msupport/sms-at-commands/#pduformat http://smstools3.kekekasvi.com/topic.php?id=288 #ce  
       
      Saludos
    • By Synaps3
      This script will make it so you can press Alt + "+" in Windows Explorer to select all files with the current file extension. This is something that I wanted for a long time and it should be a feature in Windows, but it's not. The only way to get close is to use the search thing (but then it shows the results excluding everything else) or to group by that type, but I don't want it grouped.
      You can press Alt + Enter right after to open properties on those files or you can press delete to delete only files of that type.
      You need the "Automating Windows Explorer" pack here: https://www.autoitscript.com/forum/topic/162905-automating-windows-explorer/
       
      #include "Includes\AutomatingWindowsExplorer.au3" #include <Array.au3> Opt( "MustDeclareVars", 1 ) HotKeySet("!=", "SelectTypes") Func SelectTypes() ; Windows Explorer on XP, Vista, 7, 8 Local $hExplorer = WinGetHandle("[REGEXPCLASS:^(Cabinet|Explore)WClass$]") If Not $hExplorer Then MsgBox(0, "Explorer", "Could not find Windows Explorer.") Return EndIf $hExplorer = WinActive("[REGEXPCLASS:^(Cabinet|Explore)WClass$]") If Not $hExplorer Then MsgBox(0, "Explorer", "Windows Explorer is not in focus.") Return EndIf ; Get an IShellBrowser interface GetIShellBrowser($hExplorer) If Not IsObj($oIShellBrowser) Then MsgBox(0, "Explorer", "Could not get an IShellBrowser interface.") Return EndIf ; Get other interfaces GetShellInterfaces() ; Get selected files with full path ;GetFiles( $fSelected = False, $fFullPath = False, $fPidl = False, $iMax = 0 ) Local $aAllFiles = GetItems(False, False) Local $aFiles = GetItems(True, False) Local $sExt Local $i If UBound($aFiles) = 1 Then ;MsgBox(0, "Selected", $aFiles[0]) $sExt = StringRight($aFiles[0], StringLen($aFiles[0]) - StringInStr($aFiles[0], ".", 0, -1)) ;MsgBox(0, "Selected", $sExt) For $i = 0 To UBound($aAllFiles) - 1 If StringInStr($aAllFiles[$i], ".") > 0 Then If StringRight($aAllFiles[$i], StringLen($aAllFiles[$i]) - StringInStr($aAllFiles[$i], ".", 0, -1)) = $sExt Then SetSelectedItem($i) EndIf EndIf Next Else MsgBox($MB_ICONWARNING, "Error", "None or multiple items selected!") EndIf EndFunc While 1 GUIGetMsg() Wend  
    • By Drac89
      Hi Team, 
      I am trying to send credentials via autoit on a web app launched via IE. I am passing the credentials into variables and trying to send them send("$username") but username field isn't getting populated. But the password field, I can send the credential, also when I try ieformsetvalue and set the username wrt username field fetched, it's getting send but my login button remains greyed out. 
      Can angularjs keydown function interfere in the autoit send process and not allow the credentials passed if it's not typed out? This is a general question to understand if javascript or angular js etc could detect if the credentials are automated, then it might not detect it as a keydown? 
    • By WoodGrain
      Hi All,
      Trying to open windows explorer to a WebDav location and it's not working quite how I want, on the computers it is setup as a "network location" (as opposed to a "mapped drive", and this unfortunately can't be changed), the "Data" WebDav folder sits directly under "This PC" if that's an easier way to get to it. any suggestions as to what I can correct to get the 2nd example to work?
      ; This works, but I'm trying to avoid this as users normally see the URL style in the 2nd example below $folderToOpen = "\\mycompany.sharepoint.com@SSL\DavWWWRoot\Data" Run("Explorer.exe " & $folderToOpen) ; This does not work, it tries to open the WebDav url in the default web browser $folderToOpen = "https://mycompany.sharepoint.com/Data" Run("Explorer.exe " & $folderToOpen) ShellExecute also opens it in the default browser.
      Saw _WinAPI_ShellOpenFolderAndSelectItems but couldn't get the 2nd example to work.
      If I manually open Windows Explorer and paste in https://mycompany.sharepoint.com/Data it loads the WebDav directory without issue.
      If I have to use the pathing from the first example it is fine, just trying to give users a familiar experience.
      Thanks!
×
×
  • Create New...