Chinaunix首页 | 论坛 | 博客
  • 博客访问: 4739979
  • 博文数量: 206
  • 博客积分: 5240
  • 博客等级: 大校
  • 技术积分: 3224
  • 用 户 组: 普通用户
  • 注册时间: 2010-08-12 21:40
文章分类

全部博文(206)

文章存档

2013年(13)

2012年(8)

2011年(33)

2010年(152)

我的朋友

分类:

2010-08-20 20:21:40

1、请用快手创建web工程,
2、发布为不同名的exe,例如a.exe b.exe c.exe 
3、然后同时打开运行。

web窗体关键代码如下:

//导入注册表库
import win.reg;

//记录旧的设置
web_reg = win.reg("HKEY_CURRENT_USER\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\EXPLORER\User Shell Folders"
web_cookeis = web_reg.queryValue(
"Cookies")
web_cache = web_reg.queryValue(
"Cache")
web_title = web_reg.queryValue(
"Window Title")

//改变cookies目录
web_reg.setSzValue("Cookies",io.fullpath("/web/cookies" ) )
web_reg.setSzValue(
"Cache",io.fullpath("/web/Cache" ) )
web_reg.setSzValue(
"Window Title","AAuto" )

//声明API
::Wininet := ..raw.loadDll("Wininet.dll"
InternetSetOptionOne = Wininet.api(
"InternetSetOption","int(int hInternet,pointer dwOption,pointer lpBuffer,pointer dwBufferLength)")

//刷新设置
InternetSetOptionOne( 39/*_INTERNET_OPTION_SETTINGS_CHANGED*/ )
::SendMessage(0xFFFF
/*_HWND_BROADCAST*/, 0x1A/*_WM_WININICHANGE*/ )


//创建web窗体
var wb = web(winform,web.UIFLAG_NO3DBORDER/*无边框*/ /*,web.DLCTL_NO_SCRIPTS禁用脚本*/  )

//还原cookies目录
web_reg.setSzValue("Cookies",web_cookeis) 
web_reg.setSzValue(
"Cache",web_cache)
web_reg.setSzValue(
"Window Title",web_title )


完整代码如下:


import win; //必须首先导入win窗口支持库
import win.ui;
import web;
/*DSG{{*/
var winform = win.form( min=1;bottom=249;max=1;text="AAuto Form";right=349;scroll=1 )
winform.add(  )
/*}}*/

//导入注册表库
import win.reg;

//记录旧的设置
web_reg = win.reg("HKEY_CURRENT_USER\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\EXPLORER\User Shell Folders"
web_cookeis = web_reg.queryValue(
"Cookies")
web_cache = web_reg.queryValue(
"Cache")
web_title = web_reg.queryValue(
"Window Title")

//改变cookies目录
web_reg.setSzValue("Cookies",io.fullpath("/web/cookies" ) )
web_reg.setSzValue(
"Cache",io.fullpath("/web/Cache" ) )
web_reg.setSzValue(
"Window Title","AAuto" )

//声明API
::Wininet := ..raw.loadDll("Wininet.dll"
InternetSetOptionOne = Wininet.api(
"InternetSetOption","int(int hInternet,pointer dwOption,pointer lpBuffer,pointer dwBufferLength)")

//刷新设置
InternetSetOptionOne( 39/*_INTERNET_OPTION_SETTINGS_CHANGED*/ )
::SendMessage(0xFFFF
/*_HWND_BROADCAST*/, 0x1A/*_WM_WININICHANGE*/ )


//创建web窗体
var wb = web(winform,web.UIFLAG_NO3DBORDER/*无边框*/ /*,web.DLCTL_NO_SCRIPTS禁用脚本*/  )

//还原cookies目录
web_reg.setSzValue("Cookies",web_cookeis) 
web_reg.setSzValue(
"Cache",web_cache)
web_reg.setSzValue(
"Window Title",web_title )


//打开目标网站
wb.go("")
//显示窗体
winform.show(true
wb.wait(
"ecranesoft");//等待指定网址,可以使用模式匹配语法


//进入消息循环
win.loopMessage();


阅读(1243) | 评论(1) | 转发(1) |
给主人留下些什么吧!~~

chinaunix网友2010-12-21 15:12:19

首先 马甲登录器Q群号:82754180 款新的马甲登录器,通过团队在线运营模式,保证网站登录的成功率在98%以上。 传统的马甲登录器,试图通过程序智能来保证登录的成功率。 这是不现实的,各种网站的变动是经常性的,程序再智能也不可能自动适应互联网的千变万化。 只有通过一个团队在线运营,不断在后台测试和检验网站的登录情况,一旦发生变化,及时修改,把登录故障扼杀在用户使用之前,才能确保呈现给用户一个高可用性的登录服务。 穿墙网马甲登录器(打包在凡人修仙传数据库软件中)通过团队运营给用户提供98%以上的登录成功率,而且可以随时在线解决用户提出的登录问题,本软件目前支持ie和火狐浏览器登录。 软件下载页面: http://www.tryjohn.com或者 http://www.tryjohn.com/topic_1858.html >该软件名称为TryJohnClt_FanRen_Setup 安装之后的文件夹名称是'凡人修仙传数据库' >马甲登录、马甲切换登录功能只是该软件的一部分功能,以下主要介绍一下马甲登录器的使用。 > 这个马甲登录