Mensajes

Auch! Tienes razón, olvidé que en el caso de VB el nombre de ejecutable no contiene la extensión 

Entonces ... listar procesos y comparar path, EXEname contra ruta de procesos en ejecucion
Listar archivos en el mismo directorio y comparar contra path, EXEname
Verificar por medio de un array que contenga todas las extensiones, si el archivo existe con cada una de ellas 

Saludos

Código (vb) [Seleccionar] Expandir

Msgbox Right(App.EXEName,3)

Saludos

[PsExec]

- La siguiente respuesta no esta relacionada a la programación XD -

No necesitas autenticar ningún usuario, descarga PsExec de Sysinternals y ejecuta las aplicaciones (script) en remoto con los privilegios correspondientes

Simplemente subes el script a todas las pc y ejecutas el programa con los parámetros adecuados, usuario, contraseña, dominio, etc etc, están en la ayuda del programa, así como también vienen algunos tips en la página 

Saludos

Bue, quizás aprenda entonces 
Ahora consiganle un mod 

Le pusieron un ban por algunos días nada más, ban que seba123neo ha aceptado, no creen que los que exageran son ustedes? 

Saludos

P.D: alguien con ganas de bloquear un tema?

Ya se, lo decía sin animos de ofender a nadie 
Lo que ocurre es que desde hace algún tiempo veo que son muchos los usuarios (de diversos foros) que crean funciones y les ponen los créditos para que luego se los cite, pero en realidad dichas funciones son fundamentalmente 3 líneas , como sigamos así dentro de un tiempo no se va a poder utilizar tranquilo un Msgbox con 3 tabuladores delante porque alguien más lo va a tener en su función 

Bueno, lo de los parametros lo he puesto porque en el K.R no hace falta para cumplir el cometido

True, en el tuyo no hace falta ya que listas los archivos recientes  , pero de cualquier manera arguments es algo que se olvida siempre al trabajar con accesos directos, se asume destino == targetpath, por eso la aclaración 

Saludos

[targetpath]

Bueno, ahora se me ocurren dos maneras, wmi y objshell, pero dejo esta última que son solo un par de líneas 

Código (vb) [Seleccionar] Expandir

Set Objshell = Createobject("WScript.shell")
Set objLink = Objshell.CreateShortCut(RutaLink)
Msgbox objLink.targetpath
Msgbox objLink.arguments

Con targetpath obtienes la ruta a la que apunta el acceso directo, y con arguments los parámetros que lleva, como ser parámetros que se pasan en el mismo link al ejecutable en cuestión 

Por poner un ejemplo, en datos de destino del acceso directo a Nero Express se muestra esto:
"C:\Archivos de programa\Nero\Nero 9\Nero Express\NeroExpress.exe" -ScParameter=30001  /w
Targetpath ... C:\Archivos de programa\Nero\Nero 9\Nero Express\NeroExpress.exe
Arguments ... -ScParameter=30001  /w

Saludos 



P.D: había dejado este post abierto y veo que Karcrack a publicado practicamente lo mismo, pero bueno, a el le faltan los parametros y no me va eso de estar poniendo nombre/autor a funciones tan sencillas 

Finalmente, se ha creado un índice ! de programas en el sub de software

http://foro.elhacker.net/software/indice_de_soft_descarga_directa-t255315.0.html

Saludos

"De ninguna forma" incluye a Linux? 

Saludos

[0x0309]

Supongo que el paso tres debe de ser similar al script de 0x0309, el cual crea una carpeta de nombre AUTORUN.INF, y dentro un archivo de nombre NULL, el cual por más que intentes no se puede sobreescribir o eliminar 

Saludos