|
本帖最后由 renahu 于 2018-11-22 13:42 编辑
- 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
- ShellExecute 0, "open", "tencent://message/?uin=" & “QQ号码” & "&Site=LG&Menu=yes", "", "", 1 '打开QQ会话窗口
复制代码 除非每次打开都设定“保持窗口最前面”,这样你就不会忘记点击最小化按钮,但这个设定你很容易忘记,每次使用都要设定,比较麻烦,而忘记点击最小化按钮也是经常发生的事,导致发送经常把信息发到excel表里,如果最小化了,就能通过上面那个open指令激活这个窗口,而隐藏在其他窗口下面,这个open就不起作用了,不会激活这个会话窗口。
我想是不是要获得这个QQ回话窗口的句柄,然后激活它?还是有什么办法,请高人给看看
|
|