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, 2141 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 ..
Neuester Wissensbeitrag
Humor (lol)

Linkliste für Adventskalender

(3)

Information von nikoatit zum Thema Humor (lol) ...

Ähnliche Inhalte
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
gelöst PS Werte CSV-Datei in AD Attribut (3)

Frage von lupolo zum Thema Batch & Shell ...

Batch & Shell
Mehrere AD Benutzer aus CSV Datei mit PowerShell erstellen (1)

Frage von windelterrorist zum Thema Batch & Shell ...

Heiß diskutierte Inhalte
Router & Routing
gelöst Ipv4 mieten (22)

Frage von homermg zum Thema Router & Routing ...

Windows Server
DHCP Server switchen (20)

Frage von M.Marz zum Thema Windows Server ...

Exchange Server
gelöst Exchange 2010 Berechtigungen wiederherstellen (20)

Frage von semperf1delis zum Thema Exchange Server ...

Hardware
gelöst Negative Erfahrungen LAN-Karten (19)

Frage von MegaGiga zum Thema Hardware ...