Liste des actions par clic-droit sur un fichier

Messages postés
27
Date d'inscription
mercredi 19 janvier 2011
Statut
Membre
Dernière intervention
1 novembre 2018
-
Bonjour,
j'ai un VBS qui me liste les actions qu'on obtient par clic-droit sur un fichier. Je reprends exactement le même code dans un HTA : il me manque des actions.
Exemple VBS :
folder = "D:\Donnees\Mes documents\test"
file = "test.docx"
set colVerbs = CreateObject("Shell.Application").Namespace(folder).ParseName(file).Verbs
For Each objVerb in colVerbs
wscript.echo objVerb.name
Next

Exemple HTA :
<html><head><meta http-equiv="content-type" content="text/html;charset=windows-1252;fr">
<hta:application id="app">
<body>
<script type="text/vbscript">
folder = "D:\Donnees\Mes documents\test"
file = "test.docx"
set colVerbs = CreateObject("Shell.Application").Namespace(folder).ParseName(file).Verbs
For Each objVerb in colVerbs
document.write objVerb.name & "<br>"
Next
</script>
</body></html>

J'ai l'action "Edit with &Notepad++" en VBS, mais pas en HTA.
Elle est aussi absente si j'exécute le VBS depuis le HTA, ou un powershell depuis le HTA.
J'ai le même problème pour d'autres actions, selon le fichier.
Une idée du pourquoi ce problème avec le HTA ?

Merci d'avance, Jean-Claude.
Afficher la suite