how do i read a random line of text from a file?

[kickitship]

the question is how do i read a random line of text from a file? should be easy enough to do, thanks in advance

[matthieuvb]

Try this:

Global $File

$Read = FileRead($File)
$Lines = StringSplit(StringReplace($Read, @CRLF, "|"), "|")
$Random = Int(Random(1, $Lines[0]))
Msgbox(0, "File", $Lines[$Random])

[notsure]

#Include <File.au3>

global $Count = _FileCountLines(@scriptdir & "\yourfile.name")
global $file = FileOpen(@scriptdir & "\yourfile.name")

global $line = FileReadLine($file, int(random(1, $count)))

msgbox(64,"Line", $line)

Edited June 30, 2010 by notsure

[electrico]

Open file with notepad++.

See how much lines it contains.

For example, there is 888 lines.

Then

$handle = FileOpen("C:\example.txt")
$info = FileReadLine($handle, Random(1,888,1))
MsgBox (0, "Random line:", $info)

Edited June 30, 2010 by electrico

[Spiff59]

And just to confuse you, another route...

#include <File.au3>
Global $aLines
_FileReadToArray(@ScriptDir & "\test.txt", $aLines)
$Line = $aLines[Random(1, $aLines[0])]
MsgBox(1,"", $Line)