InputBox Logging

[Aces]

What I'm trying to do is create a script that loads an inputbox (i know how to do that) and saves whatever is input into the box into a text/log file.

I know I should do more searching but I'm really tired and just hoping someone could give a quick example code or direction.

thanks.

[SpookMeister]

Look at GUICtrlRead in the help file

[poisonkiller]

...and FileWrite too.

[Aces]

could someone just post a quick example i could go off of?

edit: thank you by the way #2 and #3

Edited June 11, 2007 by Aces

[/dev/null]

What I'm trying to do is create a script that loads an inputbox (i know how to do that) and saves whatever is input into the box into a text/log file.

I know I should do more searching but I'm really tired and just hoping someone could give a quick example code or direction.

thanks.

$file = "d:\temp\data.txt"

$data = InputBox("Data input", "Enter your data.")

FileWriteLine($file,$data)

[poisonkiller]

$text = InputBox("Test", "Write your text here", "")
FileWrite("yourfilename.txt", $text & @CRLF)

EDIT: damn, /dev/null was faster.

Edited June 11, 2007 by poisonkiller

[Aces]

$file = "d:\temp\data.txt"

$data = InputBox("Data input", "Enter your data.")

FileWriteLine($file,$data)

thank you

[/dev/null]

EDIT: damn, /dev/null was faster.

and even though my laptop shut down just in the moment when I pressed the "Add Reply" button. So, I had to restart the damn thing... ;-))

[Aces]

now how would i go with automatically numbering the lines 1,2,3,4,etc?

[poisonkiller]

Are you looking for FileReadLine()?

[Aces]

Are you looking for FileReadLine()?

no, what I need is to know how to delete lines containing keywords that i input in the text file i specify

also how to automatically number the notes i add to the text with FileWriteLine so if i type "Hello", it ends up as "1. Hello" on this list

[poisonkiller]

no, what I need is to know how to delete lines containing keywords that i input in the text file i specify

I don't really understand what you mean, could you explain it a bit better?

also how to automatically number the notes i add to the text with FileWriteLine so if i type "Hello", it ends up as "1. Hello" on this list

#include <File.au3>
$data = InputBox("Data input", "Enter your data.")
If @error then Exit
$file = @ScriptDir & "\test.txt"
If FileRead($file) = "" Then
$open = FileOpen($file, 1)
FileWriteLine($open, "1. " & $data)
Else
    $split = StringSplit(FileReadLine($file, _FileCountLines($file)), ".")
    $open = FileOpen($file, 1)
    FileWriteLine($open, Number($split[1]+1) & ". " & $data)
EndIf
FileClose($open)