AW: [Allegro] order.inc

Panski, Regine Regine.Panski at kg.verwalt-berlin.de
Do Mär 27 14:15:47 CET 2008


Herzlichen Dank, das klappt so!
Und auch noch Dank an Herrn John für den Hinweis auf Trick 68. Das hatte ich nicht mehr in Erinnerung.

Mit freundlichen Grüßen
 
Regine Panski
Kammergericht-Bibliothek
Elßholzstr. 30-33
10781 Berlin
(030) 90152411
 

> -----Ursprüngliche Nachricht-----
> Von: allegro-bounces at biblio.tu-bs.de [mailto:allegro-bounces at biblio.tu-
> bs.de] Im Auftrag von Thomas Berger
> Gesendet: Donnerstag, 27. März 2008 12:09
> An: Allegro-C Diskussionsliste
> Betreff: Re: [Allegro] order.inc
> 
> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
> 
> Liebe Frau Panski,
> 
> | ich möchte in order.inc das Vorhandensein des Verz. temp im
> | Verzeichnis Homedrive prüfen und ggf. anlegen. Es gelingt mir nicht
> | so ganz. Kann mir jemand einen Tipp geben? Ich habe es so versucht:
> 
> | get env Homedrive
> | ins $md
> | var "\\temp"
> | if no jump anl\jump verz
> 
> fehlt da nicht irgendwie der Test?
> 
> | :anl
> | mkdir
> 
> 
> 
> 
> | :verz
> | var $md "\\temp\\bestell.rtf"
> | ins $Best
> |
> | var $md "\\temp\\liste.txt"
> | ins $Zug
> 
> 
> So sollte es gehen (vgl. den "Trick" von neulich, der im Hinweis auf die
> Verzeichnis-Test-Moeglichkeiten von fnam bestand).
> 
> get env Homedrive
> var +"\\temp"
> ins $mydir
> 
> var "|." $mydir   // Verzeichnistest vorbereiten
> fnam
> if not "" jump mydirda
> 
> var $mydir       // fnam-Test hat iV zerstoert, neu laden
> mkdir
> ~   // viele viele Fehlermoeglichkeiten:
> ~   // z.B. koennte bereits eine *Datei* temp existiert haben
> ~   // oder die Rechte reichten nicht aus
> ~   // oder das Verzeichnis ist zwischen Test und mkdir anderweitig
> ~   //      entstanden
> ~   // oder das uebergeordnete Verzeichis existierte gar nicht
> ~   // oder die iV enthielt fuer Dateinamen nicht legale Zeichen
> ~   // Also: Unbedingt auf Erfolg testen
> if ok jump mydirda
> 
> var "ERROR: Anlegen von " $mydir " hat nicht funktioniert!"
> ansi
> mess
> end
> 
> :mydirda
> var $mydir "\\bestell.rtf"
> ins $Best
> ...
> -----BEGIN PGP SIGNATURE-----
> Version: GnuPG v1.2.3-nr1 (Windows XP)
> Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org
> 
> iQCVAwUBR+uAW2ITJZieluOzAQLCVgQAnRHxmkpxlx1QRF7TYlEDz9NaZewih9T1
> Po7RH+ZPkNyWbuIKsxudTsrGhi0j3Is5U6QuKYbat5cp5u2VHTscN9NGb/g7kPHz
> Sgh+ZsZ5KYuMO0WoejBpPiZnvJkGLul20UOzr6StSOD8HM1GZPj5ySSyit4M8Uug
> ExPN34nLpBk=
> =T/Le
> -----END PGP SIGNATURE-----



Mehr Informationen über die Mailingliste Allegro