当前位置: 首页 > 图文教程 > 网络编程 > ASP > 从ASP迁移至ASP+ --转换其他的页面

ASP
bbs的数据结构和存储过程(二)
bbs的数据结构和存储过程(三)
聊天室自做 Follow Me
动态按钮生成器(上)
动态按钮生成器(下)
ASP直接调用EXCEL数据的例子(不用ODBC)
asp自动生成javascript检验函数
用Jmail做收取邮件附件的程序
简单的浮点论坛
ASP数据库恢复的代码
限制只能中文输入的方法
产生密码,记录到数据库,然后发送给用户。
一个基于web的QQ程序 1(xml+asp)
利用ASP生成EXECL文档
用ASP让用户访问指定页面
使用ASP程序对“HTML炸弹”进行屏蔽
实现ASP文件在线发邮件
用ASP+SQL Server为网页建一道防火墙
用Delphi开发ASP分页组件
如何在DataGrid控件中隐藏列

从ASP迁移至ASP+ --转换其他的页面


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 102 ::
收藏到网摘: n/a

  至于剩余的页面,我们依样画葫芦,使用ASP+ DataList或是Repeater控件。这样做是必要的,因为按设计要求需要定制的数据布局,而不是一个标准的表格显示。其中有个页面,classcatalog.aspx,有一处要求勾选值,然后根据选中的值,运行两个可能输出中的一个。该页就利用了Repeater控件,因此我们显示地创建了表格的行与列,而没有让控件来完成这一切。这是在templates的内部完成的。在ASP中,看起来是这样子的:

   '检查是否提供优惠

   If rsSessions("Special") = True Then

   '若本课程提供优惠,则输出“Special Offer!”

   Response.Write "< td valign=top align=center>" & vbCrLf

   Response.Write "< a href=""classdetail.asp?SessionID="

   Response.Write rsSessions("SessionID")

   Response.Write """name=""Click for more detail"">"

   Response.Write "Special Offer!"

   Response.Write "< /td>"

   Else

   '若本课程不提供优惠,则在栏中输出"--"

   Response.Write "< td valign=top align=center>--< /td>"

   End If

   为了在ASP+中达到同样的效果,我们使用了一个函数。在脚本块中,位于Page_Load 事件下,我们创建以下代码:

   Function CheckSpecial(ByRef blnSpecial As Boolean, _

   ByRef intNumber As Integer) As String

   If blnSpecial = True Then

   CheckSpecial = "< a href=" & Chr(34) & _

   "classdetail.aspx?SessionID=" & _

   intNumber & Chr(34) & ">Special!!< /a>"

   Else

   CheckSpecial = "--"

   End If

   End Function

   然后只须从ASP+ Repeater中调用函数:

   < template name = "ItemTemplate">

   < tr>

   [ other data being displayed ]

   < td valign=top align=center>

   < %=CheckSpecial(Container.DataItem("Special"),

   Container.DataItem("Session_ID"))%>

   < /td>

   < /tr>

   < /template>

   Container指的是涉及我们的ASP+ Reapter控件的数据的父对象。通过调用Container.DataItem("Special")及Container.DataItem("Session_ID") ,将父对象(即ASP+ Repeater控件)中的列的值传递给了函数。