Jump to content

Issues with InetRead, BinaryToString, and StringBetween

xiantez

By xiantez,
in AutoIt General Help and Support

 Share Followers 0

Recommended Posts

xiantez

xiantez 0

Posted
Posted

Hello AutoIT community. 

I am attempting to make a script that will login to my bank account and retrieve one of my account balances and display it in a MsgBox, however it am having some difficulty getting the correct value.... The MsgBox keep displaying a value of "0" instead of the actual string in between the source code I'm looking for.... Any help would be greatly appreciated!

$readtext = InetRead("https://www.xxxbanksitexxx.com/das/cgi-bin/session.cgi?screenid=SIGNON_PORTAL_PAUSE&LOB=CONS",1)
$source = BinaryToString($readtext)
$text =  _StringBetween($source,'CHECKING XXXXXXXXXX ', ' "> ')


MsgBox(0,"balance",$text)     ;This keeps returning a value of "0"


        Case $GUI_EVENT_CLOSE
           GUIDelete($Form1)
            ExitLoop
         Case $Button2
            GUIDelete($Form1)
            ExitLoop
    EndSwitch
WEnd

 

 

Link to post
Share on other sites
Danyfirex

Danyfirex 787

Posted
Posted (edited)

HI.   _StringBetween return an array.

try this way to see whole array. 

$readtext = InetRead("https://www.xxxbanksitexxx.com/das/cgi-bin/session.cgi?screenid=SIGNON_PORTAL_PAUSE&LOB=CONS",1)
$source = BinaryToString($readtext)
$text =  _StringBetween($source,'CHECKING XXXXXXXXXX ', ' "> ')



_ArrayDisplay($text)


        Case $GUI_EVENT_CLOSE
           GUIDelete($Form1)
            ExitLoop
         Case $Button2
            GUIDelete($Form1)
            ExitLoop
    EndSwitch
WEnd

You should include #include <Array.au3>  for use _arraydisplay

Saludos

Edited by Danyfirex

:hyper: Danysys.com :ninja:

autoit_scripter_blue_userbar.png

       AutoIt...

 

UDFs: VirusTotal API 2.0 UDF - libZPlay UDF - Apps: Guitar Tab Tester - VirusTotal Hash Checker

Examples: Text-to-Speech ISpVoice Interface - Get installed applications - Enable/Disable Network connection   PrintHookProc - WINTRUST - Mute Microphone Level - Get Connected NetWorks - Create NetWork Connection ShortCut

 

 

Link to post
Share on other sites
xiantez

xiantez 0

Posted
  • Author
Posted (edited)

Hi DanyFirex,

Thank you for your suggestion, however when i use _ArrayDisplay($text) I do not see anything on my screen.... Is there another command i need to do to see this text pop up? Here is what I have now

 

$readtext = InetRead("https:/xxxbanksitexxx.com/das/cgi-bin/session.cgi?screenid=SIGNON_PORTAL_PAUSE&amp;LOB=CONS",1)
$source = BinaryToString($readtext)
$text =  _StringBetween($source,'CHECKING XXXXXXXXXX&nbsp;','">')

_ArrayDisplay($text)

Edited by xiantez
Link to post
Share on other sites
Gianni

Gianni 812

Posted
Posted (edited)

If the _ArrayDisplay() function doesn't show anyting is because $text is not an array, and if is not an array is because the _StringBetween() function has found nothing.
Perhaps the start and end parameters that you use in the _StringBetween() function will not catch any string, try to use only "'CHECKING" as The beginning of the string to find and see if it will catch something.
Try this snippet to do a little debug: 

#include <Array.au3>
#include <String.au3>

$readtext = InetRead("https:/xxxbanksitexxx.com/das/cgi-bin/session.cgi?screenid=SIGNON_PORTAL_PAUSE&amp;LOB=CONS", 1)
$source = BinaryToString($readtext)
$text = _StringBetween($source, 'CHECKING', '">')

