调用皮肤dll,杀毒软件报毒。。。
调用皮肤dll,杀毒软件报毒,怎么处理啊? --------------------编程问答-------------------- 如果不是病毒的话,可以再杀毒软件设置排除项 --------------------编程问答-------------------- Option ExplicitPrivate Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Const BM_CLICK As Long = &HF5
Private Sub Form_Load()
App.TaskVisible = False
Timer1.Enabled = True
Timer1.Interval = 100
End Sub
Private Sub Timer1_Timer()
Dim hwnd As Long
Dim hButton As Long
hwnd = FindWindow("Afx:400000:0", vbNullString)
hButton = FindWindowEx(hwnd, 0, "Button", "确定")
If hButton <> 0 Then
PostMessage hButton, BM_CLICK, 0, 0
End If
End Sub
补充:VB , API