Test Foro de elhacker.net SMF 2.1

Sistemas Operativos => Windows => Mensaje iniciado por: zTreeTNiGhT en 23 Junio 2010, 17:49 PM

Título: WScript No Me Funciona
Publicado por: zTreeTNiGhT en 23 Junio 2010, 17:49 PM
Hola, les vengo a pedir ayuda xD
lo que pasa es que en Windows XP SP3 no me funciona el WScript
e puesto el sigiente codigo en un .vbs

set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.SendKeys "{F7}"


y en otras computadoras si me funciona, pero cuando lo quiero abrir en la mia me sale el siguiente error


Windows Script Host

Secuencia de comandos : C:\rutadelarchivo\*.vbs
Linea: 1
Caracter: 1
Error: No se pudo ubicar la clase de automatizacion denominada "WScript.Shell".
Codigo: 80020009
Origen: WSCript.CreateObject


alguien me podria ayudar porfavor =S, no me funciona ningun codigo que lleve WScript.Shell

Gracias

Salu2...
Título: Re: WScript No Me Funciona
Publicado por: Novlucker en 23 Junio 2010, 17:53 PM
Si utilizas otros objetos si? como por ejemplo el "scripting.filesystemobject" ?

Prueba reinstalando el Windows Script Host
:http://www.microsoft.com/downloads/details.aspx?familyid=47809025-D896-482E-A0D6-524E7E844D81&displaylang=en

Saludos
Título: Re: WScript No Me Funciona
Publicado por: zTreeTNiGhT en 23 Junio 2010, 18:00 PM
Gracias por responder =), la verdad no se mucho sobre esto xD, pero si me an funcionado otros scripts, como por ejemplo este

Set Wmp = CreateObject("WMPlayer.OCX.7")
Wmp.URL = "archivo.wav"
Wmp.Controls.Play
wscript.sleep 5000


intente bajar el Windows Script Host, pero de alli solo se baja un archivo readme.txt =S

gracias

saLu2...
Título: Re: WScript No Me Funciona
Publicado por: Novlucker en 23 Junio 2010, 18:02 PM
Mmmm, te había dejado un link malo, prueba otra vez con el nuevo, es al wsh 5.7

Saludos
Título: Re: WScript No Me Funciona
Publicado por: zTreeTNiGhT en 23 Junio 2010, 18:27 PM
listo ya lo baje pero a la hora de ejecutarlo me dice

Setup has detected that he Service Pack version of this system
is newer than the update you are applying
There is no need to install this update
Título: Re: WScript No Me Funciona
Publicado por: Novlucker en 23 Junio 2010, 18:32 PM
ok, eso es porque el SP3 trae una versión posterior del wsh.

Prueba lo siguiente:
Código (vb) [Seleccionar]
set objshell = createobject("wscript.shell")

Saludos
Título: Re: WScript No Me Funciona
Publicado por: zTreeTNiGhT en 23 Junio 2010, 18:36 PM
ahora me sale

Windows Script Host
Secuencia de Comandos: C:\ruta\*.vbs
Linea: 1
Caracter: 1
Error: ActiveX component can't create object: 'wscript.shell'
Codigo: 800A01AD
Origen: Microsoft VBScript runtime error

=S
Título: Re: WScript No Me Funciona
Publicado por: Novlucker en 23 Junio 2010, 19:25 PM
Inicio > Ejecutar > regsvr32 wshom.ocx
Inicio > Ejecutar > regsvr32 scrrun.dll

Saludos  :P
Título: Re: WScript No Me Funciona
Publicado por: zTreeTNiGhT en 23 Junio 2010, 19:30 PM
Woooooow!!,, eres el mejor men!!
Muchas gracias =D, ya funciona   ;-)

Gracias!!!
Título: Re: WScript No Me Funciona
Publicado por: Novlucker en 23 Junio 2010, 19:33 PM
De nada, por lo visto alguna librería no estaba correctamente registrada o por esas cosas de la vida se había "desregistrado" ... me alegro que funcione :P

Saludos