《OA办公自动化系统综合实例》由会员分享，可在线阅读，更多相关《OA办公自动化系统综合实例（79页珍藏版）》请在金锄头文库上搜索。
1、第22章综合实例 企业门户网站 Blog 论坛 B2C电子商务网站 OA办公自动化系统（工作流模块）第22章综合实例22.1 企业门户网站企业门户网站的建设，使企业能够通过网络和客户更好地交流、拉近与客户的距离、掌握大量的客户反馈信息并及时做出企业内部调整方案，以满足客户的需求。企业门户网站的建设和管理，直接影响整个企业的形象，拥有一个设计美观、功能全面的企业门户网站，已经成为企业网络化建设的一个重要内容。本章将通过几个实例介绍企业门户网站中的一些常用功能。实例384 点推荐软件实例461带历史信息的菜单本实例是一个提高基础技能的程序实例位置：光盘mingrisoft01001重点推荐软件这是
2、一个可以提高基础技能的实例实例位置：光盘mingrisoft22Ex22_01 实例说明在提供软件下载的企业门户网站首页中，通常会设置重点推荐软件栏目。运行本实例，如图22.1所示，当用户单击企业门户网站首页重点推荐软件栏目中提供的某一软件名称时，程序会弹出一新页供用户下载。图22.1 重点推荐软件技术要点重点推荐软件主要通过检索视图SoftView中的字段IfFecommend（是否推荐）和字段recommend（推荐指数）实现的，如果字段IfFecommend的值为“是”，同时字段recommend的值大于“0”，则该数据可以显示在重点推荐软件栏目中，主要代码如下。string SqlSt
3、r = select * from SoftView where IfFecommend=是 and recommend 0; 注意：以上两个字段的值是通过管理员在后台进行设置的。当用户单击软件名称时，程序会弹出新页以供用户下载，弹出新页功能主要应用JavaScript客户端脚本实现，代码如下： Response.Write(window.open(DownDefault.aspx?ID= + id + ,width=520,height=420);Response.Write(location=javascript:history.go(-1);实现过程（1）新建一个网站，将其命名为Ex22
4、_01，默认主页为Default.aspx。（2）Default.aspx页中涉及到的主要控件如表22.1所示。表22.1Default.aspx页面控件控 件 类 型控 件 名 称用 途HTML/Tabletable页面整体布局标准/LinkButtonlnkbtnOne显示第一页数据lnkbtnUp显示上一页数据lnkbtnNext显示下一页数据lnkbtnBack显示最后一页数据数据/DataListDataList显示软件详细信息标准/LabellabPage显示当前页码labBackPage显示总页码Default.aspx页中的DataList控件模板中涉及到的控件如表22.2所示
5、。表22.2DataList模板中的控件控 件 类 型控 件 名 称用 途HTML/Tabletable页面整体布局标准/Labellabregimentation显示软件的类别labplatform显示软件的应用平台labsize显示软件的大小labrecommend显示软件的推荐指数labedition显示软件版本lablang显示软件的开发语言labUpTime显示上传软件的时间标准/LinkButtonlnkbtnname显示软件的名称（3）主要程序代码。自定义一个方法dlBind()，该方法用于检索数据库并设置DataList分页功能，在进行分页的同时，通过检索数据库，将重点推荐软件
6、列出并显示到控件中，关键代码如下：public void dlBind() int curpage = Convert.ToInt32(this.labPage.Text); PagedDataSource ps = new PagedDataSource(); SqlConnection mycon = new SqlConnection(server=(local);user id=sa;pwd=;database=db_19); mycon.Open(); string SqlStr = select * from SoftView where IfFecommend=是 and rec
7、ommend 0; SqlDataAdapter MyAdapter = new SqlDataAdapter(SqlStr, mycon); DataSet ds = new DataSet(); MyAdapter.Fill(ds, SoftView); ps.DataSource = ds.TablesSoftView.DefaultView; ps.AllowPaging = true; /是否可以分页 ps.PageSize = 2; /显示的数量 ps.CurrentPageIndex = curpage - 1; /取得当前页的页码 this.lnkbtnUp.Enabled =
8、 true; this.lnkbtnNext.Enabled = true; this.lnkbtnBack.Enabled = true; this.lnkbtnOne.Enabled = true; if (curpage = 1) this.lnkbtnOne.Enabled = false;/不显示第一页按钮 this.lnkbtnUp.Enabled = false;/不显示上一页按钮 if (curpage = ps.PageCount) this.lnkbtnNext.Enabled = false;/不显示下一页 this.lnkbtnBack.Enabled = false;
9、/不显示最后一页 this.labBackPage.Text = Convert.ToString(ps.PageCount); this.DataList1.DataSource = ps; this.DataList1.DataKeyField = id; this.DataList1.DataBind(); 页面初始化时绑定dlBind()方法：protected void Page_Load(object sender, EventArgs e) dlBind(); 【第一页】按钮代码设置如下： protected void lnkbtnOne_Click(object sender,
10、 EventArgs e) this.labPage.Text = 1; this.dlBind(); 【上一页】按钮代码设置如下： protected void lnkbtnUp_Click(object sender, EventArgs e) this.labPage.Text = Convert.ToString(Convert.ToInt32(this.labPage.Text) - 1); this.dlBind(); 【下一页】按钮代码设置如下： protected void lnkbtnNext_Click(object sender, EventArgs e) this.la
11、bPage.Text = Convert.ToString(Convert.ToInt32(this.labPage.Text) + 1); this.dlBind(); 【最后一页】按钮代码设置如下： protected void lnkbtnBack_Click(object sender, EventArgs e) this.labPage.Text = this.labBackPage.Text; this.dlBind(); 在DataList1控件的ItemCommand事件中获取选中项的索引ID值，并通过JavaScript客户端脚本传递到DownDefault.aspx页，同时
12、打开该页，代码如下： protected void DataList1_ItemCommand(object source, DataListCommandEventArgs e) string id = DataList1.DataKeyse.Item.ItemIndex.ToString(); Response.Write(window.open(DownDefault.aspx?ID= + id + ,width=520,height=420) );Response.Write(location=javascript:history.go(-1); 举一反三根据本实例，读者可以： 开发软
13、件下载网站重点推荐软件； 开发歌曲下载网站重点推荐歌曲。实例385 W本站公告显示与管理实例462带历史信息的菜单本实例是一个提高基础技能的程序实例位置：光盘mingrisoft01001本站公告显示与管理本实例可以提高工作效率实例位置：光盘mingrisoft22Ex22_02 实例说明 企业门户网站中，浏览者可以通过公告信息了解站内最新动向，例如软件更新和最新新闻等信息，这些信息可以通过管理员在后台公告栏管理中进行设置实现。运行本实例，如图22.2、图22.3所示。图22.2中的网站公告信息显示效果是通过管理员在图22.3所示的后台公告栏管理中设置实现的。图22.2 本站公告前台显示效果图22.3 本站公告后台管理页面技术要点本实例在数据表tb_Affiche中
