DW网页设计100例95：动态广告管理

• 关 键 词：
• dreamweaver
• asp.net
• express
• server
• update

• Fireworks网页设计入门教程（上）
• 网页设计基础:Div+CSS布局入门教程
• 网页设计配色应用实例剖析——绿色
• 网页设计配色应用实例剖析——蓝色
• 国外一组精美网页设计欣赏
• Fireworks 网页设计综合实例(上)
• 网页设计配色应用实例剖析——橙色
• 成长 从菜鸟到准网页设计师的历程
• 网页设计配色应用实例剖析——紫色
• 网页设计配色应用实例剖析——红色

（ 6 ）添加数据集“ ADData ”。在【服务器行为】面板中添加数据集“ ADData ”，该数据集的设置如图 95-13 所示。

（ 7 ）调整 【插入记录】服务器行为的源代码。 切换到代码视图，找到该【插入记录】服务器行为的源代码，设置其 ID 为“ ADinsert ”，如图 95-14 中圆角方框①所示。删除图 95-14 中圆角方框②、③所示的代码，将图 95-14 中圆角方框④所示的值由“ true ”改为“ false ”。

（ 8 ）修改“ Page_Load ”过程，修改后该过程的源代码如下所述。

Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)

If Session("strFilename") <> Nothing Then

Dim strADAddr As string

strADAddr="adimages/" + Session("strFilename")

Session("strFilename")=Nothing

ADinsert.CommandText = "INSERT INTO Ad (ADLinkr, ADName, mostgree, Probaly,ADAddr) VALUES ('" + Request.Form("ADLinkr") + "' ,'" + Request.Form("ADName") + "'," + Request.Form("mostgree") + ", " + Request.Form("Probaly") + ",'" + strADAddr+ "')"

ADinsert.SuccessURL = "admin.aspx?ADAddr="+strADAddr

ADinsert.Debug = True

End If

End Sub

（读者可打开【光盘】｜【源文件】｜【实例 95 】｜【 95.3.txt 】文件，直接复制）

点击查看大图

程序说明：

该过程主要是重新定义“ ADinsert ”插入记录服务器行为的“ SQL ”命令，执行成功后再次打开“ "admin.aspx ”页面，并将广告图片上传到网站上的地址“ strADAddr ”传递给 URL 参数“ ADAddr ”。

（ 9 ）找到【预览】按钮的源代码，设置其“ disable ”属性（设置按钮是否有效），在其代码中插入代码 <% =iif((ADData.RecordCount>0),"","disabled='disabled'") %> ，结果如图 95-15 中圆角方框所示。请保留地址 http://www.qqread.com/dreamweaver/2006/05/q608113022.html 更多内容请看网络管理实用手册专题，或进入讨论组讨论。

【深 度 阅 读】 相 关 文 章

• 2006年度50个的经典的基于CSS的网页设计
• 网页设计配色应用实例剖析——黑色系
• DW网页设计100例82：产品展示厅
• 网页设计中HTML常犯的五个错误