Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
 
RegistrierenRegistrieren  LoginLogin
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Source Codes
Autor
Nachricht
N1k_
Newbie
Newbie

Anmeldedatum: 08.07.2007
Beiträge: 1

[S] Remote Dateimanager
Verfasst am: 08.07.2007, 20:58

Kann mal jemand pls ein Beispiel coden und hier posten, wo man wie ein bei einem Trojaner von einem Pc aus Datein auf einem anderen Pc umbenen, downloaden, löschen und ausführen kann? Hab schon Sufu und Google benutzt aber nichts tolles gefunden. Hab mir fertig programmierte RAT's angeguckt...bin aber leider nich schlau daraus geworden. Also es wäre wirklich fett wenn das mal jemand richtig detailiert und anschaulich machen könnte, so mit Komentaren (im Source: ' Das macht das und das...) und so.

mfg N1k
Dein Gott ist heute nicht hier, Priester
 
Hamtaro_
« Moderator »<b><font color=green>« Moderator »</font



Anmeldedatum: 06.05.2007
Beiträge: 217
Wohnort: NRW


Verfasst am: 09.07.2007, 07:57

Einen fertigen Source brauchst du nicht, guck dir einfach mal die vorhandenen Sources hier im Board an, dann wirst du schon hinter das Prinzip kommen:
1. Du Willst de datei c:\wichtig.exe löschen, dann sendest du mit Winsock z. B. KILLC:\wichtig.exe
2.Beim Slave-Programm kommt KILLC:\wichtig.exe an, jetzt werden die ersten 4 Zeichen verglichen mit den Commands deines RATs ,also der Befehl ist KILL, das heißt, dass die Datei rechts vom Kill gelöscht wird...
4. [code]Kill Mid(DerAngekommeneString), 5)[/code]
5. Die Datei ist gelöscht...

Bei den anderen Befehlen ist es im Prinzip genauso, nur der Dateitransfer wird schwieiriger...
mfg
HamTar0
Wie findet ihr meine Sig?
 
Archetype_
Newbie
Newbie

Anmeldedatum: 30.08.2007
Beiträge: 8


Verfasst am: 31.08.2007, 17:14

Also falls es dich noch interessiert .
Der Client (du) schick einen Befehl an den Server z.b.

winsock1.senddata ("C:\Programme|GETFileSystem")

Der Server weiß jetzt , dass er dem Client (dir) den Ordnerinhalt eines bestimmten Ordners schicken soll , nämlich C:\Programme . (Du musst davor das "GetFileSystem" natürlich noch mit len & left usw wegschneiden , so dass am Ende nur noch der gesuchte Pfad dasteht ("C:\Programme")

Danach machst du ne simple Schleife :

Code:
File = Dir((Path), vbDirectory)
Do While File <> ""
  File = Dir
 Text1.Text = Text1.Text & File & "*"
Loop

winscok1.senddata (text1.text)


(text1.text verwende ich nur zur Veranschaulichung du kannst auch ne Variable nehmen oder so . )
Jede Datei oder Ordner die im Ordner C:\Programme enthalten ist wird durch ein Sternchen * getrennt .
Sieht dann so aus : NVIDIA*Adobe*Fraps*3DMark06 usw.

Der Client (also du) bekommt jetzt einen " String " , der durch die Sternchen untereteilt ist. Jetzt kannst du mit der right () Funktion den String wieder in seine Einzelteile zerlegen (NVIDIA , Adobe , Fraps ...) und jeden Ordner z.b. in eine Listbox reinschreiben .
Löschen kannst du z.b. indem du
winsock1.senddata ("C:\Programme\lo.exe|KILL") schickst .
nachdem der server wieder analysier hat was er mit den empfangenen Daten machen soll ( right funktion) kannst du


Code:

kill ("C:\Programme\lol.exe")


machen . Ich weiß , ist nicht sonderlich ausfürlich , aber sollte dir erklären wies prinzipiel geht .
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Source Codes

Tags: dateimanager, remote, löschen, beispiel, source, fett

 
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Auslesen von Kompletten Datein / Einzelner Zeilen 496 13.02.2008, 20:46
Keine neuen Beiträge An Weihnachten Datein löschen:D 579 18.12.2007, 18:57
Keine neuen Beiträge [Video] CommonDialog - Datein Laden und Speichern 1275 10.12.2007, 10:41
Keine neuen Beiträge Speichern & Laden von Datein 660 15.10.2007, 15:13
Keine neuen Beiträge Datein kopieren und checken lasse! PLEASE HELP! 451 20.03.2007, 18:48
 


[ Time: 0.0542s ][ Queries: 86 (0.0155s) ][ GZIP on - Debug on ]