Question

自己的VB程序被360当成木马，主要是代码中用了ShellExecute打开浏览器，如何解决？

情况是这样的，为了方便查看我自己网站后台的订单，我为开发了一个VB6程序用于检测是否有新订单，并且可以打开浏览器查看订单。所以就用了：ShellExecute 这个api函数，可是会被360误当木马，请问如何解决？

当然，将程序加入白名单这个方法除外！
非常感谢各位！

shell的确不报木马，但url中如果有形如a=1&b=2的参数，就会提示文件不存在，应该有解决的方法，只是现在我没时间去深入研究。

webbrowser 控件也是思路，但要较大的修改程序，并且win7下运行可能会出错，暂时也不便去研究。

做成函数，然后将url传进去，的确可以饶过，改动最小，就选这个了，非常感谢，同时也请其它的几位见谅！

Answer 1

试下这个，似乎可以绕过：
Private Declare Function ShellExecute Lib "Shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Public Function HyperJump(ByVal url As String) As Long
HyperJump = ShellExecute(0&, vbNullString, url, vbNullString, vbNullString, vbNormalFocus)
End Function
'调用
HyperJump App.path & "/updater.exe"
'也可以是网址

Answer 2

使用 webbrowser 控件即可

Answer 3

你可试试以下两种
Private Sub Command1_Click()
URL = "http://www.qq.com"
Shell "cmd.exe /c start " & URL, 0
End Sub

Private Sub Command1_Click()
URL = "http://www.qq.com"
Shell "explorer " & URL, 0
End Sub

Answer 4

用VB自带的shell呗~~