Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Schreiben in leere Datei

Frage Entwicklung VB for Applications

Mitglied: mctini

mctini (Level 1) - Jetzt verbinden

19.01.2009, aktualisiert 11.12.2009, 4609 Aufrufe, 3 Kommentare

String ans Ende einer Datei

Set Datei = CreateObject("Scripting.FileSystemObject").OpenTextFile(DateiAus, 8)
'Set Datei = fso.CreateTextFile(DateiEin, True)
Datei.WriteLine "ende"
Datei.Close
Die funktioniert, solange die Datei nicht leer ist.

Ich möchte gerne Eine Datei prüfen ob vorhanden und an das Ende der Datei einen String schreiben ("ende")

AUch dann wenn die Datei leer ist
Mitglied: seTTembrinY
19.01.2009 um 17:07 Uhr
Hi,

prüfe doch vorher die Grösse mit
If Datei.Size > 0 Then
xxx
else
yyy
end if

Und hier solltest bzgl der Syntax auch fündig werden. http://msdn.microsoft.com/en-us/library/czxefwt8(VS.85).aspx


Gruß,
Sven
Bitte warten ..
Mitglied: bastla
19.01.2009 um 17:12 Uhr
Hallo mctini!

Das Schreiben auch in eine leere Datei sollte mit dem von Dir vorgeschlagenen "Append" (,8) kein Problem sein - bliebe nur, vorweg zu prüfen, ob die Datei bereits existiert:
01.
DateiAus = "D:\Test.txt" 
02.
Set fso = CreateObject("Scripting.FileSystemObject") 
03.
If fso.FileExists(DateiAus) Then 
04.
    Set Datei = fso.OpenTextFile(DateiAus, 8) 
05.
Else 
06.
    Set Datei = fso.CreateTextFile(DateiAus) 
07.
End If 
08.
Datei.WriteLine "ende" 
09.
Datei.Close
[Edit]
Wieso einfach, wenn es doch auch schön umständlich geht ...

Natürlich funktioniert das "Append" auch, wenn es die Zieldatei noch nicht gibt - dazu den dritten Parameter ("Create") auf True oder 1 setzen:
01.
DateiAus = "D:\Test.txt" 
02.
Set fso = CreateObject("Scripting.FileSystemObject") 
03.
Set Datei = fso.OpenTextFile(DateiAus, 8, 1) 
04.
Datei.WriteLine "ende" 
05.
Datei.Close
[/Edit]

Grüße
bastla
Bitte warten ..
Mitglied: mctini
20.01.2009 um 09:30 Uhr
Ja stimmt es funktioniert auch wenn die Datei leer ist.

Trotzdem bekomme ich von Zeit zu Zeit eine Fehlermeldung.. Zugriff verweigert.
Es liegt mit Sicherheit daran das die Datei von einer anderen Anwendung geöffnet ist.

Die Flashanimation greift alle 20 sec. zum auslesen der Datei auf die DatAus. also sollte ich hier wohl prüfen
ob die Datei geöffnet ist.

Nur leider reichen meine Kenntnisse bei Weitem nicht um diese Abfrage zu schreiben.

Wenn es Sinn macht stelle ich mir es so vor.

Schleife solage bis Datei geschlossen, wenn Zugriff vorhanden dann lösche alles was |S| hat und beschränke auf Zeilen Anzahl.(letzteres geht ja schon hervorragend)
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
FTP-Bach überträgt leere Datei (11)

Frage von AlTheKingBundy zum Thema Batch & Shell ...

Batch & Shell
gelöst Bestimmte Daten aus CSV per Windows BATCH Datei in .txt Format schreiben lassen. (9)

Frage von freshman2017 zum Thema Batch & Shell ...

Windows 10
gelöst Zeichenfolge in .reg Datei schreiben (Registry) (4)

Frage von MedicalAd zum Thema Windows 10 ...

Batch & Shell
gelöst Schreiben eines Strings mit Leerzeichen in eine Datei (6)

Frage von c20082005 zum Thema Batch & Shell ...

Neue Wissensbeiträge
Google Android

Cyanogenmod alternative Downloadquelle

(2)

Tipp von Lochkartenstanzer zum Thema Google Android ...

Batch & Shell

Batch als Dienst bei Systemstart ohne Anmeldung ausführen

(5)

Tipp von tralveller zum Thema Batch & Shell ...

Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

(1)

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Heiß diskutierte Inhalte
Windows 7
gelöst Lokales Adminprofil defekt (25)

Frage von Yannosch zum Thema Windows 7 ...

Server
gelöst Wie erkennen, dass nur deutsche IPs Zugang zu einer Website haben? (22)

Frage von Coreknabe zum Thema Server ...

LAN, WAN, Wireless
gelöst Statische Routen mit ISC-DHCP Server für Android Devices (22)

Frage von terminator zum Thema LAN, WAN, Wireless ...

Exchange Server
gelöst Migration Exchange 2007 zu 2013 - Public Folder teilweise weg (16)

Frage von Andy1987 zum Thema Exchange Server ...