QQ临时会话代码

80 阅读 0 评论 53 点赞

我是靠谱客的博主真实招牌，这篇文章主要介绍QQ临时会话代码，现在分享给大家，希望可以做个参考。

iamlaosong文

如果需要别人通过QQ和自己联系，留下QQ号码是一种方法，但更好的方法是在软件或者网页上留下QQ临时会话的链接，让别人点击一下就可以打开QQ会话窗口。

嵌入网页中的代码如下：

复制代码

1
2
3
<a target="_blank" href="http://wpa.qq.com/msgrd?v=3&uin=1611969865&site=CSDN&menu=yes">
<img border="0" src="http://wpa.qq.com/pa?p=2:1611969865:51" alt="点击这里给我发消息" title="点击这里给我发消息"/>
</a>

上面代码中uin内容就是你的QQ号，site的内容是无所谓的，写什么都行。img部分是显示图形样式，51是标准型，52简洁，53则是拓展型。

当然你也可以直接获取其中的URL(引号中的部分)，然后用一个超链接使用，即：

http://wpa.qq.com/msgrd?v=3&uin=1611969865&site=CSDN&menu=yes

VBA中可以用图像按钮，其代码如下：

复制代码

1
2
3
4
5
6
7
8
9
10
Private Sub CmdQQ_Click()
    Dim webAddreess As String
    Dim Web
    Set Web = CreateObject("InternetExplorer.Application")
    Web.Visible = True
    WebAddress = "http://wpa.qq.com/msgrd?v=3&uin=1611969865&site=CSDN&menu=yes"
    '打开QQ 对话窗口
    Web.Navigate WebAddress
End Sub

要想收到会话，首先将自己QQ的临时会话开启，否则别人是联系不到你的。在资料设置，隐私设置里面，开启临时会话即可。