Datei editieren
Übersicht
BlitzBasic Beginners-Corner
SamqBetreff: Datei editieren |
 So, Dez 02, 2007 3:34Antworten mit Zitat 
|
|
|---|---|---|
|
Ich möchte zu einer datei eine Zeile hinzufügen ohne den eintrag der zuvor gemacht wurde zu löschen also am ende der Zeile halt einfügen, im moment löscht er die die datei und erstellt sie neu.
und ja ich hab es schon mit readfile probiert Code: [AUSKLAPPEN] window=CreateWindow("Window",100,100,350,150,0,25) SetStatusText window , "wer das nicht liest ist ein überflieger" AppTitle "SMeSS" Name=CreateTextField(10,30,200,20,window) Pass=CreateTextField(10,75,200,20,window,1) button1=CreateButton("Freischalten",220,10,100,20,window,1) button2=CreateButton("Abrechen",220,32,100,20,window,1) timertext=CreateLabel( "Benutzernr.",10,10,80,15,window,1) timertext=CreateLabel( "Passwort",10,55,80,15,window,1) While kkk = 0 If KeyDown (1) Then End e = WaitEvent () Select e Case $803 Datei$="update.exe" ExecFile Datei$ End Case $401 Select EventSource () Case Name n=TextFieldText$(Name) If n>200000 Notify "Falscher Benutzername!" n=200000 EndIf If n SetGadgetText Name,n Else SetGadgetText Name,"" Case button1 deffile = WriteFile("dag.sme") WriteLine deffile,"http://chatbp.phone.hl-users.com/mess/member/" + TextFieldText(name) + "/" + TextFieldText(Pass) + "/" CloseFile deffile End Case button2 End End Select End Select Wend |
||
Lion |
So, Dez 02, 2007 4:00 Antworten mit Zitat
|
|
|---|---|---|
| Kannst ja erst die datei mit ihrem inhalt auslesen, den in variablen fügen, dann die mit writeline schreiben und danach halt das writeline was du da neu machst. | ||
|
Intel Core 2 Quad 4x2.66 ghz - 4gb ddr2 - nvidia GeForce GTX660 2gb
Intel Atom 1x1.83 ghz - 2gb ddr2 - intel GMA 3150 256mb AMD A10-5750M 4x2.5 ghz - 8 gb ddr4 - AMD R9 M290x |
||
Samq |
So, Dez 02, 2007 5:07 Antworten mit Zitat
|
|
|---|---|---|
|
Das war doch mit EOF
oder ? Datei$="test.txt" DateiID = ReadFile(Datei$) WriteLine DateiID,"Hallo" While Not Eof(DateiID) WriteLine DateiID,"Hallo" Wend CloseFile DateiID Delay 2000 der macht aber nix ^^ |
||
|
RallimenSieger des 30-EUR-Wettbewerbs |
So, Dez 02, 2007 11:13 Antworten mit Zitat
|
|---|---|---|
|
Code: [AUSKLAPPEN] readfile öffnet eine Datei nur zum lesen!
Code: [AUSKLAPPEN] openfile öffnet eine Datei zum lesen und schreiben!
|
||
|
[BB2D | BB3D | BB+]
|
||
Samq |
So, Dez 02, 2007 18:44 Antworten mit Zitat
|
|
|---|---|---|
|
Datei$="test.txt"
DateiID = OpenFile(Datei$) WriteLine DateiID,"Hallo" While Not Eof(DateiID) Wend WriteLine DateiID,"Hallo" CloseFile DateiID der schreibts trootzdem nur einmal |
||
|
Thunder |
So, Dez 02, 2007 18:56 Antworten mit Zitat
|
|---|---|---|
|
Bin zwar nicht der beste auf dem Gebiet aber es gibt doch
Code: [AUSKLAPPEN] SeekFile 
|
||
| Meine Sachen: https://bitbucket.org/chtisgit https://github.com/chtisgit | ||
|
|
RallimenSieger des 30-EUR-Wettbewerbs |
So, Dez 02, 2007 19:07 Antworten mit Zitat
|
|---|---|---|
|
So gehts...
Code: [AUSKLAPPEN] Datei$="test.txt"
DateiID = OpenFile(Datei$) SeekFile DateiID,FileSize("test.txt") WriteLine DateiID,"Hallo" CloseFile DateiID |
||
|
[BB2D | BB3D | BB+]
|
||
Samq |
So, Dez 02, 2007 19:25 Antworten mit Zitat
|
|
|---|---|---|
| Danke danke danke | ||
Übersicht
BlitzBasic Beginners-Corner
Powered by phpBB © 2001 - 2006, phpBB Group