VB 中如何调用旺旺窗口 并且直接发送信息
VB 中如何调用旺旺窗口 并且直接发送信息
比如 旺旺直接打开text1.text中的用户 然后直接发送text2中的内容
2012旺旺版本的
我是个菜鸟 希望能给出代码 谢谢!
[解决办法]
我用下面的方法可以查到qq播放wav的时候,监测成功,
Public Function FileIsOpen(ByVal FilePath As String) As Boolean
Dim fFile As Integer
fFile = FreeFile
On Error GoTo ErrOpen
Open FilePath For Binary Lock Read Write As fFile
Close fFile
Exit Function
ErrOpen:
FileIsOpen = True
End Function
If (FileIsOpen("D:\Program Files (x86)\Tencent\QQ\Misc\Sound\Classic\system.wav")) Then
QQMsgFla = 1
End If
仅作参考 呵呵