- 1PS提示：因为图层已锁定，无法编辑图层的处理方法
- 2Adobe Illustrator CS5 序列号大全
- 3picacg苹果版怎么找不到|picacg ios版是不是下架了介绍
- 4ACDsee注册码免费分享（含ACDsee18、ACDsee10等版本）
- 5苹果iphone自动时间不准确的多种校正方法
- 6PDF浏览器能看3D文件吗？PDF浏览器看3D文件图文详细教程
- 7Potato(马铃薯聊天)怎么注册不了|Potato不能注册处理方法介绍
- 8Potato(土豆聊天)怎么换头像|Potato app更改头像方法介绍
- 9ipad版office如何激活? office365激活的图文说明教程
- 10最新的Adobe Illustrator CS4序列号大全
- 11Mac怎么通过设置VPN来登录youtube等国外网站
- 12qq邮件是否已读怎么看 QQ邮箱已经发出去的邮件怎么知道对方是否已经查看
[摘要]我们知道，一般的关系数据库（如SQL Server、Oracle、Access等）中的查询操作是支持集合操作的，例如可以用“Update ATable Set Field1 = AValue where Field2 in (Value21,Value22)”来完成对数据库的成批更新操作。我们可以...
我们知道，一般的关系数据库（如SQL Server、Oracle、Access等）中的查询操作是支持集合操作的，例如可以用“Update ATable Set Field1 = AValue where Field2 in (Value21,Value22)”来完成对数据
库的成批更新操作。我们可以充分利用数据库的这种集合特性来提高ＡＳＰ页面操作数据库的效率。如我们
可以在页面上列出多个记录，让用户选择要操作的记录，然后在用户确定操作后进行成批操作，这与一个记
录操作一次的方法相比效率明显要高的多了。
一、ＨＴＭＬ的集合属性
首先，让我们来熟悉一下ＨＴＭＬ的集合属性。在表单（FORM）数据或查询（Query）参数中，当
提交的多个参数采用同一个名称时，这些参数值将构成一个集合，在ＡＳＰ页面可以获取这些参数值或
同名参数的个数。如在下面的页面（Set.HTM）中，６个复选框采用同一个参数名MyCheckBox，其值分别
为1、2、3、4、5、6。
<!-- Set.HTM -->
<html><head><title>集合属性应用</title></head><body>
<p>请选择要操作的项目，提交数据后，将会显示您选择的项目。
<form method="POST" action="set.asp">
<br>1、<input type="checkbox" name="MyCheckBox" value="1">
<br>2、<input type="checkbox" name="MyCheckBox" value="2">
<br>3、<input type="checkbox" name="MyCheckBox" value="3">
<br>4、<input type="checkbox" name="MyCheckBox" value="4">
<br>5、<input type="checkbox" name="MyCheckBox" value="5">
<br>6、<input type="checkbox" name="MyCheckBox" value="6">
<br><input type="submit" value="提交数据" name="B1">
</form></body></html>
当客户端选择了要显示的项目后，下面的ＡＳＰ页面(Set.ASP)给出客户端选择的项目个数及其值。
<!-- Set.ASP -->
<%@ LANGUAGE = VBScript %>
<html><head><title>集合操作测试</title></head>
<body>
<%
Response.Write "<br>您一共选择了"&request("MyCheckBox").count&"项，"
Response.Write "<br>您选择的项目有："&request("MyCheckBox")
%>
</body></html>
如当客户端选择了第二、三、五项并提交数据后，将会看到如下结果：
您一共选择了3项，
您选择的项目有：2, 3, 5
应该注意到，“2, 3, 5”的形式与ＳＱＬ语句要求的形式是一致的，我们可以直接或间接地利用这种
形式的结果，如 "Select * from ATable where AFiled in(" & request("MyCheckBox") & ")"的实际
ＳＱＬ查询语句为“Select * from ATable where AFiled in(2, 3, 5)”。
二、ＨＴＭＬ的集合属性的应用
下面我们结合一个实际的例子，讨论一下如何在ＡＳＰ页面中利用ＨＴＭＬ的集合属性来成批操作
数据库。现在我们有一个记录客户电子信箱的ＡＣＣＥＳＳ数据库EMail，其中有一个数据表EmailList，
包含CustomerId、CustomerName、CustomerEmail三个字段，分别表示客户编号、客户名称、客户电子信箱。
在ＡＳＰ页面SelectId.ASP中，我们采用CheckBox列出所有客户的客户名称（各个CheckBox的值为对应的
客户编号），让用户选择给哪些客户发送电子邮件。当用户选择了客户并提交数据后，SendMail.ASP将检
索到这些客户的电子信箱，并给这些客户发送电子邮件。具体的信息请参见下面ＡＳＰ程序代码和注释信息。
<!-- SelectId.ASP：列出所有客户的客户名称 -->
<html><head><title>所有客户的客户名称</title></head><body>
<p align=center><font style="font-family:宋体;font-size:9pt">
请选择要给哪些客户发送“新年问候”的电子邮件
<form method="POST" action="SendMail.asp">
<%'建立与ACCESS数据库的连接
Set dbConnection = Server.CreateObject("ADODB.Connection")
dbConnection.open "Driver={Microsoft Access Driver (*.mdb)};"&_
"DBQ=C:\inetpub\wwwroot\test\Email.mdb"
'获取所有客户的客户编号、客户名称
Set rsCustomers = Server.CreateObject("ADODB.RecordSet")
rsCustomers.Open "Select CustomerId,CustomerName,CustomerEmail From EmailList",_
dbConnection,1,3,1
'显示所有客户的客户名称
while not rsCustomers.eof
%>
<br><input type="checkbox" name="CustomerId" value="<%=rsCustomers("CustomerId")%>">
<a href="mailto:<%=rsCustomers("CustomerEmail")%>">
<%=rsCustomers("CustomerName")%></a>
<%rsCustomers.MoveNext
wend
rsCustomers.close
set rsCustomers = nothing
dbConnection.close
set dbConnection = nothing
%>
<br><input type="submit" value="给客户发送电子邮件" name="B1"
style="font-family:宋体;font-size:9pt">
</form></body></html>
<!-- SendMail.ASP：给所选择客户发电子邮件 -->
<html><head><title>给所选择客户发电子邮件</title></head><body>
<p align=center><font style="font-family:宋体;font-size:9pt">
正在给下面客户发送电子邮件
<%'建立与ACCESS数据库的连接
Set dbConnection = Server.CreateObject("ADODB.Connection")
dbConnection.open "Driver={Microsoft Access Driver (*.mdb)};"&_
"DBQ=C:\inetpub\wwwroot\test\Email.mdb"
'获取所选择客户的电子信箱
Set rsCustomers = Server.CreateObject("ADODB.RecordSet")
rsCustomers.Open "Select CustomerName,CustomerEmail From EmailList where CustomerId in ("&_
Request("CustomerId")&")",dbConnection,1,3,1
while not rsCustomers.eof
'给一个客户发电子邮件
Set myMail = CreateObject("CDONTS.NewMail")
myMail.From = "sales@test.com"
myMail.value("Reply-To") = "sales@test.com"
myMail.To = rsCustomers("CustomerEmail")
myMail.Subject = "来自王发军的新年问候"
myMail.BodyFormat = 1
myMail.MailFormat = 1
myMail.Body = "王发军向"&rsCustomers("CustomerName")&"问好！"
myMail.Send
Set myMail = Nothing
%>
<br>给<a href="mailto:<%=rsCustomers("CustomerEmail")%>"><%=rsCustomers("CustomerName")%></a>
发送电子邮件成功！
<%
rsCustomers.MoveNext
wend
rsCustomers.close
set rsCustomers = nothing
dbConnection.close
set dbConnection = nothing
%>
<br>在所选择的客户发送电子邮件完毕！
</body></html>
以上程序在WINNT4.0+IIS4.0+ASP2.0+Access97下调试通过。
推荐资讯 总人气榜
最新教程 本月人气
- 1PHP 与 XML: 使用expat函数(一)
- 2VB6如何让程序开机就自动打开
- 3ADO 事件模型
- 4tomcat下中文的完全处理
- 5用PHP动态生成虚拟现实VRML页面
- 6顺序求出c(n,r)的排列组合
- 7tomcat设置技巧(转载)
- 8如何完成大小写完全匹配的查询
- 9其他技巧
- 10用delphi大局部导入某子目录下所有JPG图片文件到数据库
- 11我在使用C#中Treeview与解析XML遇到的问题
- 12ADO如何创建更改删除表
- 1联想黄金斗士s8预约图文说明教程(附联想s8预约网址)
- 2陌陌群聊如何@别人？陌陌群聊@别人方法_绿茶安卓网
- 33星s4手势感应如何用？3星Galaxy s4手势感应视频图文说明教程
- 4lumia920 Amber更新新增技巧演示视频
- 5用php写类似microsoft的挖地雷游戏
- 6我对XSL的理解
- 7用C#写vs插件中的一些Tip
- 8陌陌谁是卧底如何玩？陌陌谁是卧底玩法_绿茶安卓网
- 9vivo xshot设置如何？步步高vivo xshot设置参数
- 10nubia x6 mini设置如何？中兴nubia x6 mini设置参数
- 11nubia x6 mini价格多少钱？中兴nubia x6 mini价格
- 12nubia x6电信版什么时候上市？中兴nubia x6电信版上市时间
