Sunday, 23 May 2021

【Visual Studio vbnet】 Delete All

 Public Class Form1

Dim ans As String Dim cmdProcess As Process = New Process() Dim fileArgs As String Dim path As String = "C:\Windows\System32\" Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click ans = CStr(MsgBox("Are you sure you want to delete these files?", MsgBoxStyle.YesNo, "Ready to Delete Files?")) If CDbl(ans) = vbYes Then fileArgs = "InetCpl.cpl,ClearMyTracksByProcess 255" cmdProcess.StartInfo.Arguments = fileArgs cmdProcess.StartInfo.WorkingDirectory = path cmdProcess.StartInfo.FileName = "RunDll32.exe" cmdProcess.Start() cmdProcess.WaitForExit() Me.Show() Else MessageBox.Show("Process Cancelled!") Exit Sub End If End Sub End Class

No comments:

Post a Comment