If Not IsArray($text) Then
    MsgBox(0, "Debug", "No string found by _StringBetween()")
Else
    _ArrayDisplay($text)
EndIf

 

Edited by Chimp

 

image.jpeg.9f1a974c98e9f77d824b358729b089b0.jpeg Chimp

small minds discuss people average minds discuss events great minds discuss ideas.... and use AutoIt....

Link to post
Share on other sites
AutoBert

AutoBert 199

Posted
Posted

Have you checked the result of InetRead?

  
$readtext = InetRead("https://www.xxxbanksitexxx.com/das/cgi-bin/session.cgi?screenid=SIGNON_PORTAL_PAUSE&amp;LOB=CONS",1)
 $source = BinaryToString($readtext)
MsgBox(0,"Whole Text",$source)     ;This keeps returning a value of "0" 
 
 $text =  _StringBetween($source,'CHECKING XXXXXXXXXX&nbsp;', ' "> ') 


 MsgBox(0,"balance",$text[0])     ;This keeps returning a value of "0"

 

Link to post
Share on other sites
Danyfirex

Danyfirex 787

Posted
Posted

try to create a file with downloaded data and check if the field you need exist.

 

Saludos

:hyper: Danysys.com :ninja:

autoit_scripter_blue_userbar.png

       AutoIt...

 

UDFs: VirusTotal API 2.0 UDF - libZPlay UDF - Apps: Guitar Tab Tester - VirusTotal Hash Checker

Examples: Text-to-Speech ISpVoice Interface - Get installed applications - Enable/Disable Network connection   PrintHookProc - WINTRUST - Mute Microphone Level - Get Connected NetWorks - Create NetWork Connection ShortCut

 

 

Link to post
Share on other sites
xiantez

xiantez 0

Posted
  • Author
Posted
9 hours ago, Chimp said:

If the _ArrayDisplay() function doesn't show anyting is because $text is not an array, and if is not an array is because the _StringBetween() function has found nothing.
Perhaps the start and end parameters that you use in the _StringBetween() function will not catch any string, try to use only "'CHECKING" as The beginning of the string to find and see if it will catch something.
Try this snippet to do a little debug: 

#include <Array.au3>
#include <String.au3>

$readtext = InetRead("https:/xxxbanksitexxx.com/das/cgi-bin/session.cgi?screenid=SIGNON_PORTAL_PAUSE&amp;LOB=CONS", 1)
$source = BinaryToString($readtext)
$text = _StringBetween($source, 'CHECKING', '">')

If Not IsArray($text) Then
    MsgBox(0, "Debug", "No string found by _StringBetween()")
Else
    _ArrayDisplay($text)
EndIf

 

I think you are on to something Chimp.... My MsgBox was triggered due to not finding a string in the $source.... interesting....

I have questioned whether or not my InetRead is working properly.... I am not sure what source code I should be using now, i figured I could just log into my account, right click the main page and "get source code" would suffice..... I guess not.... =\ 

Link to post
Share on other sites
xiantez

xiantez 0

Posted
  • Author
Posted
7 hours ago, AutoBert said:

Have you checked the result of InetRead?

  
$readtext = InetRead("https://www.xxxbanksitexxx.com/das/cgi-bin/session.cgi?screenid=SIGNON_PORTAL_PAUSE&amp;LOB=CONS",1)
 $source = BinaryToString($readtext)
MsgBox(0,"Whole Text",$source)     ;This keeps returning a value of "0" 
 
 $text =  _StringBetween($source,'CHECKING XXXXXXXXXX&nbsp;', ' "> ') 


 MsgBox(0,"balance",$text[0])     ;This keeps returning a value of "0"

 

AutoBert,

I am going to do this next... Thanks!!!

Link to post
Share on other sites
xiantez

xiantez 0

Posted
  • Author
Posted (edited)

Well.... This is strange.....

