VB是对API的封装 qq 快速登录 各种webservice接口搜集 ReReg.bat 注册登录组件

VB是对API的封装


_vbaVarTstNe 比较变量是否不相等
_vbaVarTstEq 比较变量是否相等
_vbaStrCmp   比较字符串是否相等
_vbaStrComp  比较字符串是否相等


_vbavardup   复制一个变量
__vbaVarTstGt 关系运算 >
__vbaVarTstGe ;关系运算 >=
__vbaVarTstEq ;关系运算 =
__vbaVarTstNe ;关系运算 <>
__vbaVarTstLt ;关系运算 <
__vbaVarTstLe ;关系运算 <=
__vbaVarEqv ;逻辑运算 Eqv
rtcVarBstrFromAnsi ;函数 Chr(interger)
rtcCommandVar ;函数 Command() #670
rtcHexVarFromVar ;函数 Hex(num)
rtcInStrRev ;函数 InStrRev(源字符串,目标字符串,起始位置,比较方式) #709




_vbaVarLateMemSt




qq 快速登录
http://xui.ptlogin2.qq.com/div/qlogin_div.html




/***************************************************************************************************************/
http://xui.ptlogin2.qq.com/div/qlogin_div.html?u1=http://im.qq.com/&r=2014-11-25%20????%2011:10:14
u1=http://im.qq.com/  为登录的网站




点快速登录按钮发包  对于34611532  貌似是不变的
http://ptlogin2.qq.com/jump?


clientuin=34611532&clientkey=000154741a0d0068a400afc7a4558c6262387c208ee6dbdaab546e643b1025e3ce6dddd320cd94c6b2ebf7fd9cb51587bd010db102be7f1cb8084117147f0b45118d6a90fb960da9e7861a


30e1979029911604107ff6b72c6d672256e1e0892f43851d2ff40b70a77ff71c3f27273398&keyindex=9&pt_aid=&u1=http://im.qq.com/&ptopt=1


/***************************************************************************************************************/


http://xui.ptlogin2.qq.com/div/qlogin_div.html?u1=http://t.qq.com/


快速登录微薄
http://ptlogin2.qq.com/jump?


clientuin=34611532&clientkey=000154741a0d0068a400afc7a4558c6262387c208ee6dbdaab546e643b1025e3ce6dddd320cd94c6b2ebf7fd9cb51587bd010db102be7f1cb8084117147f0b45118d6a90fb960da9e7861a


30e1979029911604107ff6b72c6d672256e1e0892f43851d2ff40b70a77ff71c3f27273398&keyindex=9&pt_aid=&u1=http://t.qq.com/&ptopt=1


/***************************************************************************************************************/
//登录QQ邮箱
http://xui.ptlogin2.qq.com/div/qlogin_div.html?u1=http://mail.qq.com/


http://ptlogin2.qq.com/jump?


clientuin=34611532&clientkey=000154741a0d0068a400afc7a4558c6262387c208ee6dbdaab546e643b1025e3ce6dddd320cd94c6b2ebf7fd9cb51587bd010db102be7f1cb8084117147f0b45118d6a90fb960da9e7861a


30e1979029911604107ff6b72c6d672256e1e0892f43851d2ff40b70a77ff71c3f27273398&keyindex=9&pt_aid=&u1=http://mail.qq.com/&ptopt=1


/***************************************************************************************************************/


http://ws.sj.qq.com/webservices/getUpdates.do?uid=34611532 //webservice接口




//统计的WEB服务器
http://web.51.la:82/go.asp?svid=9&id=17453580&tpages=1&ttimes=1&tzone=8&tcolor=32&sSize=1625,902&referrer=&vpage=&vvtime=1416885015090




//转到腾讯微薄
http://ptlogin4.t.qq.com/check_sig?pttype=2&uin=34611532&service=jump&nodirect=0&ptsig=6g7BjTvV7B4C8Y-H497mMCl7m4OmpBUWsvx9QDvDwvs_&s_url=http%3A%2F%2Ft.qq.com


%2F&f_url=&ptlang=2052&ptredirect=100&aid=1000101&daid=6&j_later=0&low_login_hour=0&regmaster=0&pt_login_type=2&pt_aid=0&pt_aaid=0&pt_light=0






http://ptlogin2.qq.com/jump?


clientuin=34611532&clientkey=00015473f1120068eb531ff8cbd74a7ead9c59f4184b4f57dd92a1e853e05309483a12af373ece9a648ec0efd1346c85ae67cd732d7fad5e03d6e2b6269cff2f773a065d418b2101278f2f


c58a013c28bab40f9682a317537fb8508251542c7bc59f3a8376355bf233adad89e0d77bf0&keyindex=9&pt_aid=&u1=http://im.qq.com/&ptopt=1
























各种webservice接口搜集
获取IP


