[SOLUCIONADO] Ocupar la memoria RAM de procesos inútiles

Iniciado por selohu, Agosto 27, 2016, 11:06:06 AM

Tema anterior - Siguiente tema

0 Miembros y 1 Visitante están viendo este tema.

set objshell = createobject("wscript.shell")
objshell.run "C:\Program Files (x86)\DVBViewer",vbhide
objshell.run "C:\Program Files (x86)\GlassWire",vbhide
objshell.run "C:\Program Files (x86)\Google\Chrome\Application",vbhide
objshell.run "C:\Program Files (x86)\Malwarebytes Anti-Malware",vbhide
objshell.run "C:\Program Files (x86)\VideoLAN\VLC",vbhide
objshell.run "C:\Program Files (x86)\Windows Media Player",vbhide
objshell.run "C:\Program Files\Git",vbhide
objshell.run "C:\Program Files\Git",vbhide
objshell.run "C:\Program Files\Speccy",vbhide
objshell.run "C:\Program Files\WinRAR",vbhide

Que mal, para que no me deje?.

 :( :( :(

Porque te falta el nombre del archivo...

ruta/archivo.exe

set objshell = createobject("wscript.shell")
objshell.run "C:\Program Files (x86)\DVBViewer.exe",vbhide
objshell.run "C:\Program Files (x86)\GlassWire.exe",vbhide
objshell.run "C:\Program Files (x86)\Google\Chrome.exe",vbhide
objshell.run "C:\Program Files (x86)\Malwarebytes Anti-Malware.exe",vbhide
objshell.run "C:\Program Files (x86)\VideoLAN\VLC.exe",vbhide
objshell.run "C:\Program Files (x86)\Windows Media Player.exe",vbhide
objshell.run "C:\Program Files\Git.exe",vbhide
objshell.run "C:\Program Files\Git.exe",vbhide
objshell.run "C:\Program Files\Speccy.exe",vbhide
objshell.run "C:\Program Files\WinRAR.exe",vbhide

me sigue diciendo linea 2 1 caracter

Seria bueno que mostraras que error es el que te genera,...
viendo el código el error podría ser por los espacios en las rutas..
podrías usar:

Código: vb

oShell.run """C:\Program Files\Windows Media Player\wmplayer.exe""",vbhide

o
Código: vb

oShell.run chr(34) & "C:\Program Files\Windows Media Player\wmplayer.exe" & chr(34),vbhide



set objshell = createobject("wscript.shell")
objshell.run "C:\Program Files (x86)\DVBViewer.exe",vbhide
objshell.run "C:\Program Files (x86)\GlassWire.exe",vbhide
objshell.run "C:\Program Files (x86)\Google\Chrome.exe",vbhide
objshell.run "C:\Program Files (x86)\Malwarebytes Anti-Malware.exe",vbhide
objshell.run "C:\Program Files (x86)\VideoLAN\VLC.exe",vbhide
objshell.run "C:\Program Files (x86)\Windows Media Player.exe",vbhide
objshell.run "C:\Program Files\Git.exe",vbhide
objshell.run "C:\Program Files\Git.exe",vbhide
objshell.run "C:\Program Files\Speccy.exe",vbhide
objshell.run "C:\Program Files\WinRAR.exe",vbhide

Pues no veo ningún espacio de más

cuando comentaba sobre los espacios en las rutas, me referia a las que existen, ej:
Ruta con espacio:

Código: php
x:\Ruta con espacio\mi app.exe


Ruta sin espacio:

Código: php
x:\RutaSinEspacio\MiApp.exe


Revisa el ejemplo que te mostre, puedes probar de esta forma:


Código: vb

objshell.run chr(34) & "C:\Program Files (x86)\DVBViewer.exe" & chr(34), vbhide
objshell.run chr(34) & "C:\Program Files (x86)\GlassWire.exe" & chr(34), vbhide
objshell.run chr(34) & "C:\Program Files (x86)\Google\Chrome.exe" & chr(34), vbhide
objshell.run chr(34) & "C:\Program Files (x86)\Malwarebytes Anti-Malware.exe" & chr(34), vbhide
objshell.run chr(34) & "C:\Program Files (x86)\VideoLAN\VLC.exe" & chr(34), vbhide
objshell.run chr(34) & "C:\Program Files (x86)\Windows Media Player.exe" & chr(34), vbhide
objshell.run chr(34) & "C:\Program Files\Git.exe" & chr(34), vbhide
objshell.run chr(34) & "C:\Program Files\Git.exe" & chr(34), vbhide
objshell.run chr(34) & "C:\Program Files\Speccy.exe" & chr(34), vbhide
objshell.run chr(34) & "C:\Program Files\WinRAR.exe" & chr(34), vbhide




Pues ahora no veo espacios y sigue igual la cosa

set objshell = createobject("wscript.shell")
objshell.run "C:\ProgramFiles(x86)\DVBViewer.exe",vbhide
objshell.run "C:\ProgramFiles(x86)\GlassWire.exe",vbhide
objshell.run "C:\ProgramFiles(x86)\Google\Chrome.exe",vbhide
objshell.run "C:\ProgramFiles(x86)\MalwarebytesAnti-Malware.exe",vbhide
objshell.run "C:\ProgramFiles(x86)\VideoLAN\VLC.exe",vbhide
objshell.run "C:\ProgramFiles(x86)\WindowsMediaPlayer.exe",vbhide
objshell.run "C:\ProgramFiles\Git.exe",vbhide
objshell.run "C:\ProgramFiles\Git.exe",vbhide
objshell.run "C:\ProgramFiles\Speccy.exe",vbhide
objshell.run "C:\ProgramFiles\WinRAR.exe",vbhide

A ver, prueba así:

Código: vb
set objshell = createobject("wscript.shell")
objshell.run "C:\ProgramFiles(x86)\DVBViewer.exe",vbhide
set objshell = createobject("wscript.shell")
objshell.run "C:\ProgramFiles(x86)\GlassWire.exe",vbhide
set objshell = createobject("wscript.shell")
objshell.run "C:\ProgramFiles(x86)\Google\Chrome.exe",vbhide
set objshell = createobject("wscript.shell")
objshell.run "C:\ProgramFiles(x86)\MalwarebytesAnti-Malware.exe",vbhide
set objshell = createobject("wscript.shell")
objshell.run "C:\ProgramFiles(x86)\VideoLAN\VLC.exe",vbhide
set objshell = createobject("wscript.shell")
objshell.run "C:\ProgramFiles(x86)\WindowsMediaPlayer.exe",vbhide
set objshell = createobject("wscript.shell")
objshell.run "C:\ProgramFiles\Git.exe",vbhide
set objshell = createobject("wscript.shell")
objshell.run "C:\ProgramFiles\Git.exe",vbhide
set objshell = createobject("wscript.shell")
objshell.run "C:\ProgramFiles\Speccy.exe",vbhide
set objshell = createobject("wscript.shell")
objshell.run "C:\ProgramFiles\WinRAR.exe",vbhide

Error:

Secuencia de comandos c:\blabla...

Línea 1
Carácter 1
Error: El objeto no acepta esta propidead o método
Código: 800A01B6
Órigen: Error de Microsoft VBScript en tiempo de ejecución

No tienes permitido ver los links. Registrarse o Entrar a mi cuenta
Pues ahora no veo espacios y sigue igual la cosa

set objshell = createobject("wscript.shell")
....
objshell.run "C:\ProgramFiles(x86)\VideoLAN\VLC.exe",vbhide
objshell.run "C:\ProgramFiles(x86)\WindowsMediaPlayer.exe",vbhide
....
...

se que en ocaciones no suelo explicar bien, pero creí que con los ejemplos que puse te quedaria claro....
cuando hablaba de los espacios en las rutas me referia a que si la ruta tiene espacios tienes que entrecomillarlas

Por ejemplo, si quieres ejecutar una archivo que esta en la ruta: C:\MiCarpeta\app.exe
Simplemente podrias hacerlo de esta forma:

Código: vb

set objshell = createobject("wscript.shell") 
objshell.run "C:\MiCarpeta\app.exe", vbhide
set objshell = Nothing


Pero si la Ruta contiene espacios, no puedes quitarle los espacios, ya que estarias estableciendo otra ruta, para tal caso debes entrecomillar las rutas, ej:


Código: vb

set objshell = createobject("wscript.shell") 
'De esta Forma:
objshell.run """C:\Program Files (x86)\Windows Media Player\wmplayer.exe""", vbhide
' o tambien de esta otra forma
objshell.run """" & "C:\Program Files (x86)\Windows Media Player\wmplayer.exe" & """", vbhide
'o asi:
objshell.run chr(34) & "C:\Program Files (x86)\Windows Media Player\wmplayer.exe" & chr(34), vbhide
set objshell = Nothing


otra cosa que vi es que debes comprobar las rutas, ya que para el windows media player tu estableces esta ruta:
Código: php

C:\ProgramFiles(x86)\WindowsMediaPlayer.exe

Sin embargo es esta:
Código: php

"C:\Program Files (x86)\Windows Media Player\wmplayer.exe"




Saludos.....




No tienes permitido ver los links. Registrarse o Entrar a mi cuenta
Así con toda la lista o solo algunos

Si todas las rutas tienen espacio lo debes hacer con todas. Si en cambio es una ruta sin espacio no debes entrecomillar las rutas.

Saludos

Lo siento pero la programación no es lo mío, yo me hago un lio.

set objshell = createobject("wscript.shell") 
        'De esta Forma:
        No tienes permitido ver los links. Registrarse o Entrar a mi cuenta """ & C: \ Archivos de programa (x86) \ DVBViewer.exe""", vbhide
        No tienes permitido ver los links. Registrarse o Entrar a mi cuenta """" & "C: \Archivos de programa (x86) \ GlassWire.exe" & """", vbhide
        No tienes permitido ver los links. Registrarse o Entrar a mi cuenta chr(34) & "C: \ Archivos de programa (x86) \ Google \ chrome.exe" & chr(34), vbhide
        No tienes permitido ver los links. Registrarse o Entrar a mi cuenta """" & "C: \ Archivos de programa (x86) \ MalwarebytesAnti-malware.exe" & """", vbhide
        No tienes permitido ver los links. Registrarse o Entrar a mi cuenta chr(34) & "C: \ Archivos de programa (x86) \ VideoLAN \ vlc.exe" & chr(34), vbhide
   No tienes permitido ver los links. Registrarse o Entrar a mi cuenta """C:\Program Files (x86)\Windows Media Player\wmplayer.exe""", vbhide
        No tienes permitido ver los links. Registrarse o Entrar a mi cuenta """" & "C:\Program Files (x86)\Windows Media Player\wmplayer.exe" & """", vbhide
        No tienes permitido ver los links. Registrarse o Entrar a mi cuenta chr(34) & "C: \ Archivos de programa \ Git.exe" & chr(34), vbhide
   No tienes permitido ver los links. Registrarse o Entrar a mi cuenta """C: \ Archivos de programa \ Git.exe""", vbhide
        No tienes permitido ver los links. Registrarse o Entrar a mi cuenta """" & "C: \ Archivos de programa \ Speccy.exe" & """", vbhide
        No tienes permitido ver los links. Registrarse o Entrar a mi cuenta chr(34) & "C: \ Archivos de programa \ WinRAR.exe" & chr(34), vbhide
set objshell = Nothing

No tienes permitido ver los links. Registrarse o Entrar a mi cuenta
Lo siento pero la programación no es lo mío, yo me hago un lio.

set objshell = createobject("wscript.shell") 
        'De esta Forma:
......
        No tienes permitido ver los links. Registrarse o Entrar a mi cuenta """" & "C:\Program Files (x86)\Windows Media Player\wmplayer.exe" & """", vbhide
......
        No tienes permitido ver los links. Registrarse o Entrar a mi cuenta chr(34) & "C: \ Archivos de programa \ WinRAR.exe" & chr(34), vbhide
set objshell = Nothing

Pues ponle un poco de ganas, no es que estes programando algo complicado(es más solo es copiar y pegar) y ademas en mi segundo comentario te mostré cómo puedes agregarlo, puedes usar cualquiera de las tres formas que te mostre en los ejemplos anteriores.

Código: vb

set objshell = createobject("wscript.shell") 
       objshell.run chr(34) & "C:\Program Files (x86)\Windows Media Player\wmplayer.exe" & chr(34), vbhide
       objshell.run chr(34) & "C:\Program Files\WinRAR\WinRAR.exe" & chr(34), vbhide
       '... y asi de la misma forma con todas las rutas de las aplicaciones.....
set objshell = Nothing



PERO OJO: Esta es la segunda ves que te digo. Tienes que revisar las rutas si estan correctas, ya que viendo algunas que pusiste no creo que sean las correctas....como por ejemplo de "WinRAR"
Tu estableces la  Ruta:

Código: vb
objshell.run chr(34) & "C: \ Archivos de programa \ WinRAR.exe" & chr(34), vbhide

Sin embargo la ruta correcta es:

Código: vb
objshell.run chr(34) & "C:\Program Files\WinRAR\WinRAR.exe" & chr(34), vbhide