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

In textfile Position ändern

Frage Entwicklung

Mitglied: mhilfiker

mhilfiker (Level 1) - Jetzt verbinden

01.12.2009 um 14:48 Uhr, 2446 Aufrufe, 3 Kommentare

Hi Zusammen,

Also müsste in textdateien Positionen ändern per einem Script.

habe ein file das text enthält, und da müsste ich in jeder zeile, Position 41+42 löschen. Wie danach nach position 50 2 x ne 0 einfügen.
Hab bis jetzt noch nix richtiges gefunden, vieleicht en VB Script?

Für Hilfe wäre ich Dankbar.

Gruss
Markus
Mitglied: bastla
01.12.2009 um 15:08 Uhr
Hallo mhilfiker und willkommen im Forum!

Als VBScript (ungetestet) etwa so:
01.
Datei = "D:\Test.txt" 
02.
Set fso = CreateObject("Scripting.FileSystemObject") 
03.
T = Split(fso.OpenTextFile(Datei).ReadAll, vbCrLf) 
04.
For i = 0 To UBound(T) 
05.
    T(i) = Left(T(i), 40) & Mid(T(i), 43, 8) & "00" & Mid(T(i), 51) 
06.
Next 
07.
fso.CreateTextFile(Datei, True).Write Join(T, vbCrLf)
Die Ersetzung erfolgt hier "in der Datei", es wird also keine Sicherungskopie erstellt.

Grüße
bastla
Bitte warten ..
Mitglied: mhilfiker
01.12.2009 um 17:10 Uhr
Hi Bastla,

Vielen Dank, das script funktioniert soweit, jetzt ist allerdings das problem aufgetaucht, das das file auf der anfangszeile nur wenige zeile hat, um das format zu erkennen und auf der letzten auch nochmals ne kürzere... Natürlich machts mir jetzt die 2 00 jetzt auch auf die 1 und letzte zeile obwohl sie kürzer sind und nicht verändert werden müssen. Gibets dafür auch ne Lösung?

Kannst du mir sagen, welcher teil des codes für das löschen zuständig ist?

Besten Dank

Grüsse
Markus
Bitte warten ..
Mitglied: bastla
01.12.2009 um 17:45 Uhr
Hallo mhilfiker!
Natürlich machts mir jetzt die 2 00 jetzt auch auf die 1 und letzte zeile obwohl sie kürzer sind und nicht verändert werden müssen. Gibets dafür auch ne Lösung?
Ändere die Zeile 5 auf
If Len(T(i)) > 50 Then T(i) = Left(T(i), 40) & Mid(T(i), 43, 8) & "00" & Mid(T(i), 51)
Kannst du mir sagen, welcher teil des codes für das löschen zuständig ist?
Eigentlich wird nicht "gelöscht", sondern die Zeile aus den folgenden Bestandteilen neu zusammengebaut: Die ersten 40 Zeichen, die 8 Zeichen ab 43, die beiden Nullen und den Rest ab Zeichen 51 bis zum Ende ...

Grüße
bastla
Bitte warten ..
Neuester Wissensbeitrag
Off Topic

"Ich habe nichts zu verbergen"

(2)

Erfahrungsbericht von FA-jka zum Thema Off Topic ...

Ähnliche Inhalte
Grafikkarten & Monitore
Intel User Interface - Sprache ändern (4)

Frage von FA-jka zum Thema Grafikkarten & Monitore ...

DNS
gelöst Hostnamen eines Internetanschluss ändern (5)

Frage von christianlindloff zum Thema DNS ...

Windows Server
gelöst Servername in der Domäne ändern nicht möglich (4)

Frage von Ghost108 zum Thema Windows Server ...

Microsoft
gelöst SQL Server 2012: Benutzerrechte ändern (2)

Frage von honeybee zum Thema Microsoft ...

Heiß diskutierte Inhalte
CPU, RAM, Mainboards
Kaufberatung für mind. 8 verschiedene HighEnd-Mainboards (24)

Frage von yperiu zum Thema CPU, RAM, Mainboards ...

Netzwerke
Abisolierwerkzeug (11)

Frage von SarekHL zum Thema Netzwerke ...

Hyper-V
Langsames Netzwerk i210 LAN Karte (11)

Frage von Akcent zum Thema Hyper-V ...

Windows Server
Server 2016 - Kuriositäten (8)

Frage von certifiedit.net zum Thema Windows Server ...