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

VBS String in Datei suchen und Nachfolgendes löschen

Frage Entwicklung

Mitglied: ph0rl2

ph0rl2 (Level 1) - Jetzt verbinden

11.08.2010, aktualisiert 10:25 Uhr, 7301 Aufrufe, 3 Kommentare

Hallo,

ich möchte folgendes realiesieren:

ich habe eine Textdatei, die beispielsweise so aussieht:
01.
asddd 
02.
asdaga 
03.
dsfas 
04.
dfas 
05.
ghasg 
06.
er 
07.
asdaf 
08.
asdsa
Jetzt suche ich nach "er" und speicher die zeilennummer in der das "er" vorkommt. In diesem Beispiel "6".
Nun möchte ich alles was nach "er" kommt löschen.

Wie kann ich mit VBS alles ab einer bestimmten Zeile löschen?
Viele Grüße und Danke
Mitglied: 76109
11.08.2010 um 10:25 Uhr
Hallo ph0rl2!

Sollte in etwa so gehen:
01.
Const Path = "E:\Test.txt" 
02.
 
03.
Dim Fso, File, Text, Suchtext 
04.
     
05.
Set Fso = CreateObject("Scripting.FileSystemObject") 
06.
 
07.
Suchtext = InputBox("Bitte Suchtext eingeben:", "Suchen") 
08.
     
09.
If Suchtext = "" Then WScript.Quit 
10.
    
11.
Text = Split(Fso.OpenTextFile(Path).ReadAll, Suchtext) 
12.
 
13.
Set File = Fso.CreateTextFile(Path) 
14.
 
15.
If UBound(Text) > 0 Then File.Write Text(0) & Suchtext Else File.Write Text(0) 
16.
 
17.
File.Close
wobei die Datei überschrieben wird.

Gruß Dieter

PS. Aha, Beitrag nochmal schnell geändert , sollte aber vom Kontext her das gleiche sein
Bitte warten ..
Mitglied: ph0rl2
11.08.2010 um 11:35 Uhr
Super funktionier bestens
Danke
Bitte warten ..
Mitglied: 76109
11.08.2010 um 11:51 Uhr
Yepp, gern geschehen

Gruß Dieter
Bitte warten ..
Neuester Wissensbeitrag
Windows 10

Powershell 5 BSOD

(8)

Tipp von agowa338 zum Thema Windows 10 ...

Ähnliche Inhalte
Perl
gelöst Mit Perl aus einer Datei teilidentische Zeilen löschen (5)

Frage von Jeduja zum Thema Perl ...

Batch & Shell
Wert in einer TXT Datei suchen (11)

Frage von nolle99 zum Thema Batch & Shell ...

Heiß diskutierte Inhalte
Microsoft
Ordner mit LW-Buchstaben versehen und benennen (20)

Frage von Xaero1982 zum Thema Microsoft ...

Outlook & Mail
gelöst Outlook 2010 findet ost datei nicht (19)

Frage von Floh21 zum Thema Outlook & Mail ...

Netzwerkmanagement
gelöst Anregungen, kleiner Betrieb, IT-Umgebung (18)

Frage von Unwichtig zum Thema Netzwerkmanagement ...

Festplatten, SSD, Raid
M.2 SSD wird nicht erkannt (14)

Frage von uridium69 zum Thema Festplatten, SSD, Raid ...