Me e fijado varias veces si e sintetizado bien el codigo y, al parecer, si deberia de funcionar.
Antes, si me funcionaba el objeto wscript, Siempre lo declaraba con este codigo( En el caso de VB6)
Código:
Private Sub Form_Load()
Dim wsh as Object
wsh = CreateObject("WScript.shell")
'cuando la declaro me dice el depurador que no existe
...
End Sub

Y tambien me aparece este error al utilizar Wscript en Vbs

que puedo hacer para resolverlo?