马上加入TC
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
namespace ERYATSK
//默认空间
//开始按钮_点击操作
link=""
watchtime
username
password
x=0
taskname
function radio0_click()
x=1
//这里添加你要执行的代码
endfunction
function threadload()
web.htmlinput("explorer0",""&username,"tag:INPUT&id:username&name:username&frame:1")
help.sleep(1000)
web.htmlinput("explorer0",""&password,"tag:INPUT&id:password&name:password&frame:1")
help.sleep(1000)
web.htmlclick("explorer0","tag:INPUT&value:登录&index:7&class:student_box_right_s_button&frame:1")
help.sleep(3000)
endfunction
function threadinit()
//提示看完后的时间
//n=system.getsystime(5)
//edit.settext("ed3",""&(str.strcat("每一集设定时间为30min,现在时间",""&n)))
//打开网页
// help.sleep(1000)
web.go("explorer0","http://xauat.tsk.erya100.com")
help.messagebox("caonima")
//开始登陆
edit.settext("ed3","开始登陆")
help.sleep(1000)
endfunction
function start_click()
//获得初始值
username=编辑框.获得文本("edit0")
help.sleep(200)
password=编辑框.获得文本("edit1")
help.sleep(200)
watchtime=编辑框.获得文本("edit2")
help.sleep(200)
taskname=列表框.得到选中文本("list0")
help.sleep(200)
//在此处添加一段代码验证是否成功连接
for(i=1;i<=watchtime;i++)
handle=thread.beginthread("ERYATSK.threadinit","")
help.sleep(10000)
thread.closethread(handle)
handle=thread.beginthread("ERYATSK.threadload","")
help.sleep(10000)
thread.closethread(handle)
web.htmlinput("explorer0",""&username,"tag:INPUT&id:username&name:username&frame:1")
help.sleep(1000)
web.htmlinput("explorer0",""&password,"tag:INPUT&id:password&name:password&frame:1")
help.sleep(1000)
web.htmlclick("explorer0","tag:INPUT&value:登录&index:7&class:student_box_right_s_button&frame:1")
help.sleep(3000)
if(taskname=="中国文化概论")
link="tag:A&index:5&frame:0"
else
if(taskname=="明史十讲")
edit.settext("ed3","已选择中国文化概论,正在收看")
help.sleep(1000)
link="tag:A&index:13&frame:0"
else
if(taskname=="中华诗词之美")
edit.settext("ed3","已选择中国文化概论,正在收看")
help.sleep(1000)
link="tag:A&index:21&frame:0"
else
if(taskname=="中华传统思想-对话先秦哲学")
edit.settext("ed3","已选择中华传统思想-对话先秦哲学,正在收看")
help.sleep(1000)
link="tag:A&index:29&frame:0"
else
if(taskname=="从“愚昧”到“科学”-科学技术简史")
help.sleep(1000)
link="tag:A&index:37&frame:0"
else
if(taskname=="魅力科学")
help.sleep(1000)
link="tag:A&index:45&frame:0"
else
if(taskname=="美学原理")
help.sleep(1000)
link="tag:A&index:53&frame:0"
else
if(taskname=="当代中国社会问题透视")
help.sleep(1000)
link="tag:A&index:61&frame:0"
else
if(taskname=="西方哲学智慧")
help.sleep(1000)
link="tag:A&index:77&frame:0"
else
if(taskname=="中国的社会与文化")
help.sleep(1000)
link="tag:A&index:85&frame:0"
else
if(taskname=="当代中国政府与政治")
help.sleep(1000)
link="tag:A&index:93&frame:0"
else
if(taskname=="食品安全与日常饮食")
help.sleep(1000)
link="tag:A&index:101&frame:0"
else
if(taskname=="学术基本要素")
help.sleep(1000)
link="tag:A&index:109&frame:0"
else
if(taskname=="中西文化比较")
help.sleep(1000)
link="tag:A&index:117&frame:0"
else
if(taskname=="国学智慧")
help.sleep(1000)
link="tag:A&index:125&frame:0"
else
if(taskname=="逻辑和批判性思维")
help.sleep(1000)
link="tag:A&index:133&frame:0"
else
if(taskname=="用经济学智慧解读中国")
help.sleep(1000)
link="tag:A&index:141&frame:0"
else
if(taskname=="中国经济热点问题研究")
help.sleep(1000)
link="tag:A&index:149&frame:0"
else
if(taskname=="西方文明通论")
help.sleep(1000)
link="tag:A&index:69&frame:0"
else
help.sleep(1000)
link="tag:A&index:157&frame:0"
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
help.sleep(1000)
web.htmlclick("explorer0",""&link)
help.sleep(1800000)
endfor
if(x==1)
system.shutdown(30)
edit.settext("ed3","30秒后自动关机")
endif
endfunction
//退出按钮_点击操作
function exit_click()
help.exit()
endfunction
function edit0_setfocus()
//这里添加你要执行的代码
edit.settext("ed3","请输入学号")
endfunction
function edit1_setfocus()
//这里添加你要执行的代码
edit.settext("ed3","请输入密码")
endfunction
function edit2_setfocus()
edit.settext("ed3","需要观看几集？默认半小时播放一集")//这里添加你要执行的代码
endfunction
endnamespace
花了三个小时写的代码，后来才发现会卡死，帮我看看吧，到 handle=thread.beginthread("ERYATSK.threadinit","")里面的 web.go("explorer0","http://xauat.tsk.erya100.com")就卡死了，这一步不能执行
|
/2 
发表于 2013-10-12 08:25:21
楼主
发表于 2013-10-12 10:20:01
