Título: Copiar y ocultar la copia de un archivo Publicado por: Snort en 8 Octubre 2006, 14:09 pm Wolas, haciendo mi herramienta de administracion remota me he dado cuenta de qe es muy facil desinfectarse, unicamente matando el proceso, y luego borrandola del system32. Aparte de ocultarla del administrador de tarreas tambien he estado buscado sobre como copiarla en modo de archivo oculto y/o ponerle algo para qe no se pueda borrar facilmente
Código: Set obj = CreateObject("Scripting.FileSystemObject") Me suena qe para coprlo como oculto era /f o algo asi, como en los *.bat, pro no macuerdo... Título: Re: Copiar y ocultar la copia de un archivo Publicado por: <--v1c1ous--> en 9 Octubre 2006, 03:19 am Citar SetAttr "C:/Windows/System32/Pinbool.exe", vbHidden Título: Re: Copiar y ocultar la copia de un archivo Publicado por: Gorky en 9 Octubre 2006, 09:09 am Tambien puedes ocultarlo posteriormente con la api SetFileAttributes
Título: Re: Copiar y ocultar la copia de un archivo Publicado por: Belem en 12 Octubre 2006, 06:45 am Código: Set obj = CreateObject("Scripting.FileSystemObject") Título: Re: Copiar y ocultar la copia de un archivo Publicado por: MORFEO_2 en 24 Octubre 2006, 07:11 am ahi un comando dos que sirve para dar atributos de ocultos a archivos ejemplo
Private Sub Form_Load() Dim yo yo = App.paht & "\" & App.EXEName & ".exe" '<--donde nos 'ejecutamos FileCopy yo, "c:\miprograma.exe" ' nos copiamos a c:\ solo como ejemplo atributos '<--- llamamos End Sub Sub atributos() Dim a Dim b '<--- declaramos variables Dim c a = "command /c attrib +h +s" ' pasamos parametros al comenado q ejecutaremos b = "c:\miprograma.exe" c = a + b Shell (c), vbHide ' LO EJECUTAMOS End Sub |