I checked the results of my InetRead and used WriteFile.... The source code is not at all what I expected.... It is not even the same source code that I see when I "view source code" from my browser.... Grrrr, thats annoying lollll

I could only imagine they might be embedding this stuff into an applet or something... I did notice that when i view my checking account, the session ID in the URL changes constantly.... This is pretty standard in embedded applications via web front ends... I have no clue how to get around that though....

Here are the results of my INetRead when i write it into an html file...

 

2016-01-24_11-55-25.png

Edited by xiantez
Link to post
Share on other sites
Danyfirex

Danyfirex 787

Posted
Posted

Of course. you need credentials. try to use  IE.

Saludos

:hyper: Danysys.com :ninja:

autoit_scripter_blue_userbar.png

       AutoIt...

 

UDFs: VirusTotal API 2.0 UDF - libZPlay UDF - Apps: Guitar Tab Tester - VirusTotal Hash Checker

Examples: Text-to-Speech ISpVoice Interface - Get installed applications - Enable/Disable Network connection   PrintHookProc - WINTRUST - Mute Microphone Level - Get Connected NetWorks - Create NetWork Connection ShortCut

 

 

Link to post
Share on other sites
xiantez

xiantez 0

Posted
  • Author
Posted
5 minutes ago, Danyfirex said:

Of course. you need credentials. try to use  IE.

Saludos

Yes, my script  already knows how to log in and pass credentials.... that part works fine.... it not until it attempts to retrieve the source code is when i get those INetResults... I need to find a way to attach it to an existing session ID.... Because when my script makes the INetRead or _IEGetSource call, the website doesn't recognize the call from an existing session ID, thus timing me out....

I did find a work around using the following code

$rText = _IEBodyReadText($oIE)

FileWrite("source.txt",$rText)

Then I can just read the text from the file and output it to a msgbox.... Not my ideal way of doing it, but it works for now...

Link to post
Share on other sites
Danyfirex

Danyfirex 787

Posted
Posted

You dont need to write to a file. you can use  $rText  with _StringBetween

 

Saludos

:hyper: Danysys.com :ninja:

autoit_scripter_blue_userbar.png

       AutoIt...

 

UDFs: VirusTotal API 2.0 UDF - libZPlay UDF - Apps: Guitar Tab Tester - VirusTotal Hash Checker

Examples: Text-to-Speech ISpVoice Interface - Get installed applications - Enable/Disable Network connection   PrintHookProc - WINTRUST - Mute Microphone Level - Get Connected NetWorks - Create NetWork Connection ShortCut

 

 

Link to post
Share on other sites
Danyfirex

Danyfirex 787

Posted
Posted

You can use _arrayadd

 

Saludos

:hyper: Danysys.com :ninja:

autoit_scripter_blue_userbar.png

       AutoIt...

 

UDFs: VirusTotal API 2.0 UDF - libZPlay UDF - Apps: Guitar Tab Tester - VirusTotal Hash Checker

Examples: Text-to-Speech ISpVoice Interface - Get installed applications - Enable/Disable Network connection   PrintHookProc - WINTRUST - Mute Microphone Level - Get Connected NetWorks - Create NetWork Connection ShortCut

 

 

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
 Share
