繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 从ASP迁移至ASP+ --转换其他的页面
- ASP
- ASP系列讲座（十）ASP 内建对象
- ASP系列讲座（十一）ActiveX 组件
- ASP系列讲座（十二）向浏览器发送内容
- ASP系列讲座（十三）向浏览器传送脚本
- ASP系列讲座（十四）包含文件
- ASP系列讲座（十五）使用 HTML 表格
- ASP系列讲座（十六）访问数据库
- ASP系列讲座（十七）调试 ASP 脚本
- ASP系列讲座（十八）管理应用程序
- ASP系列讲座（十九）管理会话
- ASP系列讲座（二十）维护 ASP 应用程序的安全
- ASP系列讲座（二十一）创建事务性脚本
- ASP系列讲座（二十二）使用国际站点
- ASP系列讲座（二十三）编写跨平台应用程序
- 利 用 ISAPI 实 现 向 数 据 库 中 添 加 记 录 （一）
- 利 用 ISAPI 实 现 向 数 据 库 中 添 加 记 录 （二）
- 利 用 ISAPI 实 现 向 数 据 库 中 添 加 记 录 （三）
- 利 用 ISAPI 实 现 向 数 据 库 中 添 加 记 录 （四）
- 利 用 ISAPI 实 现 向 数 据 库 中 添 加 记 录 （五）
- 利 用 ISAPI 实 现 向 数 据 库 中 添 加 记 录 （六）
从ASP迁移至ASP+ --转换其他的页面
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 45 ::
收藏到网摘: n/a
'检查是否提供优惠
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控件）中的列的值传递给了函数。
评论 (0) All
