hi
ich suche eine möglichkeit eine datei auf die zeichenlänge zu prüfen, und je nach länge (bis 80 queue 1, 81 - 120 queue 2 und ab 120 queue 3) auf verschiedene queues via lpr zu schicken.
die dateien kommen im ascii format rein, daher dachte ich an batch…
Hallo,
ich suche eine möglichkeit eine datei auf die zeichenlänge zu
prüfen, und je nach länge (bis 80 queue 1, 81 - 120 queue 2
und ab 120 queue 3) auf verschiedene queues via lpr zu
schicken.
Wenn du ein unix/linux hast oder mingw oder sowas installiert hast, dann hilft dir wc -c weiter.
HTH,
Moritz
danke für die antwort - habe win 2003 installiert.
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
ich suche eine möglichkeit eine datei auf die zeichenlänge zu
prüfen, und je nach länge (bis 80 queue 1, 81 - 120 queue 2
und ab 120 queue 3) auf verschiedene queues via lpr zu
schicken.
die dateien kommen im ascii format rein, daher dachte ich an
batch…
Hi ,
wenn du Excel hast dann so per vba:
Sub TypOhneVornamen()
Select Case FileLen("c:\blablabla\xyz.txt")
Case Is
wobei ich nicht weiss was mit queue gemeint ist.
Gruß
Reinhard
mach doch keinen sinn mit excel.
ich habe eine text datei im acii format.
was soll ich da mit excel???
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
mach doch keinen sinn mit excel.
ich habe eine text datei im acii format.
was soll ich da mit excel???
Hallo M…,
hier ist was Grundsätzliches: http://images.google.de/imgres?imgurl=http://www.kmb…
Mein Code macht genau das was ich aus deiner Anfrage herausdeutete was du meinen könntest. Er prüft die Größe einer Datei und je nach Größe macht er unterschiedliche Dinge. Was immer auch mit Queue gemeint ist.
Ansonsten, nochmal deine Anfrage:
„ich suche eine möglichkeit eine datei auf die zeichenlänge zu prüfen, und je nach länge (bis 80 queue 1, 81 - 120 queue 2 und ab 120 queue 3) auf verschiedene queues via lpr zu schicken.
die dateien kommen im ascii format rein, daher dachte ich an batch…“
Die Zeichenlänge ist immer 1, in China ist das anders, da sind es 2 oder mehr.
Was möchtest du also ermitteln? Die Länge/Größe einer datei? Die Länge eines „Satzes“ in einer Datei.
Was ist mit Queue gemeint?
Und zu:
":ich habe eine text datei im acii format.
was soll ich da mit excel???"
Mit Excel/VBa erstelle/lösche/ändere ich jeden Dateityp.
Gruß
Reinhard
ich suche eine möglichkeit eine datei auf die zeichenlänge zu
prüfen, und je nach länge (bis 80 queue 1, 81 - 120 queue 2
und ab 120 queue 3) auf verschiedene queues via lpr zu
schicken.
die dateien kommen im ascii format rein, daher dachte ich an
batch…Hi ,
wenn du Excel hast dann so per vba:Sub TypOhneVornamen()
Select Case FileLen(„c:\blablabla\xyz.txt“)
Case Is
wobei ich nicht weiss was mit queue gemeint ist.
Gruß
Reinhard
also,
ich habe eine datei in der zeichen im acii format sind.
ich möchte wissen wie viele zeichen in einer zeile sind.
sind es weniger gleich 80, dann mach …
sind es mehr 80 kleiner gleich 120, dann mach …
sind es mehr als 120 dann mach …
queue ist eine druckerwarteschlage.
ich bekomme ausdrucke, 80 zeichen passen im hochformat, 120 im querformat, auf eine seite. wenn es mehr ist muss ich den zeichensatz kleiner wählen.
also brauche ich etwas, was die anzahl der zeichen in einer zeile zählt und danach nach den o.g. vorgaben in eine bestimmte warteschlange der duckers schickt.
was soll ich da mit excel???
ich habe jetzt schon eine möglichkeit gefunden, mit dem mkd toolkit. dort ist awk dabei und ein compiler liegt dabei.
damit geht es recht einfach.
danke der mühe & gruß
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
ich suche eine möglichkeit eine datei auf die zeichenlänge zu
prüfen, und je nach länge (bis 80 queue 1, 81 - 120 queue 2
und ab 120 queue 3) auf verschiedene queues via lpr zu
schicken.
die dateien kommen im ascii format rein, daher dachte ich an
batch…
Hi M…,
in Excel Alt+F11, Einfügen Modul, Dort Code reinkopieren, Editor schliessen.
A1:B3 ausfüllen dass es exakt diesen Aufbau hat:
A B
1 Dateiname c:\test\test.txt
2 Standardschriftgröße 10
3 kleine Schriftgröße 7
Extras–makro—makro–Drucker …
Gruß
Reinhard
Sub drucker()
Application.ScreenUpdating = False
Max = 0
Close
nr = FreeFile
Datei = [B1]
gr = [B2]
kl = [B3]
Range("A1:B3").Clear
Open Datei For Input As #nr
While Not EOF(nr)
Input #nr, Satz
Zeile = Zeile + 1
Cells(Zeile, 1) = Satz
If Len(Satz) \> Max Then Max = Len(Satz)
Wend
Select Case Max
Case Is 80
Call Setzen(xlLandscape, gr) 'Querformat, Schriftgröße groß
Case Is \> 120
Call Setzen(xlLandscape, kl) 'Querformat, Schriftgröße klein
End Select
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Call Setzen(xlPortrait, gr) 'Hochformat, Schriftgröße groß
ActiveSheet.Cells.Clear
[A1] = "Dateiname incl. Pfad"
[A2] = "Standardschriftgröße"
[A3] = "kleine Schriftgröße"
[B2] = Datei
[B2] = gr
[B3] = kl
Application.ScreenUpdating = True
End Sub
Unten im Code, das erste [B2] sollte [B1] sein o.w
lasst mich doch mit eurem sch… excel in ruhe
was soll ich damit???
ich brauche einen automatismus der dateien auf die anzahl der zeichen pro zeile prüft und dann an einen server via lpr auf einen bestimmten port schickt (queue = druckerwarteschlange). in der queue ist dann festgelegt ob hochkant oder quer ausgedruckt wird. das ist doch schon alles.
was will ich da mit excel ???
nichts gegen dich aber mir schlägt jeder ein dummes vba im noch dümmeren excel vor (auch nichts gegen excel), was doch hier niemals annähernd das erfüllen könnte was ich benötige.
und ich habe mir schon selbst geholfen, ich habe die korn shell hierfür gefunden, dannst du sehr cool und einfach eine batch erstellen und daraus eine exe (190 kb) kompilieren. die kannst du dann aufrufen und mach dann den rest.
excel wäre da mehr als mit kanonen auf spatzen schiessen - vielleich wäre das im vergleich „mit atombomben auf spatzen schiessen“
trotz allem, vielen dank für die mühe & gruß
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
Sorry Sir o.w.T.
Klang und Echo
Hi,
manche Missverständnisse lassen sich vermeiden, wenn der Frager den Arsch lupft und erstmal sagt, auf welchem Betriebssystem er arbeitet. Für gutwillige Windows-User ist das aus einem läppischen „lpr“ nicht zu erkennen.
Gruß Ralf
hi
da hast du wohl recht - ich hatte nicht erwähnt auf welchem os das system läuft.
aber trotz dem habe ich ständig vorschläge für excel bekommen - läuft ja nur auf win und mac…
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
manche Missverständnisse lassen sich vermeiden, wenn der
Frager den Arsch lupft und erstmal sagt, auf welchem
Betriebssystem er arbeitet. Für gutwillige Windows-User ist
das aus einem läppischen „lpr“ nicht zu erkennen.
Hallo Ralf,
ich hab lpr als verkürzte Kurzform für Line Printer gedeutet 
)
Gruß
Reinhard