易语言调用接口查看QQ各项资料的代码

.版本 2
.DLL命令 ShellExecuteA, 整数型, "shell32.dll", "ShellExecuteA", , 查找与指定文件关联在一起的程序的文件名,并执行相关操作，成功则返一个大于31的值。
  .参数 hwnd, 整数型, , 用来指定被执行文件显示的窗口所属的父窗口句柄，可以为NULL
  .参数 lpOperation, 文本型, , 指向一个表示执行方式的字符串
  .参数 lpFile, 文本型, , 用来指定文件名,文件名既可以是可执行文件也可以是数据文件,或可执行文件．
  .参数 lpParameters, 文本型, , 当lpFile参数指定了一个可执行文件(open),本参数用来指定命令行参数.如果lpFile参数指定是数据文件或其它,那么本参数必须是NULL
  .参数 lpDirectoy, 文本型, , 执行或打开文件时使用的默认目录，如果lpFile同时指定了文件名(夹)的目录，此参数无效．
  .参数 nShowCmd, 整数型, , 如果函数执行了一个可执行文件,这个参数是指定窗口的打开方式,这个参数定义同ShowWindow函数中的dwCmdShow参数

.版本 2
.支持库 shell
.支持库 internet
.支持库 spec
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
.子程序 _查看空间按钮_被单击
执行 (, “http://” ＋ QQ号编辑框.内容 ＋ “.qzone.qq.com/”, , , )
.子程序 _Q形象按钮_被单击
Q形象图片框.图片 ＝ HTTP读文件 (“http://qqshow-user.tencent.com/” ＋ QQ号编辑框.内容 ＋ “/10/00”)
.子程序 _加好友按钮_被单击
执行 (, “http://shang.qq.com/open_webaio.html?sigt=baeb4e0bf232f744dfd1c0a55bb3c114812cc40a49a6ef76a3dc16deda258edd024c6571172cffad951b270489225809&sigu=b3f92d604d2f014c82b012149884f6ce7370285779bc03a0a4e0bbf500a54ac327b2e470ca5e550c&tuin=” ＋ QQ号编辑框.内容, , , )
.子程序 _刷新按钮_被单击
调试输出 (到文本 (HTTP读文件 (“http://webpresence.qq.com/getonline?Type=1&” ＋ QQ号编辑框.内容 ＋ “:”)))
.如果 (到文本 (HTTP读文件 (“http://webpresence.qq.com/getonline?Type=1&” ＋ QQ号编辑框.内容 ＋ “:”)) ＝ “online[0]=1;”)
  _启动窗口.标题 ＝ “QQ:” ＋ QQ号编辑框.内容 ＋ “ [在线]”
  _启动窗口.标题 ＝ “QQ:” ＋ QQ号编辑框.内容 ＋ “ [不在线或隐身]”
.否则
.如果结束
信息框 (“请注意窗口题标！”, 0, )
.子程序 _资料按钮_被单击
网页_打开指定网址 (“tencent://ContactInfo/?subcmd=ViewInfo&puin=0&uin=” ＋ QQ号编辑框.内容)
.子程序 网页_打开指定网址, 逻辑型, , 使用系统默认的浏览器打开一个网址
.参数 网址, 文本型, , 要打开的网页地址
返回 (选择 (ShellExecuteA (0, “open”, 网址, “”, “”, 1) ＝ 0, 假, 真))
.子程序 _QQ头像按钮_被单击
Q头像图片框.图片 ＝ HTTP读文件 (“http://q.qlogo.cn/headimg_dl?dst_uin=” ＋ QQ号编辑框.内容 ＋ “&spec=640&img_type=jpg”)