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

Bestimmte Zeichen in CSV-Datei mit einer Batch ändern

Frage Entwicklung Batch & Shell

Mitglied: sascha76er

sascha76er (Level 1) - Jetzt verbinden

25.06.2012 um 15:51 Uhr, 2162 Aufrufe, 3 Kommentare

Hallo,

ich möchte gerne mit einer Batchdatei " in einer bestimmten CSV löschen.
Ebenfalls möchte die Zeichenfolge yxcv durch ein ; ersetzen.

Kann man dies irgendwie mit einer Batchdatei realisieren?

Vorab vielen Dank für jegliche Hilfe.

Liebe Grüße

Sascha
Mitglied: TsukiSan
25.06.2012, aktualisiert um 17:23 Uhr
Hallo Sascha,

die Bätschler ziehen mir sicher gleich die Ohren lang
Aber wenn VBS auch dienen könnte, dann hätte ich folgenden Schnipsel für dich:
01.
Option Explicit 
02.
 
03.
Dim Pfad 
04.
Dim PfadRepl , tempPf 
05.
Dim SuchText 
06.
Dim ReplaceText 
07.
dim FSO , MeineDatei 
08.
Dim MeineDateiNeu 
09.
Dim objDialog , intResult 
10.
 
11.
 
12.
Pfad = BrowseForFile("C:\", "CSV-Dateien (.csv)|*.csv|All Files|*.*") 
13.
 
14.
If Pfad = "" Then 
15.
	Wscript.Echo "Keine Datei ausgewählt. Script wird beendet" 
16.
	Wscript.Quit 
17.
End If 
18.
 
19.
PfadRepl = Split(Pfad , "\") 
20.
tempPf = Split(PfadRepl(Ubound(PfadRepl)),".") 
21.
tempPf(Ubound(tempPF) - 1) = tempPf(Ubound(tempPF) - 1) & "_Replaced_" 
22.
tempPf = Join(tempPF , ".") 
23.
PfadRepl(Ubound(PfadRepl)) = tempPf 
24.
PfadRepl = Join(PfadRepl , "\") 
25.
 
26.
 
27.
Function BrowseForFile(pstrPath, pstrFilter) 
28.
	Set objDialog = CreateObject("UserAccounts.CommonDialog") 
29.
	objDialog.Filter = pstrFilter 
30.
	objDialog.InitialDir = pstrPath 
31.
	objDialog.Flags = &H80000 + &H4 + &H8 
32.
	intResult = objDialog.ShowOpen 
33.
	BrowseForFile = objDialog.FileName 
34.
End Function 
35.
 
36.
Set objDialog = Nothing 
37.
 
38.
SuchText = InputBox("Bitte Suchtext eingeben." , "Suchtext...","Suche") 
39.
ReplaceText = InputBox("Bitte ErsetzenText eingeben." , "ErstzenText...","Ersetze") 
40.
 
41.
Ersetzen 
42.
 
43.
Private Sub Ersetzen() 
44.
         
45.
	On Error Resume next 
46.
	 
47.
	Set FSO = createobject("Scripting.FileSystemObject") 
48.
 
49.
	Set MeineDatei = FSO.OpenTextFile(Pfad, 1) 
50.
	MeineDateiNeu = Replace(MeineDatei.ReadAll,SuchText,ReplaceText) 
51.
 
52.
	MeineDatei.Close 
53.
 
54.
	Set MeineDatei = FSO.CreateTextFile(PfadRepl,True).Write(MeineDateiNeu) 
55.
	MeineDatei.Close 
56.
 
57.
	Set FSO = Nothing 
58.
	Set MeineDatei = Nothing 
59.
 
60.
End Sub
Gruss
Tsuki
Bitte warten ..
Mitglied: bastla
25.06.2012, aktualisiert um 23:02 Uhr
Hallo Tsuki!

Die Ohren möchte ich Dir zwar nicht langziehen, aber einen Hinweis auf auf so schöne Methoden des "FileSystemObjects" wie etwa "GetBaseName", "GetExtensionName" oder "GetParentFolderName" muss ich doch los werden ...

Grüße
bastla
Bitte warten ..
Mitglied: TsukiSan
25.06.2012 um 23:37 Uhr
Hallo bastla,

ja, da ist noch ein wenig Geschmiere drinnen
Aber mal sehen, was der TO dazu meint.
Er wollte es ja in Batch

Danke und viele Grüße

Tsuki
Bitte warten ..
Ähnliche Inhalte
VB for Applications
gelöst Bestimmte Spalten aus CSV-Datei auslesen (VBS) (9)

Frage von Gurkenhobel zum Thema VB for Applications ...

VB for Applications
Bestimmte Daten aus eine CSV-Datei in eine Excel-Tabelle importieren (2)

Frage von MariaElena zum Thema VB for Applications ...

Batch & Shell
XML in CSV bat batch powershell (9)

Frage von nolle99 zum Thema Batch & Shell ...

Datenbanken
Access 2016 vertauscht Monat und Tag in meiner CSV Datei (1)

Frage von iGordon zum Thema Datenbanken ...

Neue Wissensbeiträge
RedHat, CentOS, Fedora

Fedora, RedHat, Centos: DNS-Search Domain setzen

(13)

Tipp von Frank zum Thema RedHat, CentOS, Fedora ...

Drucker und Scanner

Samsung SL-M4025ND, firmware update und (kompatible) Tonerkassetten

(1)

Erfahrungsbericht von markus-1969 zum Thema Drucker und Scanner ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
gelöst Komplett neues Netzwerk, Ubiquiti WLAN, Router, Switch (16)

Frage von Freak-On-Silicon zum Thema LAN, WAN, Wireless ...

CMS
Lokales Wordpress im LAN - wie aufsetzen? (16)

Frage von Static zum Thema CMS ...

LAN, WAN, Wireless
IP im privaten Netz nicht erreichbar (14)

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

LAN, WAN, Wireless
Devolo DLAN 500 pro Wireless+ (13)

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