Public Class Form1
Dim cmdProcess As Process = New Process()
Dim fileArgs As String
Dim path As String = "C:\Windows\System32\"
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
fileArgs = "Shell32.dll,Control_RunDLL Inetcpl.cpl,,6"
cmdProcess.StartInfo.Arguments = fileArgs
cmdProcess.StartInfo.WorkingDirectory = path
cmdProcess.StartInfo.FileName = "RunDll32.exe"
cmdProcess.Start()
cmdProcess.WaitForExit()
Me.Show()
End Sub
End Class
Search thousands of free JavaScript snippets that you can quickly copy and paste into your web pages. Get free JavaScript tutorials, references, code, menus, calendars, popup windows, games, and much more.
Subscribe to:
Post Comments (Atom)
Renowned Water Expert Reynold Aquino Offers Exclusive Water Softener Discounts
Los Angeles, California - November 21, 2024 - World-renowned water expert Reynold Aquino is excited to announce exclusive discounts on prem...
-
code.gs // 1. Enter sheet name where data is to be written below var SHEET_NAME = "Sheet1" ; // 2. Run > setup // // 3....
No comments:
Post a Comment