QQ浇花源码！！！不信我也没办法！！！！！！！！_电脑百科

ZxID：27385275

想要更多技术？访问我们的官方技术网站：http://bbsanuo.lingw.net/

举报只看楼主使用道具楼主发表于: 2013-08-18 0

.版本 2

.程序集窗口程序集1
.程序集变量返回值, 整数型
.程序集变量 gtk, 文本型

.子程序 _按钮1_被单击

返回值＝ QQ登陆 (编辑框1.内容, 编辑框2.内容, gtk)
信息框 (“返回码定义：1.登录成功 2.验证码错误 3.帐号/密码错误 4.系统繁忙。” ＋ “本次返回值=” ＋到文本 (返回值), 0, )

.子程序 _按钮2_被单击
.局部变量太阳, 文本型
.局部变量雨露, 文本型
.局部变量爱心, 文本型
.局部变量营养值, 文本型

.如果真 (编辑框3.内容＝ “”)
信息框 (“请输入QQ号码！”, 0, )
返回 ()
.如果真结束
太阳＝ “g%5Ftk=1302560025&newflower=1&uin=” ＋编辑框3.内容＋ “&fl=1&act=sun”
网页_访问 (“http://flower.qzone.qq.com/fcg-bin/cgi_plant?g_tk=” ＋ gtk, 1, 太阳, )
雨露＝ “g%5Ftk=1302560025&newflower=1&uin=” ＋编辑框3.内容＋ “&fl=1&act=rain”
网页_访问 (“http://flower.qzone.qq.com/fcg-bin/cgi_plant?g_tk=” ＋ gtk, 1, 雨露, )
爱心＝ “g%5Ftk=1302560025&newflower=1&uin=” ＋编辑框3.内容＋ “&fl=1&act=love”
网页_访问 (“http://flower.qzone.qq.com/fcg-bin/cgi_plant?g_tk=” ＋ gtk, 1, 爱心, )
营养值＝ “g%5Ftk=1302560025&newflower=1&uin=” ＋编辑框3.内容＋ “&fl=1&act=nutri”
网页_访问 (“http://flower.qzone.qq.com/fcg-bin/cgi_plant?g_tk=” ＋ gtk, 1, 营养值, )

看不懂的请下载：