|
|
|
|
|
|
|
|
|
|
version 6.7
CREER ALIAS (cheminCible; cheminAlias)
| Paramètre | Type | Description | |
| cheminCible | Alpha |  | Nom ou chemin d'accès de la cible de l'alias/du |
| raccourci | |||
| cheminAlias | Alpha | | Nom ou chemin d'accès complet de l'alias/du |
| raccourci à créer |
Description
La commande CREER ALIAS crée un alias (appelé "raccourci" sous Windows) du fichier ou dossier cible désigné par le paramètre cheminCible, avec le nom et l'emplacement définis dans le paramètre cheminAlias.
Vous pouvez créer un alias de tout type de document ou de dossier. L'icône de l'alias sera identique à celle de l'élément cible. Elle comportera en outre une petite flèche et, sous Mac OS, le libellé de l'alias apparaîtra en caractères italiques.
La commande n'affecte pas de libellé par défaut à l'alias, vous devez passer un nom dans le paramètre cheminAlias. Si vous passez uniquement un nom dans ce paramètre, l'alias est créé dans le dossier actif courant (généralement, le dossier contenant le fichier de structure de la base).
Note : Sous Windows, les raccourcis sont des fichiers dont l'extension est ".LNK". Si vous ne passez pas cette extension, la commande l'ajoute automatiquement.
Si vous passez une chaîne vide dans cheminCible, la commande ne fait rien.
Exemple
Votre base génère des fichiers texte intitulés "RapportNuméro", stockés dans le dossier de la base. Vous souhaitez permettre à l'utilisateur de créer des raccourcis vers ces rapports et de les stocker où il le souhaite :
`Méthode CREER_RAPPORT
C_TEXTE($vtRapport)
C_ALPHA(250;$vtChemin)
C_ALPHA(80;$vaNom)
C_HEURE(vDoc)
C_ENTIER($NumRapport)
$vTRapport:=... `Edition du rapport
$NumRapport:=... `Calcul du numéro du rapport
$vaNom:="Rapport"+Chaine($NumRapport)+".txt" `Nom du fichier
vDoc:=Creer document($vaNom)
Si (OK=1)
ENVOYER PAQUET(vDoc;$vTRapport)
FERMER DOCUMENT(vDoc)
`Ajout de l'alias
CONFIRMER("Créer un alias pour ce rapport ?)
Si (OK=1)
$vtChemin:=Selectionner dossier ("Où souhaitez-vous créer l'alias ?")
Si (OK=1)
CREER ALIAS ($vaNom;$vtChemin+$vaNom)
Si (OK=1)
MONTRER SUR DISQUE($vtChemin+$vaNom)
`Visualisation de l'emplacement de l'alias
Fin de si
Fin de si
Fin de si
Fin de si
Variables et ensembles système
La variable système OK prend la valeur 1 si la commande a été correctement exécutée, sinon elle prend la valeur 0.
Référence
|
|
|
|
|
|
|
|
|
|