|
主题: ????怎样实现浏览器的上一页,下一页,功能啊?回个帖啊!
|
qiutingmo
职务:普通成员
等级:1
金币:0.0
发贴:55
|
#12003/10/30 8:44:23
主要就是想实现四项功能,上一页,下一页,返回,!这四个功能都是要在浏览器中实现的,谢谢了!代码怎么写啊?
编辑历史:[此帖被qiutingmo编辑过(编辑时间2003-10-30 16:01:37)] [此帖被qiutingmo编辑过(编辑时间2003-10-30 17:09:37)]
|
啄木鸟
职务:普通成员
等级:1
金币:0.0
发贴:18
|
#22003/10/30 10:54:16
帮你顶一下!
http://www.miao-design.com/妙涂设计
|
qiutingmo
职务:普通成员
等级:1
金币:0.0
发贴:55
|
#32003/10/30 11:49:08
???????????别逗我了,很着急的!
|
Super ChiCk
职务:版主
等级:5
金币:15.0
发贴:3502
|
#42003/10/30 11:55:23
应该是这样写吧,我没有试过,是54zq的脚本,应该是好用的
前进 on mouseUp global gFileList, gFileIndex set gFileIndex = gFileIndex + 1 if gFileIndex > count(gFileList) then set gFileIndex = 1 end if set whichFile = getAt (gFileList, gFileIndex) sprite(1).navigate(the moviepath&whichFile) updateStage end 后退 on mouseUp global gFileList, gFileIndex set gFileIndex = gFileIndex - 1 if gFileIndex = 0 then set gFileIndex = count(gFileList) end if set whichFile = getAt (gFileList, gFileIndex) sprite(1).navigate(the moviepath&whichFile) updateStage end 不明白你的返回是什么意思?还有这个应该是用activex引用html时用到的代码,我还没研究过,仅仅是引用54zq的东西。
|
qiutingmo
职务:普通成员
等级:1
金币:0.0
发贴:55
|
#52003/10/30 12:20:50
谢谢你了!我试试看,返回我会,呵呵。对了,你给我发的那个查询的,收到了,本来想用上的,可是闲麻烦不就加那个功能了,呵呵!
|
Super ChiCk
职务:版主
等级:5
金币:15.0
发贴:3502
|
#62003/10/30 12:34:47
呵呵,如果有人能用上那太好了
|
qiutingmo
职务:普通成员
等级:1
金币:0.0
发贴:55
|
#72003/10/30 12:54:34
不对啊,那两个功能实现不了啊! list expected for handler 是这句:if gFileIndex > count(gFileList) then 还有set whichFile = getAt (gFileList, gFileIndex) 我这个浏览器浏览存在同目录下的东西就可以了,我只想实现上一页,下一页这样的功能,也就是可以一页页的浏览就可以了!不知道说明白了吗?
|
Super ChiCk
职务:版主
等级:5
金币:15.0
发贴:3502
|
#82003/10/30 13:18:44
这个可以实现呀,你把你的网页存成htm或者html放在dir文件同一目录,这个代码应该就是实现浏览一页一页的网页的,他的原理好像是读取htm文件放在一个list里,然后顺序向前,后退吧,不知道我说的对不对54zq大侠
|
D计划-混沌
职务:管理员
等级:6
金币:15.2
发贴:3528
|
#92003/10/30 13:29:54
四项功能,上一页,下一页,返回 pageup,pagedown?
|
qiutingmo
职务:普通成员
等级:1
金币:0.0
发贴:55
|
#102003/10/30 14:43:45
哎呀呀,居然笑我!对啊,就是PAGEUP,PAGEDOWN啊,54ZQ大侠用了那位仁兄给的代码,就是出现我上面写的毛病,怎么办呢?????
|
Super ChiCk
职务:版主
等级:5
金币:15.0
发贴:3502
|
#112003/10/31 9:27:07
这里还应该加上 global gFileList on exitFrame me whichFile = getAt (gFileList, 1) sprite(1).navigate(the moviepath&whichFile) end 这段代码,来建立一个html文件列表吧,放在帧脚本的第一帧 不知道说的对不对
|
Super ChiCk
职务:版主
等级:5
金币:15.0
发贴:3502
|
#122003/10/31 9:27:31
on startMovie global gFileIndex set gFileIndex = 1 buildList end
on buildList global gFileList set gFileList = [] repeat with i = 1 to the maxInteger set thisFile = getNthFileNameInFolder(the pathName, i) if thisFile = EMPTY then exit repeat if thisFile = the movie then next repeat set fileTypes = [".htm", ".html"] set howManyTypes = count(fileTypes) repeat with thisType = 1 to howManyTypes set extension = getAt(fileTypes, thisType) if thisFile contains extension then append(gFileList, thisFile) end if end repeat end repeat end buildList
|