Send file to .txt file

[Erik.]

Hi,

I can get info about someone whit an ini file but how to save that info to an txt file?

Howto make when a program startup that it makes a txt file whit the data of today whit an inputbox?

[Xenobiologist]

Hi,

sorry what?

So long,

Mega

[jb73034]

Hi,

I can get info about someone whit an ini file but how to save that info to an txt file?

Howto make when a program startup that it makes a txt file whit the data of today whit an inputbox?

$file = FileOpen("test.txt", 1)

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

FileWrite($file, "Line1")
FileWrite($file, "Still Line1" & @CRLF)
FileWrite($file, "Line2")

FileClose($file)

right from the help file.

Edited November 3, 2006 by jb73034

[Erik.]

Hi,

Thanks for the help.

I have a next problem...

When you start the program it will ask for the date of today whit inputbox.

Now when i full in the date it must make a txt file whit the name as date how to do that?

EDIT:

When the first one entered the building you have 1 line into you txt file but how to do it for every people that has entered the building that i must begin on a new line it must count how to count whit line number and how to make that you can see into the program how many peoples has entered?

When i am home i will post my program so far as i am...

EDIT:

Here is my program:

expandcollapse popup

#include <GUIConstants.au3>

GUICreate("Entré I Meet",300,200)

$filemenu = GuiCtrlCreateMenu ("File")
$exititem = GuiCtrlCreateMenuitem ("Exit",$filemenu)
$helpmenu = GuiCtrlCreateMenu ("?")
$aboutitem = GuiCtrlCreateMenuitem ("About",$helpmenu)
$help = GuiCtrlCreateMenuitem ("Help",$helpmenu)


$newbutton = GuiCtrlCreateButton ("Nieuw persoon",50,130,70,20)

$cancelbutton = GuiCtrlCreateButton ("Exit",180,130,70,20)

GuiSetState()

$datum = InputBox("Datum","Voer de datum in van vandaag in dd-mm-jj")
If FileExists($datum) Then
    MsgBox(4096, "", "Bestand bestaat al")
Else
    
EndIf

While 1
    $msg = GUIGetMsg()



    Select
        Case $msg = $GUI_EVENT_CLOSE Or $msg = $cancelbutton
            ExitLoop

        Case $msg = $exititem
            ExitLoop
        
        Case $msg = $newbutton
             $text = InputBox("Nieuw persoon", "Voer het pas nummer in.")
             $var = IniRead("members.ini", $text, "key", "Persoon niet gevonden")
             MsgBox(4096, "Result", $var)
             
        Case $msg = $aboutitem
            Msgbox(0,"About","GUI Menu Test")
        case $msg = $help
            Msgbox(64,"help","Teksthier")
        
    EndSelect
WEnd

GUIDelete()

Exit

Edited November 3, 2006 by Erik.