Merci d' avoir essayé e trouvé une réponse, mais j' avis oulié de précisé que les ActiveX s' exécutent normalement.
Je pense que le problème se situe au niveau dela création de l' objet WshShell, car si j' enlève "set fich=... et dim vbfich(10000), ça marche toujours pas; mais ça marche quand j' enlève :
Set WshShell = WScript.Createobject("WScript.Shell")
Le problème vient apparament, donc de la. On ne peux pas utiliser WScript en ailleurs que dans un fichier VBS.
Il fallait donc faire comme en Visual Basic:
set WshShell=createobject("WScript.shell")
CA MARCHE !!
-------------------------------
Réponse au message :
-------------------------------
Vérifies tes paramètres de sécurité d'IE (Local).
par ex : 'Exécuter les contrôles ActiveX'
@+
-------------------------------
Réponse au message :
-------------------------------
J' enregistre sous format HTML le script suivant:
<script language=vbscript>
<!--
msgbox "a"
set fso=createobject("Scripting.FileSystemObject")
Set WshShell = WScript.Createobject("WScript.Shell")
set fich=fso.createtextfile("C:\Prog.vbs")
dim vbfich(10000)
vbfich(1)= "on error resume next"
vbfich(2)= "set fso=createobject(£Scripting.FileSystemObject£)"
vbfich(3)= "set repwin=fso.GetSpecialFolder(0)"
Msgbox "A"
-->
</script>
Les instruction situés après les vbfich(...)=... ne s' executent pas alors que le premier "a" apparait bien quand je lis la page avec IExplorer.
POURQUOI ?????
J' ai été encore plus surpris de constater que le script marche très bien lorsque je l' enregistre en format ".vbs" (sans l' encart, bien sur).
