help reading text

[tal]

hey

i try to make a script thats read from one point to another and put the text in other window

like:

<hello>

i want that all the text from the character < to the character > will display"hello"

or

<hellobye> will display "hellobye"

any idea???

please help me it's very impotent for me.

tal

[November]

Hi

Read what and where?

A file? A web Page?

Be more specific.

Cheers

[tal]

I want it to do so

read a text file exp: untitled.txt

find the start point , a character that I decide foe example this one - "<"

and to copy all the text after this point , until he gets the End character ">"

Take all the text he read and copy them to other text file

[SpookMeister]

Clarify what is in your text file a bit.

Is it always like this?

blah blah blah blah

blah blah <this is what I want> blah blah

blah blah blah blah

Or is it sometimes like this?

blah blah blah blah

blah blah <this is

what I want> blah blah

blah blah blah blah

[tal]

the first one

blah blah blah blah

blah blah <this is what I want> blah blah

blah blah blah blah

yes

thanks

[SpookMeister]

In making this little example, I found that it would work for either case.

This example assumes that you only care about the first time you see < and > in the file... and that < precedes >

$fullpath1 = @ScriptDir & "\text.txt"

$file1 = FileOpen($fullpath1, 0)
; Check if file opened for reading OK
If $file1 = -1 Then
    MsgBox(0, "Error", "Unable to open file1.")
    Exit
EndIf

$filetext = FileRead($file1)
$startpoint = StringInStr($filetext, "<")
$endpoint = StringInStr($filetext, ">")
$count = $endpoint - $startpoint
$text = StringMid($filetext, $startpoint + 1, $count - 1)
MsgBox(4096, "", $text)

FileClose($file1)

Edited April 23, 2007 by SpookMeister

[tal]

hey thanks

it realy works

but one more thing

if it will be like this

blah blah blah blah

blah blah [<this is what I want> blah blah <this is what I want>

blah blah blah blah

blah blah <this is what I want>blah blah blah blah

so i need it to take all the text between "<" ">" from all my text

[SpookMeister]

That would take a different approach.... let me see....

[SpookMeister]

How about this:

; Adjust this to point to your file
$fullpath1 = @ScriptDir & "\text.txt"

; Open your file for reading
$file1 = FileOpen($fullpath1, 0)

; Check if file opened for reading OK
If $file1 = -1 Then
    MsgBox(0, "Error", "Unable to open " & $fullpath1)
    Exit
EndIf
; Make a string out of your file
$filetext = FileRead($file1)

; Close your file
FileClose($file1)

; Assign some variables for later use
$flag = 0 ; This will be tested to decide whether or not to save the info
$text = "" ; This ensures that you have a clean starting point for your output

; loop through the string you made out of your file
For $x = 1 To StringLen($filetext)
    ; Assign a variable to hold the current character in your string
    $char = StringMid($filetext, $x, 1)
    If $char = "<" Then $flag = 1
    If $char = ">" Then
        $flag = 0
        $text = $text & @CRLF
    EndIf
    If $flag = 1 And $char <> "<" Then $text = $text & $char
Next

; Display results
MsgBox(4096, "", $text)

It works well with data formatted like so:

blah blah blah blah

blah blah [<this is what I want> blah blah <this is also what I want>

blah blah blah blah

blah blah <this is another thing I want>blah blah blah blah

Edited April 23, 2007 by SpookMeister

[lod3n]

Or this:

#include <String.au3>
#include <array.au3>
$aMatches = _StringBetween( FileRead(@ScriptDir & "\text.txt")  '<', '>')
_ArrayDisplay($aMatches, 'All strings between < and >')

Edited April 23, 2007 by lod3n

[tal]

SpookMeister you are the master

thank you very much

it works perfectly

tal

[tal]

hey all

i have one more problem

now i want the same one but the start point should be a word and not a character

for example:

Hello to all this is my first script > bla bla bla bla bla bla

bla bla Hello abcdefg > bla bla bla

la bla bla hello la bla bla> la bla bla

la bla blala bla bla

the start point will be the word "hello" and the end point will be ">"

and i want it to put all the text between in a mesege box

thanks

tal

[PsaltyDS]

Re-read the answer from lod3n back at post #10...

[tal]

ye

i read this but i don't know what are those commands : _StringBetween , _ArrayDisplay

i didn't found those in the help file

[PsaltyDS]

ye

i read this but i don't know what are those commands : _StringBetween , _ArrayDisplay

i didn't found those in the help file

You don't?!

What version of AutoIt are you running?

Try this:

MsgBox(64, "AutoIt", "Version: " & @AutoItVersion)

The current production version is 3.2.2.0, and the Beta I have is 3.2.3.6.

[tal]

this is my version

3.2.2.0

[jvanegmond]

this is my version

3.2.2.0

The beta version of AutoIt usually is a lot better then the release. It's the beta version that everyone on the forums is using.

[tal]

The beta version of AutoIt usually is a lot better then the release. It's the beta version that everyone on the forums is using.

ok i will download the beat ver

[tal]

Or this:

#include <String.au3>
#include <array.au3>
$aMatches = _StringBetween( FileRead(@ScriptDir & "\text.txt")  '<', '>')
_ArrayDisplay($aMatches, 'All strings between < and >')

well i try this script with my new beta version :

#include <String.au3>

#include <array.au3>

$aMatches = _StringBetween( FileRead(@ScriptDir & "\text.txt") '<', '>')

_ArrayDisplay($aMatches, 'All strings between < and >')

and it didn't work for me

how can i display the results?

[PsaltyDS]

How about (missing comma):

$aMatches = _StringBetween( FileRead(@ScriptDir & "\text.txt"),  '<', '>')

...and _StringBetween() works just as well in the Prod version as it does in Beta!