Top-Themen

Aktuelle Themen (A bis Z)

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 Kommas vor und nach Text einfügen

Mitglied: thekingofqueens

thekingofqueens (Level 3) - Jetzt verbinden

19.02.2007, aktualisiert 14:32 Uhr, 8171 Aufrufe, 16 Kommentare

Excel 97, .txt Datei

Hallo,

gibt es eine Möglichkeit über Excel oder Word 97 in einer Textdatei, kann auch importiert werden, vor und nach dem Text neun Kommas enfügen zu lassen?

Danke.
Mitglied: geTuemII
19.02.2007 um 13:26 Uhr
Hallo King,

vor und nach dem ganzen Text oder jeder Zeile oder wie? Und ist Word/Excel zwingend? Für mich klingt das eher nach bat...

BTW: Die Dinger heißen Kommata.... Kommas <schudder>

geTuemII
Bitte warten ..
Mitglied: thekingofqueens
19.02.2007 um 13:29 Uhr
Also, in jeder Zeile steht ein Text. Vor diesem Text und nach diesem Text müssen die Kommata rein, in jeder Zeile. Excel/Word ist nicht zwingend, hauptsache es wird eine txt oder csv Datei daraus.
Bitte warten ..
Mitglied: geTuemII
19.02.2007 um 14:01 Uhr
Ansatz:

01.
::----kommata.bat 
02.
@echo off 
03.
FOR /F "delims=" %%i in ('type "quelldatei.txt"') do echo ,,,,,,,,,%%i,,,,,,,,, >>zieldatei.txt 
04.
::-------------------
Die Schleifchen rundum darfst du selbst binden.

geTuemII
Bitte warten ..
Mitglied: CeMeNt
19.02.2007 um 14:05 Uhr
BTW: Die Dinger heißen Kommata....
Kommas <schudder>

geTuemII

Hallo geTuemII:

Für die Normal-Sterblichen, die des Griechischen nicht mächtig sind:
Der Duden lässt sowohl "Kommata", als auch "Kommas" zu. ;)

Es lebe die "neue" Rechtsschreibung...!
Bitte warten ..
Mitglied: geTuemII
19.02.2007 um 14:09 Uhr
Der Duden lässt sowohl "Kommata", als auch
"Kommas" zu. ;)

Das hilft auch nix gegen aufgestellte Nackenhaare! Sagte ich schon, ich liebe Neues Deutsches Linksschrubs?!

Total OT,
geTuemII
Bitte warten ..
Mitglied: thekingofqueens
19.02.2007 um 14:11 Uhr
Ansatz:

