Как мне сделать Killswitch для моего приложения на vb.net? - PullRequest
0 голосов
/ 22 июня 2019

Я пытаюсь настроить пакетный сценарий, «Killswitch», если хотите, который можно удаленно загрузить на компьютер пользователя и удалить приложение из файловой системы компьютера, если приложение взломано. Я хочу иметь возможность добавить пакетный сценарий при запуске Windows, чтобы при загрузке системы он мог удалить все файлы с именем «Project Superior» в имени файла.

Dim directory As String = "C:\Users\" + Environment.UserName + "\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup"

    Private Sub Form_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim Check As New Net.WebClient
        Dim CheckKS = Check.DownloadString("https://pastebin.com/raw/c691KNVC")
        If CheckKS.Contains("0") Then

        ElseIf CheckKS.Contains("1") Then
            Dim applicationPath As String = AppDomain.CurrentDomain.BaseDirectory
            Dim regKey As Microsoft.Win32.RegistryKey
            regKey = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Run", True)
            regKey.SetValue("Project Superior", """" & applicationPath & """")
            regKey.Close()
            If directory.Contains("Updater.bat") Then
                Dim run As String = Environment.CurrentDirectory + "\Updater.bat"
                Process.Start(run, "")
            Else

            End If
        End If
    End Sub

Я хочу, чтобы у меня работал выключатель.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...