Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

Zeilen an Datei anhängen.

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
s-m-n



Anmeldungsdatum: 03.10.2005
Beiträge: 106
Wohnort: Pietling in Oberbayern / Deutschland

BeitragVerfasst am: 16.06.2006, 11:02    Titel: Zeilen an Datei anhängen. Antworten mit Zitat

Hi,

Code:

w$ = "Einwahl um "
y$ = ", gewählter Tarif: "

f = FREEFILE

OPEN "asdial.log" FOR BINARY AS #f

put #f, , w$
put #f, , time$
put #f, , y$
PUT #f, , x$


Das ist der Programmmteil für die Logdatei-Ausgabe eines von mir geschriebenen WvDial-Frontends für Linux. Die Variable x$ ist weiter oben bereits definiert worden. Bei jedem Programmaufruf wird dabei eine Datei mit folgendem Inhalt ausgegeben (Beispiel):

Einwahl um 10:47:19, gewählter Tarif: AA3

Diese Zeile wird bei jedem Programmaufruf überschrieben. Kann man den Code so ändern, dass die neue Zeile jedesmal nur angehängt wird und die alte stehenlässt?

Danke für eure Hilfe!

Gruß s-m-n
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Stormy



Anmeldungsdatum: 10.09.2004
Beiträge: 567
Wohnort: Sachsen - wo die schönen Frauen wachsen ;)

BeitragVerfasst am: 16.06.2006, 11:26    Titel: Antworten mit Zitat

Schau dir das Beispiel mal an:

Code:
OPEN "datei.dat" FOR APPEND AS #1
PRINT #1, "Logfile von " + Datum$ + ":"
PRINT #1, Eintrag$
CLOSE #1

_________________
+++ QB-City +++ Die virtuelle Stadt für jeden Freelancer - Join the community!
Projekte: QB-City,MysticWorld (RPG), 2D-OpenGL-Tutorial
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden Website dieses Benutzers besuchen
Michael712
aka anfänger, programmierer


Anmeldungsdatum: 26.03.2005
Beiträge: 1593

BeitragVerfasst am: 16.06.2006, 12:56    Titel: Antworten mit Zitat

Wenn du im binary modus bleiben möchtest, dann mache folgendes:

Code:

Open "blabla" for binary as #1

Put #1,Lof(1)+1,var$
Put #1,,var2$

'usw..
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden
s-m-n



Anmeldungsdatum: 03.10.2005
Beiträge: 106
Wohnort: Pietling in Oberbayern / Deutschland

BeitragVerfasst am: 16.06.2006, 13:04    Titel: Antworten mit Zitat

Hi,
danke an alle. Stormy, dein Code hat gepasst. Ich hab in so

Code:

OPEN "asdial.log" FOR APPEND AS #1
PRINT #1, "Letzte Einwahl am "; date$; " um "; time$; ", gewählter Tarif: "; x$
CLOSE #1


in meinemm Programm. Vielen Dank!

Gruß s-m-n
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden E-Mail senden Website dieses Benutzers besuchen
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz