Probleme avec un lien hypertexte

Bonjour
Lorsque j' exécute ce prog. HTA, au lieu d' ouvrir mon fichier, c' est l' explorer qui s' ouvre.
Code:

1 2 <a href="file://C:/Users/olix/Desktop/Document.Txt" target='_blank'> Mon lien</a>

:salut:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
<html>
<head>
<title>Ouvrir un document avec HTA</title>
<HTA:APPLICATION
     SINGLEINSTANCE="yes"
     WINDOWSTATE="maximize"
>
</head>
<SCRIPT Language="vbscript">
Sub Execute(File)
 Dim ws
 Set ws = CreateObject("wscript.shell")
 ws.run chr(34) & File & chr(34)
End sub
</SCRIPT>
<body>
<h1>Ouvrir ce document</h1>
<a href="#" onClick="Call Execute('%userprofile%\Desktop\Document.txt')">Mon Document texte</a>
</body>
</html>

Inspiré par ici

Merci pour cette solution.:D