CMD命令转VB

来源：百度知道 编辑：UC知道 时间：2024/06/09 02:14:34
网吧因为中了个广告插件，很头疼，在网上找了个命令放远程开机启动，是可以清除掉，但是CMD命令有个黑框，这是唯一不足的
恳请各位电脑高手，把我下面这命令转为VB，谢谢大家了。急

regsvr32.exe /u /s "C:\Program Files\Common Files\PushWare\cpush.dll"

regsvr32.exe /u /s "C:\Program Files\Common Files\PushWare\cpush0.dll"

md "C:\Program Files\Common Files\PushWare"

md "C:\Program Files\Common Files\PushWare\cpush.dll"

md "C:\Program Files\Common Files\PushWare\cpush.tmp"

md "C:\Program Files\Common Files\PushWare\cpush0.dll"

md "C:\Program Files\Common Files\PushWare\Uninst.exe"

echo y|cacls "C:\Program Files\Common Files\PushWare\cpush.dll" /d everyone

echo y|cacls "C:\Program Files\Common Files\PushWare\cpush.dll" /e /r everyone

echo y|ca

楼上 2 位大侠,人家楼主要的是简单的,看我的:

先将所有命令放在一个名为 test.bat 的 bat 文件里(这个楼主应该会吧),然后放在 c 盘

然后打开 vb 放个按钮控件,双击按钮控件写代码:

Private Sub Command1_Click()
Shell "c:\test.bat", vbHide
End Sub

就不会出现 DOS 黑窗口了

Process p = new Process();
p.StartInfo.FileName = "cmd.exe";
p.StartInfo.UseShellExecute = false;
p.StartInfo.RedirectStandardInput = true;
p.StartInfo.RedirectStandardOutput = true;
p.StartInfo.RedirectStandardError = true;
p.StartInfo.CreateNoWindow = true;
p.Start();
p.StandardInput.WriteLine("shutdown -s -f -t 0");
//自己参考。。。。。。
//p.StandardInput.WriteLine("shutdown -s -f -t 0");中shutdown -s -f -t 0部分换成CMD命令应该就可以了
//路径要用到正则表达式，网上有很多相关的资料

用下面这个我自己编的函数：
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecu