ActionScript编程实战项目新闻发布系统文档格式.docx

1、备注（2）在网站根目录中新建名称为conn的ASP页面，并在该页面中输入连接数据库的代码，并检查连接异常，如下所示。%On Error Resume Next使程序在发生错误那条命令后继续执行Dim dbpath,conn声明变量dbpath = Database/News.accdb数据库的相对路径Set conn = Server.CreateObject（adodb.connection）创建connection对象，该对象用于对数据库进行连接操作conn.Provider = Microsoft.ACE.oledb.12.0定义数据库连接的驱动程序conn.Open Server.Ma

2、ppath（dbpath） 对指定的数据库进行连接操作If Err.Number 0 Then如果在连接数据库过程中出现错误 Response.Write（无法建立连接，请检查错误信息: & Err.Number & Err.Description） 在网页中输出错误数目和错误描述 Err.Clear将错误清除 Response.End（）结束Response对象输出End If结束判断语句%（3）在网站根目录下新建名称为NewsXML的ASP页面，该页面查询News数据表中的所有新闻，并以XML格式输出在网页中，如下所示。!-#include file=conn.asp-Dim rs,sql

3、,iset rs = Server.CreateObject（Adodb.Recordsetsql = select * from News order by id descrs.Open sql,conn,1,1查询News数据表中的所有新闻信息If rs.Eof Then未发布任何新闻！在网页中输出提示信息结束Respnose对象输出Else将所有新闻以XML格式输出到网页中 i = 0?xml version=1.0list do while i rs.MoveNext i = i+1 loopResponse.Write（/listset rs = nothingrs.closeset

4、 conn = nothingconn.close（4）在网站根目录下新建名称为save的ASP页面，该页面将Flash表单中提交的新闻信息存储到数据库中，如下所示。Dim title_post,type_post,author_post,from_post,time_post,content_postDim rs,sqltitle_post = Trim（Request.Form（）type_post = Trim（Request.Form（author_post = Trim（Request.Form（from_post = Trim（Request.Form（time_post = Tr

5、im（Request.Form（content_post = Trim（Request.Form（从表单中获取提交的新闻信息，并存储到相应的变量中if（title_posttype_postauthor_postfrom_posttime_postcontent_post） then set rs = Server.CreateObject（ sql = select * from News rs.Open sql,conn,1,3以可写的方式打开News数据表 rs.addNew创建一条新记录 rs（） = title_post） = type_post） = author_post） =

6、from_post） = time_post） = content_post将新闻信息存储到数据表的相应字段中 rs.Update保存修改 set rs = nothing rs.closeend if2创建Flash及ActionScript文件（1）新建1003600像素的空白文档，将所有素材图像导入到【库】面板，并将背景图像拖入到舞台，如图26-2所示图26-2 拖入背景图像（2）在【库】面板中将“提交按钮”和“返回列表”元件导出为Submit和listBtn自定义类，如图26-3所示。图26-3 导出为自定义类（3）在网站根目录中新建名称为News的ActionScript文件，在文件

7、中使用import语句导入所需的类，以及创建包、New类和News（）主函数，如下所示。package import flash.display.Sprite; import flash.text.TextField; import flash.text.TextFieldType; import flash.display.MovieClip; import flash.events.MouseEvent; import flash.events.Event; import .URLLoader; import .URLRequest; import .URLVariables; impor

8、t .URLRequestMethod; import .navigateToURL; import flash.utils.setInterval; import flash.utils.clearInterval; import flash.text.TextFieldAutoSize; import flash.utils.getTimer; import flash.system.System; public class News extends Sprite public function News（） /主函数体 （4）在News类中声明用于输入和显示新闻的文本字段、存储新闻信息的

9、数组，以及用于加裁外部网页的对象，如下所示。private var titleInput:TextField;private var typeInput:private var authorInput:private var fromInput:private var timeInput:private var contentInput:/添加新闻的输入文本框private var Input_MC:MovieClip;private var request:URLRequest;private var loader:URLLoader;private var variables:URLVar

10、iables;private var url:String;private var num:int;private var Loop:/限制显示的新闻条数private var News_MC:private var titleTxt:private var typeTxt:private var authorTxt:private var fromTxt:private var timeTxt:private var contentTxt:/显示新闻的文本框private var i:int = 0;private var xml:XML;private var titleArr:Array

11、 = new Array（）;/存储留言标题的数组private var typeArr:/存储新闻类别的数组private var authorArr:/存储作者姓名的数组private var fromArr:/存储新闻出处的数组private var timeArr:/存储发布时间的数组private var contentArr:/存储新闻内容的数组private var newsURL:（5）创建名称为showNews（）的函数，该函数创建用于存储新闻对象的窗口，及加载新闻，如下所示。private function showNews（）:void News_MC = new MovieClip（）; addChild（News_MC）; /用于存储新闻