腾讯获取IP地址3
淘宝获取IP地址http://ip.taobao.com/service/getIpInfo.php?ip=8.8.8.8
ipinfo.io获取IP地址 http://ipinfo.io/json http://ip-api.com/line http://ip-api.com/php http://ip-api.com/csv
ip-api.com获取IP地址 http://ip-api.com/xml http://ipinfo.io/8.8.8.8/json
新浪获取IP地址 http://int.dpool.sina.com.cn/iplookup/iplookup.php?format=js http://int.dpool.sina.com.cn/iplookup/iplookup.php?format=js&ip=8.8.8.8
搜狐获取IP地址 http://pv.sohu.com/cityjson http://pv.sohu.com/cityjson?ie=utf-8
蓝色年代获取IP地址 http://ip.blueera.net/api http://ip.blueera.net/api?type=json http://ip.blueera.net/api?type=js http://ip.blueera.net/api?


ip=www.baidu.comhttp://ip.blueera.net/api?ip=8.8.8.8&callback=chkip
太平洋获取IP地址 http://whois.pconline.com.cn/ipJson.jsp http://ip.blueera.net/api?type=json http://ip.blueera.net/api?type=js http://ip.blueera.net/api?


ip=www.baidu.comhttp://ip.blueera.net/api?ip=8.8.8.8&callback=chkip


























http://set1.mail.qq.com/zh_CN/htmledition/ajax_proxy.html?mail.qq.com&v=140521
http://l.qq.com/lview?c=www&loc=qqmail_send_skyscraper&callback=AD_callback&rot=1
http://set1.mail.qq.com/cgi-bin/do?sid=O2iIkme3qILwLDNn&action=checkpoint&url=http%3A%2F%2Fset1.mail.qq.com%2Fcgi-bin%2Fmail_list%3Fsid%3DO2iIkme3qILwLDNn%26folderid%3D3%26page


%3D0%26topmails%3D0%26loc%3Dfolderlist%2C%2C%2C3%26r%3D0.3805828301908467&sid=O2iIkme3qILwLDNn








http://set1.mail.qq.com/cgi-bin/mail_list?sid=O2iIkme3qILwLDNn&folderid=1&folderkey=1&page=0&s=inbox&topmails=0&showinboxtop=1&ver=572554.0&cachemod=maillist&cacheage=7200&r=


/***************************************************************************************************************************************************************/
/***************************************************************************************************************************************************************/
/***************************************************************************************************************************************************************/
/***************************************************************************************************************************************************************/
http://web.51.la:82/go.asp?svid=9&id=17453580&tpages=1&ttimes=1&tzone=8&tcolor=32&sSize=1411,857&referrer=&vpage=&vvtime=1416810686994
http://web.51.la 统计的一个网址


http://set1.mail.qq.com/cgi-bin/mail_list?sid=O2iIkme3qILwLDNn&folderid=1&folderkey=1&page=0&s=inbox&topmails=0&showinboxtop=1&ver=514271.0&cachemod=maillist&cacheage=7200&r=




http://ls.l.qq.com/lview?


c=t&loc=weibo_SJ_WDZY_ZR_DZbanner,weibo_SJ_WDZY_ZR_LBbanner1,weibo_SJ_WDZY_ZR_LBbanner2,weibo_SJ_WDZY_ZR_LBbanner3,weibo_N_SJ_WDZY_R2P_TJPP,weibo_N_SJ_KFY_DJZX,weibo_N_SJ_WDZY_R4P


_TJPP&callback=crystal.callbackarea&rot=1




http://api.t.qq.com/asyn/mysidebar_n_new.php?cb=mySidebar&s=16&g_tk=644584056&home=1&mu=http%3A%2F%2Ft.qq.com%2Fjiahe201004&apiType=14&r=1416810698572
微薄平台


c:\windows\system32\cmd.exe 创建新进程 c:\windows\system32\taskkill.exe 允许 [应用程序]* 命令行: taskkill /f /im C:\Documents and Settings\Administrator\桌


面\fang.exe


/***************************************************************************************************************************************************************/
ReReg.bat 




 v74 = 5;                                      // 为什么注册这几个文件,答案在下边网址
                                                // http://zhidao.baidu.com/link?url=vz7QeMe0u1lw9gBue3wdCc6abqdwcXS_NzAt4xTyRKkNTlBasQjHmGMG1-w5_AGEeq41N-Rm6UApOHbVdVkQc_
                                                // 
                                                // QQ免安装
                                                // 
                                                // 有可能需要Bin\TXSSO\Bin  目录下的这4个文件
                                                // SSOPlatform.dll、npSSOAxCtrlForPTLogin.dll、SSOCommon.dll、SSOLUIControl.
                                                // dll
  v51 = (int)L"regsvr32 /s \"";
  v50 = 8;
  v49 = (int)L"npSSOAxCtrlForPTLogin.dll\"";
  v48 = 8;
  v47 = (int)L"\r\n";
  v46 = 8;
  v45 = (int)L"regsvr32 /s \"";
  v44 = 8;
  v43 = (int)L"SSOCommon.dll\"";
  v42 = 8;
  v41 = (int)L"\r\n";
  v40 = 8;
  v39 = (int)L"regsvr32 /s \"";
  v38 = 8;
  v37 = (int)L"SSOLUIControl.dll\"";
  v36 = 8;
  v35 = (int)L"\r\n";
  v34 = 8;
  v33 = (int)L"del %0";
  v32 = 8;


/***************************************************************************************************************************************************************/