Por favor pregunte... ¿Cómo se envía el código VBS completo que creó la última vez (el que simula el virus)? Después de guardarlo, ni siquiera puede usarlo para editarlo...
Archivo 1: CAutorun_1.vbs
El código es el siguiente:
''''''''''''''''' ''' Comienza el código''''''''''''''''
Set ws=CreateObject("WScript.Shell")
ws. RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\system\DisableTaskMgr", 0, "REG_DWORD"
MsgBox "¡Utilice el Administrador de tareas para finalizar todos los procesos de wscript.exe!", 64, " Último cerdo inteligente"
''''''''''''''''Fin del código'''''''''''''''' ' ''
Archivo 2: CAutorun_2.vbs
El código es el siguiente:
''''''''''''''' '' '''Inicio de código''''''''''''''''
En caso de error, reanudar siguiente
Establecer fso=CreateObject("Scripting .FileSystemObject")
Establecer Cx=fso.GetSpecialFolder(0)
C=fso.GetParentFolderName(Cx)
Establecer Fdrs=fso.GetFolder(C ).SubCarpetas
Para cada Fdr en Fdrs
Si fso.GetExtensionName(Fdr.Name)="exe" Entonces
fso.GetFolder(C amp. Fdr.Name).Delete(True)
Finalizar si
Siguiente
Establecer drvs=fso.Drives
Para cada drv en drvs
Si drv.DriveType=2 Entonces
fso.GetFile(drv amp; "\Autorun.inf").Delete(True)
fso. GetFile(drv amp; "\fun.xls.exe").Delete(True)
Si drv amp "\" = C Entonces
De lo contrario
Establezca Fdrs=fso.GetFolder(drv amp; "\").SubCarpetas
Para cada Fdr en Fdrs
Si fso.GetExtensionName(Fdr.Name)="exe" Entonces
Fdr.Name=fso.GetBaseName(Fdr.Name)
Finalizar si
Siguiente
Finalizar si
Finalizar si
Siguiente
fso.GetFolder(C amp; "Archivos de programa").Atributos=0
fso.GetFol
der(C amp; "Documentos y configuraciones").Attributes=0
fso.GetFolder(C amp; "WINDOWS").Attributes=0
MsgBox "Eliminación del virus de ejecución automática falsa ¡Terminado!", 64, "El cerdo más inteligente"
''''''''''''''''''Fin del código''''''''' '''''''''
Uso:
1. Ejecute "CAutorun_1.vbs";
2. finalice el proceso "wscript.exe";
3. Ejecute "CAutorun_2.vbs";
4.
Nota: Lo mejor es ejecutar los dos archivos en el escritorio y cerrar otras ventanas, puede haber carpetas individuales que no se puedan restaurar (es la Papelera de reciclaje porque el sistema la creará automáticamente), y puedes eliminarlo manualmente.