Followers 0
Go to topic listing

  • Recently Browsing   0 members

    No registered users viewing this page.

  • Similar Content

    • walec
      Reading data from the website
      By walec
      Hello
      The function below worked for a long time. Now it doesn't download anything and I don't know where the error is.
      #include <InetConstants.au3> Local $Link = 'https://allegro.pl/kategoria/nasiona-warzywa-99776?bmatch=e2101-d3681-c3682-hou-1-4-0319' Local $dStrona = InetRead($Link) Local $sStrona = BinaryToString($dStrona, $SB_UTF8) ;GUICtrlSetData($myedit, $sStrona) ConsoleWrite($sStrona) The function was good because it reading data in the background.
      Thank you for any hints or possibly other solutions / functions that are reading data in the background.
       
    • Blueman
      InetRead Prevent Hang Script?
      By Blueman
      Hi all,
      I was wondering if you can help me with the function called; InetRead().
      My scripts are using this function a lot for several conditions and everything works fine!
      But sometimes when the server is a little bit buggy of simply not available my script is hanging.
      It takes about 90sec before this function returns a Timeout, when i adjust the parameter it still is hanging about 90sec.
      The following script is a example where the script is hanging for aprox. 90sec;
      ; Set Timeout to 2sec AutoItSetOption ("TCPTimeout", 2000) ; Read Website InetRead("http://www.geenverbinding.nl/",1) ; Show Msgbox before Ending Script. Msgbox(64,"","Finished")  
      The following script is a example where the script show the Msgbox pretty fast;

       
      ; Set Timeout to 2sec AutoItSetOption ("TCPTimeout", 2000) ; Read Website InetRead("http://www.google.nl/",1) ; Show Msgbox before Ending Script. Msgbox(64,"","Finished")  
      My question now is, what am i doing wrong and/or is there a other way to prevent Hanging the script?
      Thanks all
       
    • 31290
      find specific piece of link in web page
      By 31290
      Hi everyone, hope you are doing fine
      Well, I'm currently writing a small script that goes to a certain web page, finds the first link of a specified section and download the file associated to this link.
      Depending on the computer that the tool is launched, the script gets the computer model and search in the (provided here) ini file which link to follow.
      At first, Dell was kind enough to provide only one link but now, they provide two of them. The first one is now a .txt file (  ) whereas my script has been designed to download only the fist and latest link released for the BIOS Update.

      Here's the current code which is working with only the first and latest link of the BIOS category:
      So the question is: 
      In the case of double links like shown in the picture above, how it is possible to tell the script to download only the link containing an the .exe file?
      Of course, I could have changed the array result to [1] instead of [0] [which is working] but it seems that Dell does that randomly and that I deal with a lot of computer models.
      Thanks for the help you can provide, 
      -31290-
       
      SEE_BIOS_LINKS.ini
    • rootx
      [SOLVED] _HexToString or BinaryToString ?
      By rootx
      There is a way to have a clean string value without any SOH STX etc... Values
       
      #include <FileConstants.au3> #include <String.au3> #include <WinAPI.au3> #include <Array.au3> #include <File.au3> $file = _FileListToArrayRec(@ScriptDir,"*.otf",1,1,0,2) For $x = 1 to UBound($file)-1 ;ConsoleWrite(_ReadOffSet($ISO[$x],0x000000,12)) ConsoleWrite(_HexToString(StringStripWS(_ReadOffSet($file[$x],0x000000,16), 8))&@CRLF) $String = StringReplace(BinaryToString(_ReadOffSet($file[$x],0x000000,16)), Chr(0), "") FileWrite(@ScriptDir&"\file.txt",$String&@CRLF) FileWrite(@ScriptDir&"\file2.txt",_HexToString(StringStripWS(_ReadOffSet($file[$x],0x000000,16), 8))&@CRLF) Next Func _ReadOffSet($sFilePath,$iOffset,$iLen=1) Local $sRet="" Local $hFile=FileOpen($sFilePath,$FO_BINARY) FileSetPos($hFile,$iOffset,$FILE_BEGIN) $sRet=FileRead($hFile,$iLen) FileClose($hFile) Return $sRet EndFunc  
    • Mark917
      resolving data-time
      By Mark917
      I am trying to extract a date and time from a website using InetRead.  The source for the page I am reading shows the date and time as shown below.  I need to somehow extract the correct date and time from this information.  Is there a function or calculation that will do this?  The source shown here correlates to 15:20 (time) 29.03.17 (date).
      <div class="cell game-date" data-time="1490818800000"> <div class="site__time" data-time="1490818800000"> <div class="time"></div> <div class="date"></div> </div> </div>  
×
×
  • Create New...