Red de conocimiento informático - Espacio del host - Agregué este código de eliminación de Yi Language al software que programé. Solo cerrará el programa pero no lo eliminará.

Agregué este código de eliminación de Yi Language al software que programé. Solo cerrará el programa pero no lo eliminará.

Código fuente del módulo Jingyi

Versión 2

. Subprograma program_delete_self, público, eliminar archivo EXE program_self

Ruta de la variable local, tipo de texto

Sufijo de la variable local, tipo de texto

Ruta = buscar directorio de tiempo de ejecución. () "\"

Sufijo = # comillas ")"

Escribir en el archivo (ruta "tem. vbs", en byteset (#self_delete1 ruta fetch_execute_filename () sufijo #newlines # self_delete0 ruta "tem.vbs" sufijo))

File_execute (ruta "tem. vbs")

End ()

Autoeliminación 0: fso. ("

Autoeliminación 1:

Dim fso

Set fso = CreateObject("Scripting. FileSystemObject")

fso. DeleteFile ("

Autoeliminación 1:

Dim fso

Set fso = CreateObject("Scripting. FileSystemObject")

fso. DeleteFile ("