VB怎么调用默认的杀毒软件查杀一个文件
RT,我想做一个仿迅雷下载软件,可是不知道怎么到后来就查杀病毒。还有怎么做悬浮窗请多多指教!
好的加200分,O(∩_∩)O谢谢啦!
补充:还有如果我要移动窗体该怎么办,我把borderstyle设成0了。
追问:悬浮窗口是在屏幕上永远顶置的那个。
RT,我想做一个仿迅雷下载软件,可是不知道怎么到后来就查杀病毒。还有怎么做悬浮窗请多多指教!
好的加200分,O(∩_∩)O谢谢啦!
补充:还有如果我要移动窗体该怎么办,我把borderstyle设成0了。
追问:悬浮窗口是在屏幕上永远顶置的那个。
答案:楼主既然可以防迅雷想必功力深厚啊,偶像!调用其他程序简单的用shell "**.exe 文件名"均要指明路径,API的话用万能的shellexecute 窗体句柄hwnd,命令"open","调用应用程序路径","附加参数即要扫描的文件路径",null,显示方式。悬浮窗口是不是常见的从右下角弹出的窗口?若是的话可以新建窗体2,animate函数动态显示,具体参数可以参考其声明这是一个调用360杀毒的例子
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
Private Sub Command1_Click()
Dim Kav As String, CheckFile As String
Kav = "C:\Program Files\360\360sd\360sd.exe"
CheckFile = "c:\test.doc"
Call ShellExecute(Handle, "open", Kav, CheckFile, nil, SW_SHOWNORMAL)
End Sub做悬浮窗的话你另外加一个窗体就行了吧。。。然后参数问题可以与主窗口通信解决。调用本地病毒软件查杀病毒的话你可以看看有关注册表的东西。我不是学VB的,只是给个建议,不喜勿喷呀。