Me sale error al inentar abrir objeto WScript

[mike3636522]

Hola, vengo a notificarme un problema.
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 [Seleccionar] Expandir


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 me aparece este error


Y tambien me aparece este error al utilizar Wscript en Vbs

que puedo hacer para resolverlo?

[Flamer]

hola mike no lo declares con el dim yo nunca loe hecho y nose si se pueda mejor has lo asi.

Código [Seleccionar] Expandir


Set wsh=CreateObject
("WScript.shell")


saludos

[mike3636522]

Ok, gracias, se me soluciono el problema con el VB6 pero en el vbs no me a servido

[MCKSys Argentina]

hola mike no lo declares con el dim yo nunca loe hecho y nose si se pueda mejor has lo asi.

Código [Seleccionar] Expandir


Set wsh=CreateObject
("WScript.shell")


saludos

Es muy mala idea no declarar las variables. Incluso deberías colocar Option Explicit al inicio de cada modulo/form/class/etc (el IDE tiene una opcion).

Deberías probar declararla como variant (ambas declaraciones siguientes son iguales):

Código (vb) [Seleccionar] Expandir


Dim wsh
Dim msh2 as Variant


[BlackZeroX]

Código (vb) [Seleccionar] Expandir



Dim wsh as Object
set wsh = CreateObject("WScript.shell")



Dulces Lunas!¡