"Exécuter en tant qu'administrateur" de tous les fichiers "*.lnk [Résolu]

taratata2014 3 Messages postés dimanche 3 août 2014Date d'inscription 4 août 2014 Dernière intervention - 3 août 2014 à 20:09 - Dernière réponse : taratata2014 3 Messages postés dimanche 3 août 2014Date d'inscription 4 août 2014 Dernière intervention
- 4 août 2014 à 19:02
Bonjours à tous!

Je cherchere un vbscript pour cocher l'option "Exécuter en tant qu'administrateur" de tous les fichiers "*.lnk" (les raccourcis).
Cette options est accéssibles par "Propriétés"
Onglet "Raccourci"
Bouton "Avancé.."

Je suis sous windows 7 Pro et ai créé une arborescence sous

Exemples :
C:\ProgramData\Microsoft\Windows\Menu Démarrer\Prgrammes\!Serveurs
C:\ProgramData\Microsoft\Windows\Menu Démarrer\Prgrammes\!CAO

en cliquant sur l'un des liens LNK, une fenêtre "Ficihier ouvert - Avertissement de sécurité" s'affiche.

La solution est cocher l'option "Exécuter en tant qu'administrateur"
Comme mon arboresecnce est importante j'ai besoin d'un script pour automatiser cette dernier options!

merci d'avance pour votre aide!
Afficher la suite 

3 réponses

Répondre au sujet
jordane45 20562 Messages postés mercredi 22 octobre 2003Date d'inscriptionModérateurStatut 20 avril 2018 Dernière intervention - 4 août 2014 à 10:55
0
Utile
Bonjour,
Merci de garder à l'esprit que CodeS-SourceS est une communauté d'entraide.

Toutes les réponses sur le forum sont assurées par des bénévoles
qui donnent de leur temps libre pour aider à résoudre les problèmes.

A noter également que nous ne faisons pas dans le "tout cuit" et ne sommes pas là pour remplacer votre moteur de recherches...
... Soit tu trouves ton bonheur dans la partie source du site, soit à l'aide de ton moteur de recherche favori.

Ici, nous aidons volontiers sur des sujets techniques précis.

Je t'invite à lire avec attention le contenu du lien suivant :
charte-de-commentcamarche-net : conseils-d-ecriture

Ainsi que celui concernant l'utilisation de la coloration syntaxique :
Utilisation des Balises de code

Merci donc de reformuler ta demande en respectant ces quelques points.

Quelques points essentiels à retenir :
- On ne pose qu' UNE question par discussion
- Le titre de la question doit refléter le souci rencontré ( Help.. SOS.. Urgent.. n'apporte aucune information utile !)
- Lorsque votre question est résolue.. merci de clore le sujet (lien Marquer comme résolu se trouvant sous le titre de votre question).
- Une question obtiendra de meilleurs réponses si elle est correctement rédigée, que les explications sont clairs et qu'éventuellement vous postez le code qui pose problème.
- Si vous avez un message d'erreur..... MARQUEZ LE (dans son intégralité).

Merci.


Commenter la réponse de jordane45
taratata2014 3 Messages postés dimanche 3 août 2014Date d'inscription 4 août 2014 Dernière intervention - 4 août 2014 à 14:57
0
Utile
Merci de ton message!

J'ai oublié de mettre le début de code pour rescencer les LNKs dans un répertoire donnée!


Set WshShell = CreateObject("WScript.Shell")
Set ObjShell = CreateObject("Shell.Application")
Chemin = "C:\ProgramData\Microsoft\Windows\Start Menu"

For Each ObjFolder In ObjShell.Namespace(Chemin).Items
If ObjFolder.IsLink Then

'Récupérer chemin et fichier des raccourci
Raccourci = ObjFolder.Path
Wscript.Echo "[Chemin du Raccourci :] : " & Raccourci

'Objet raccourci lui-même (objet)
Set Lien = WshShell.createShortcut(Raccourci)
Wscript.Echo "[Lien : ] : " & Lien

'Extraction du nom du fichier sur lequel pointe le raccourci
Temp = Split(Lien.TargetPath, "")(UBound(Split(Lien.TargetPath, "")))
Wscript.Echo "[Nom de l'exécutable : ] : " & Temp

End If
'Wscript.Echo "[Pas de Raccourci]"
Next


J'ai fais des recherches sur olink mais sans succés!

Merci d'avance de votre aides ou sugestions
Bonne journée
Commenter la réponse de taratata2014
Commenter la réponse de taratata2014

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.