01.
::----kommata.bat 
02.
> @echo off 
03.
> FOR /F "delims=" %%i in ('type 
04.
> "quelldatei.txt"') do echo 
05.
> ,,,,,,,,,%%i,,,,,,,,, >>zieldatei.txt 
06.
> ::------------------- 
07.
> 
Die Schleifchen rundum darfst du selbst
binden.

geTuemII

Hey cool, das setzt mir die Kommas/Kommata mal vor dem Text, aber nicht danach

Danke.

Wo ist denn diese Bewertunsfunktion hin?
Bitte warten ..
Mitglied: bastla
19.02.2007 um 14:13 Uhr
Hallo thekingofqueens!

Versuch mal das folgende Script:
01.
Const sInFile = "D:\Test.txt" 
02.
Const sOutFile = "D:\TestMitC.txt" 
03.
Const cVor = "," 
04.
Const iVor = 9 
05.
Const cNach = "," 
06.
Const iNach = 9 
07.
 
08.
Set fso = WScript.CreateObject("Scripting.FileSystemObject") 
09.
Set oInFile = fso.OpenTextFile(sInFile, 1) 
10.
Set oOutFile = fso.OpenTextFile(sOutFile, 2, True) 
11.
Do While Not oInFile.AtEndOfStream 
12.
	sZeile = oInFile.ReadLine 
13.
	oOutFile.WriteLine String(iVor, cVor) & sZeile & String(iNach, cNach) 
14.
Loop 
15.
oInFile.Close 
16.
oOutFile.Close

Grüße
bastla
Bitte warten ..
Mitglied: thekingofqueens
19.02.2007 um 14:14 Uhr
Oh halt, die Kommatanten sind da, aber in ner einzelnen Spalte, nicht direkt hinter dem Text
Bitte warten ..
Mitglied: geTuemII
19.02.2007 um 14:16 Uhr
Hey cool, das setzt mir die Kommas/Kommata mal vor dem Text, aber nicht danach
Das ist mir nicht ganz klar, bei mir werden beide gesetzt.

Wo ist denn diese Bewertunsfunktion hin?
Die hat Frank temporär entfernt, sollte aber eigentlich schon länger wieder da sein. Vielleicht haben sich ja bei der Aktualisierung Probleme ergeben.

geTuemII
Bitte warten ..
Mitglied: geTuemII
19.02.2007 um 14:18 Uhr
Hast du zwischen dem %%i und den Kommuten einen Zeilenumbruch eingebaut?

geTuemII
Bitte warten ..
Mitglied: geTuemII
19.02.2007 um 14:21 Uhr
@bastla:
Das widerpricht aber völlig dem Trend zum ONElineer in dieser abgeschiedenen Ecke des Forums.

geTuemII
Bitte warten ..
Mitglied: thekingofqueens
19.02.2007 um 14:21 Uhr
Funktioniert ebenfalls, danke. *sehrhilfreichdrück*

Aber auch hier sind die Kommas nicht direkt hinter dem Text, sondern kommen erst ein ganzes Stück danach.
Bitte warten ..
Mitglied: geTuemII
19.02.2007 um 14:26 Uhr
Kann es sein, daß die Leerpositionen aus deiner Quelldatei kommen?

geTuemII
Bitte warten ..
Mitglied: bastla
19.02.2007 um 14:26 Uhr
@geTuemII

Willst Du wirklich sowas?
01.
Set I=WScript.CreateObject("Scripting.FileSystemObject").OpenTextFile("D:\Test.txt",1):Set O=WScript.CreateObject("Scripting.FileSystemObject").OpenTextFile("D:\TestMitC.txt",2,True):Do While Not I.AtEndOfStream:O.WriteLine ",,,,,,,,,"&I.ReadLine&",,,,,,,,,":Loop:I.Close:O.Close
Grüße
bastla
Bitte warten ..
Mitglied: bastla
19.02.2007 um 14:30 Uhr
@thekingofqueens

Wenn Du sicher bist, dass Du keine Leerstellen brauchst, versuch es damit:
01.
Const sInFile = "D:\Test.txt" 
02.
Const sOutFile = "D:\TestMitC.txt" 
03.
Const cVor = "," 
04.
Const iVor = 9 
05.
Const cNach = "," 
06.
Const iNach = 9 
07.
 
08.
Set fso = WScript.CreateObject("Scripting.FileSystemObject") 
09.
Set oInFile = fso.OpenTextFile(sInFile, 1) 
10.
Set oOutFile = fso.OpenTextFile(sOutFile, 2, True) 
11.
Do While Not oInFile.AtEndOfStream 
12.
    sZeile = oInFile.ReadLine 
13.
    oOutFile.WriteLine String(iVor, cVor) & Trim(sZeile) & String(iNach, cNach) 
14.
Loop 
15.
oInFile.Close 
16.
oOutFile.Close
Grüße
bastla
Bitte warten ..
Mitglied: geTuemII
19.02.2007 um 14:32 Uhr
Willst Du wirklich sowas?

Ich? Ich nich! Aber ich sehe gerade, wir sind hier ja auch erst in Entwicklung und noch nicht in Batch & Shell.

geTuemII
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
Text an bestimmter Stelle einfügen
gelöst Frage von noob-xBatch & Shell2 Kommentare

Hallo bin mal wieder am Basteln, komm aber nicht weiter wie stelle ich es an dass nummer 1 immer ...

Webentwicklung

Foto Upload und Default Text einfügen

gelöst Frage von smackeeWebentwicklung12 Kommentare

Hallo zusammen Ich bin auf der Suche nach einem Tool oder wie man das umsetzen kann. Ein User laded ...

Batch & Shell

Text per Batchdatei kopieren und einfügen

Frage von imebroBatch & Shell47 Kommentare

Hallo, ich würde gerne für meine Kollegen eine kleine Hilfe basteln Wir nutzen ein Programm, in dem auch Memos ...

Batch & Shell

(Batch) festgelegte Zeichen vor und nach Text einfügen

gelöst Frage von unauthorized-userBatch & Shell2 Kommentare

Hallo Community, ich stehe gerade vor einem (wahrscheinlich sehr banalem) Problem und benötige eure Hilfe. Ausgangssituation: Ich habe mehrere ...

Neue Wissensbeiträge
Windows 10

Mikrofon von Headset geht nach Update auf Windows 10 1803 nicht mehr

Tipp von Deepsys vor 13 StundenWindows 10

Ich verwende ein Plantronics Headset das per USB mit dem Windows 10 PC verbunden ist. Damit kann ich auch ...

Video & Streaming

Ruckelfreies Fernsehen auf Smartphone oder Tablet - in SD oder gar HD - Eine Alternative zum Fritz DVB-C Receiver

Anleitung von power-user vor 1 TagVideo & Streaming7 Kommentare

Wer kennt das nicht: Man möchte gemütlich auf dem Balkon sitzen und vielleicht grillen und dabei das WM-Spiel gucken ...

Erkennung und -Abwehr
Trendmicro WFBS 10 ist in deutsch verfügbar!
Tipp von VGem-e vor 1 TagErkennung und -Abwehr4 Kommentare

Servus Kollegen, downloadbar unter

Windows Update

Microsoft Patchday Juni 2018 - BSOD, obwohl noch kein Patch freigegeben

Erfahrungsbericht von diemilz vor 1 TagWindows Update5 Kommentare

Hallo zusammen, wir hatten hier letzte Woche ein massives Problem. Alles begann damit, dass ein Mitarbeiter kurz vor Feierabend ...

Heiß diskutierte Inhalte
Windows Userverwaltung
User Überwachung
Frage von YellowcakeWindows Userverwaltung33 Kommentare

Hey ich habe von unserem neuem Datenschutzbeauftragten ein kleines Horror Paket bekommen. Ich soll wenn es möglich ist, das ...

Outlook & Mail
Nachweis des Löschens einer Email nach DSGVO in Outlook
Frage von linuxadmOutlook & Mail18 Kommentare

Hallo Forum, wie wahrscheinlich viele von Euch kämpfe ich mit der Umsetzung der DSGVO bei meinen Kunden. Konkret geht ...

Video & Streaming
PVR-Projekt - RTSP - Streams auf NAS aufnehmen - welche Tools sind am leichtesten einzurichten ?
Frage von power-userVideo & Streaming18 Kommentare

Hallo zusammen, hier die Details zur obigen Frage: AAusgangspunkt / Grundvoraussetzungen Wir betreiben hier ein kleines Heimnetzwerk. 2 Smartphones, ...

Batch & Shell
Powershell Netzwerkdrucker auflisten
gelöst Frage von schiggi85Batch & Shell18 Kommentare

Hallo zusammen, ich möchte mit dem invoke-command bei einem remoteclient die installierten Netzwerkdrucker des Users abfragen. Nur klappt das ...