Discussion :

[fevec]

bonjour à tous,

Pour créer des raccourcis lors de l'installation de mes applications Access
j'utilise le code trouvé dans la FAQ

http://access.developpez.com/faq/?page=Divers#ShortCut

Dans le code suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
'Crée un nouveau raccourci
Set oRac = oWsh.CreateShortcut(strCheminRaccourci)
 
oRac.W
Call LecParamProg("Chemin", Annee, prochain, Commentaire)
' MsgBox "commentaire dans créer raccourci " & Commentaire
'Paramètre le raccourci
With oRac
    'Cible
   .TargetPath = Chr(34) & SysCmd(acSysCmdAccessDir) & "MSAccess.exe" & Chr(34)
' SysCmd(acSysCmdAccessDir) & "MSAccess.exe"  '20/08/07 ' nom et chemin d'access
    'Argument
     .Arguments = NomFrontale
    'Style de fenêtre 
    .WindowStyle = 4    
    'Chemin vers l'icône
        .IconLocation = NomIcone ' personnalisation
    'Dossier de travail
   .WorkingDirectory = ApplicationPath() ' personnalisation
    'Enregistre le raccourci
    .Save
End With
'Libère les objets
Set oRac = Nothing
Set oWsh = Nothing

quelqu'un saurait il où je peux trouver de l'aide sur le paramétrage de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

   .WindowStyle = 4

J'imagine que cela correspond à la liste déroulante Executer dans l'onglet Raccourci des propriétés du raccourci, avec comme valeur (Fenêtre Normale, Réduite, Agrandie)

Je cherche à faire que le raccourci ouvre une fenêtre agrandie.

Merci d'avance
bonne fin de journée
FEVEC

[Invité]

Bonjour

Regardes dans l'explorateur d'objet (appui sur F2 dans la fenêtre de l'éditeur VB).


Dans la liste tu sélectionnes : IWshRuntimeLibrary et tu auras tout ce dont tu as besoin.

Philippe

[fevec]

Merci Philippe,
pour le nom de la librairie.
Mais ensuite, j'ai un peu (beaucoup !) honte , j'ai les propriétés visible, mais pas d'info en plus (bouton droit aide..etc..)

(cf miniature)

donc je n'arrive pas à savoir la valeur du paramètre
Je ne connais pas toutes les subtilités de l'explorateur d'objets


J'ai essayé en Access97 et Access2002

en te remerciant pour ton aide
FEVEC

[Invité]

Re

Les constantes se trouvent dans le dernier paramètre, et quand tu en sélectionnes un, tu as le numéro en bas dans la partie grise.

Philippe

[fevec]

Mille mercis !

Je marque résolu
Je joins une miniature pour bien documenter le post.
avec les valeurs possibles pour la constante
Merci beaucoup
FEVEC