flash与asp的结合应用实例之一 论坛的实现(中)
作者 佚名技术
来源 服务器技术
浏览
发布时间 2012-07-10
|
C、 小结与提高 登陆部分功能就算完成， Flash部分的第3步和第5步是比较关键，也是比较常用的技巧。其中第3步又可以采用定时的方法来实现，在一个时间段中不断检查是否已经有返回值，根据相应的条件处理各种流程。 二、查看主题部分 查看主题部分的原理为：向服务器段发送请求，取得相应的返回值后，显示在对应的文本框中，并控制相应元素的显示情况。 A、 ASP部分 新建一个空白文件，命名为issue.asp，内容如下： <% num = 0 nowpage = request("nowpage") if nowpage = "" then nowpage = 1 end if set conn=Server.CreateObject("ADODB.Connection") conn.open "Driver={sql server};SERVER=192.168.1.32;DATABASE=pywz" ‘注释1 set rstemp=Server.CreateObject("ADODB.Recordset") rstemp.cachesize = 5 sqltemp="select * from BbsInfo order by ID" rstemp.open sqltemp,conn, 1, 1 if not(rstemp.bof and rstemp.eof) then rstemp.MoveFirst rstemp.pagesize = 8 ‘注释2 maxpage=cint(rstemp.pagecount) rstemp.absolutepage=nowpage ''nowpage maxpage sub1 author1 sub2 author2 ...... subN authorN num response.Write("nowpage=" & nowpage & "&") response.Write("maxpage=" & maxpage & "&") do while not rstemp.EOF and num < rstemp.pagesize if len(trim(rstemp("Title"))) >27 then ‘注释3 strTitle = Mid(trim(rstemp("Title")),0,27) + "..." else strTitle = trim(rstemp("Title")) end if response.Write("author" & num & "=" & trim(rstemp("Author")) & "&" & "id" & num & "=" & trim(rstemp("ID")) & "&" &"sub" & num & "=" & strTitle & "&") num = num + 1 rstemp.MoveNext loop response.Write("num=" & num) end if rstemp.close conn.close %> 其中注释1是数据库的连接字符串，如何改动可参见第一部分。注释2是设定每一次发送的记录条数为8条。注释3所在是控制发送的标题的字符长度小于27个。 B、 Flash部分 1、在主场景的第10帧上插入关键帧，将此帧命名为“mian”，场景中的布局如图5所示。在此帧的Action面板中增加如下语句： 
loadVariables("issue.asp", this, "POST"); ‘注释1 setProperty("_root.pageload", _visible, "1"); ‘注释1 setProperty("_root.pagedown", _visible, "0"); setProperty("_root.pageup", _visible, "0"); setProperty("_root.sb0", _visible, "0"); setProperty("_root.sb1", _visible, "0"); setProperty("_root.sb2", _visible, "0"); setProperty("_root.sb3", _visible, "0"); setProperty("_root.sb4", _visible, "0"); setProperty("_root.sb5", _visible, "0"); setProperty("_root.sb6", _visible, "0"); setProperty("_root.sb7", _visible, "0"); setProperty("_root.db0", _visible, "0"); setProperty("_root.db1", _visible, "0"); setProperty("_root.DB2", _visible, "0"); setProperty("_root.db3", _visible, "0"); setProperty("_root.db4", _visible, "0"); setProperty("_root.db5", _visible, "0"); setProperty("_root.db6", _visible, "0"); setProperty("_root.db7", _visible, "0"); _root.su0 = ""; _root.su1 = ""; _root.su2 = ""; _root.su3 = ""; _root.su4 = ""; _root.su5 = ""; _root.su6 = ""; _root.su7 = ""; _root.au0 = ""; _root.au1 = ""; _root.au2 = ""; _root.au3 = ""; _root.au4 = ""; _root.au5 = ""; _root.au6 = ""; _root.au7 = ""; _root.textnum = ""; stop(); 注释1为向服务器发送请求，注释2以下部分为初始化场景中的各个控件。 2、将场景中所有的文本框的类型都设置为“动态文本”，将“主题 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
上一篇: flash场景之间相互跳转的实现方法下一篇: Flash AS教程之二 按钮的AS编写规则
关于flash与asp的结合应用实例之一 论坛的实现(中)的所有评论
