Was muss ich machen damit sich meine .exe selber löscht.
Code Bsp. wär super.
Thx in advance
EDIT: [vb .net]
Druckbare Version
Was muss ich machen damit sich meine .exe selber löscht.
Code Bsp. wär super.
Thx in advance
EDIT: [vb .net]
Du brauchst eine externe Anwendung oder ein Script (soweit ich weiß).
Also zum Beispiel Batch oder vbs, wobei Batch hier wohl geeigneter wäre.
Super Sache. Gibt sowas Namens Google.
Findet man auf anhieb was mit den Suchwörtern: "VB.net Selbstlöschende Exe"
Also:
naja kenne mich zwar nicht mit .net aus aber es geht überall so:
das schreibste in ne Datei die im selben Verzeichnis ist wie deine exe...Code:@echo off
ping -n 1 127.0.0.1 > NUL
del "deineexe.exe"
del %0
exit
die datei muss die Endung .bat haben dann startest du sie hidden...
fertig ;-)
die Zeile:
ping -n 1 127.0.0.1 > NUL
ist eine "sleep" anweisung die 1 steht für eine sekunde musste sehen ob du das überhaupt brauchst... oder vll. noch länger machst
WICHTIG:
du musst die exe natürlich beenden ... also die bat ausführen und dann deine exe sofort beenden!
Mit der Move-File api in den temp ordner schieben und beenden, ist zwar kein löschen reicht aber eig.
AFAIK kannst du die Datei NICHT im Betrieb verschieben, weshalb man auf die Batch/VBScript Dateien zurückgreifen muss.
Anstat das mit der Batch zu machen und die dann als Leiche uaf dem System zu lassen, solltest du die cmd.exe direkt ansprechen undo.ä als Parameter übergeben was deiner Applikation Zeit lässt sich selbst zu beenden bevor Windows versucht sie zu löschen..Code:ping 0.0.0.1 -n 1 -w 1000 del "Pfad deiner exe"
Kannst du sehr wohl, probier es doch mal aus ;)Zitat:
Zitat von _MrKode
Hier ein C&P für dich.
Versuche wenigstens es zu analysieren.
Code:Public Sub delete()
Dim ExeName As String = Path.GetFileName(Reflection.Assembly.GetEntryAssembly.Location)
Dim ExePath As String = Directory.GetParent(Reflection.Assembly.GetEntryAssembly.Location).FullName
Dim BatFile As String
BatFile = ExePath & "\" & "del.bat"
Dim FileStr As FileStream = New FileStream(BatFile, FileMode.Create)
Dim StrWriter As StreamWriter = New StreamWriter(FileStr)
StrWriter.WriteLine(":schleife ")
StrWriter.WriteLine("erase " & ExeName)
StrWriter.WriteLine("if exist " & ExeName & " goto schleife")
StrWriter.WriteLine("erase %0")
StrWriter.Close()
Shell(BatFile, vbHide)
End Sub
Sehr richtig.Zitat:
Zitat von _MrKode
"Müssen" ist immer eine sehr einseitige Art ein Problem zu lösen.Zitat:
Zitat von _MrKode
Wer nicht gerne eine Datei droppt (welche sich ja eigentlich um unauffällig zu bleiben auch löschen müsste; auch das TEMP-Dir wird nicht ständig einfach so vom System geleert), der kann das Programm auch in einen neuen Prozess forken (bei C&P-lern oft als "RunPE" bekannt) und anschließend den ursprünglichen Prozess beenden, worauf die neue Instanz die nunmehr unverwendete Ausgangsdatei löschen kann.
Der Ablauf könnte beispielsweise so aussehen:
1. Programm A startet
2. es wird geprüft, ob sich das Programm im Systemordner befindet (generisch kann man das sehr gut mit GetModuleFileName und GetSystemDirectory machen)
3. Befindet es sich NICHT im Systemordner, so kann angenommen werden, dass es gerade vom Benutzer gestartet wurde; das Programm startet nun einen weiteren Prozess aus dem Sysdir (mspaint.exe, calc.exe, oder etwas was mehr nach einem wichtigen Systemprozess aussieht; svchost oder sonst was - was halt da ist eben), dem es als Argument (geht ganz normal via CreateProcess; nennen wir dieses neu gestartete Programm mal Programm B) den Pfad zu sich selbst (GetModuleFileName) übergibt und macht den Rest aus dem alt-bekannten RunPE-Muster.
4. Programm A beendet sich
5. Programm B wurde gerade gestartet und ist ja weil Programm A sich selbst in den Prozess injeziert hat mit Programm A identisch; es führt also auch Schritt 2 durch. Der Unterschied ist hierbei, dass das Programm ja nun als beispielsweise mspaint.exe im Sys-Ordner läuft - d.h. es forkt nicht ein zweites mal, sondern kann etwas anderes machen.
6. Programm B wartet 1 Sekunde (muss nicht sein; aber so kann man sicherstellen, dass Programm A zu der Zeit wirklich beendet ist)
7. Programm B hat ja den Pfad zu Programm A als Argument erhalten - weiß also wo Programm A auf der Festplatte liegt --> Programm B löscht Programm A.
8. Programm B macht was es eigentlich machen soll (die Spuren sind verwischt; Programm B läuft unter dem Namen eines anderen Prozesses und sieht damit unauffällig aus)
Ein weiterer Vorteil ist auch noch, dass Programm B ja im Weiteren als ein vermeindlich systemeigener Prozess läuft. Der User würde also auch mit dem Taskmanager keinen auffälligen Prozess erkennen.
Aber hey - wozu erzähle ich das eigentlich? Das kriegt hier doch eh keiner zusammengepastet ^_^
Auf die Idee mit der Verknüpfung von CreateProcess und dem Löschen der Datei wäre ich jetzt echt nicht gekommen. Danke für die Idee, werde eventuell in Kürze mal einen POC schreiben oder so. Arbeite mich atm wieder in die WinAPI Programmierung ein.
Ein Poc wäre das aber nicht, denn das gab es schon hundertfach ;)
Danke erstmal an alle
@BlackHook danke für den C&P hab ihn verstanden
Schleife ist vlt nicht ganz sinnvoll, weil sich der Prozess aufhängt, wenn er die Datei nicht löschen kann. Bin gewohnt "del" und nicht "erase" zu benutzen, ist aber glaub das selbe.
@BlackBerry ok, hab ich auch verstanden daher thx. Quasi per runPE eine Anwendung starten, welche die eigentliche Datei löscht. Da diese Methode jedoch um einiges aufwendiger ist, denk ich dass ich mich erstmal mit der relativ simplen batch datei methode zufrieden geben werde.
EDIT: hab verstanden warum ne Schleife sinn macht^^ alternative wäre die ping variante von Jut4h.tm
@Mofo
Batch dateien können sich selber löschen, weshalb es keine Leiche geben würde
nach 30 sekunden googlen gefunden ;)
Quelle: dotnet-snippets.deCode:Private Sub MyApplication_Shutdown(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Shutdown
Using srmStreamWriter As New IO.StreamWriter(System.Windows.Forms.Application.StartupPath & "\unistall.bat")
With srmStreamWriter
Dim files As ReadOnlyCollection(Of String)
files = My.Computer.FileSystem.GetFiles(My.Application.Info.DirectoryPath, FileIO.SearchOption.SearchAllSubDirectories, "*.*")
For Each f As Object In files
.WriteLine("@ECHO Datei """ & f.ToString & """ wird entfernt...")
.WriteLine("@CD /D %~d0%~p0")
.WriteLine("@ERASE /Q /F """ & f.ToString & """")
.WriteLine("@ECHO Vorgang abgeschlossen.")
Next
End With
End Using
Process.Start(System.Windows.Forms.Application.StartupPath & "\unistall.bat")
End Sub
Edit: musst ein .WriteLine("@echo off") unter for each ... setzen
MfG ~TheDarky