asp环境下邮件列表功能的实现（三）
它必须被认证之前访问管理页面，在这个实现中，我们使用图3为管理员输入身份识别码显示的secure.htm页面，如果用户输入的是不是空的，我们使用cookies来保存它。对页面执行行政任务了，当用户试图访问这个页面，下面的代码将检查cookie和用户识别码（这里是123456），如匹配用户的失败是重定向到输入识别码secure.htm页。U3000
strpw1 =请求。形式（txtpw ）
如果strpw1 然后
响应。饼干（密码）= strpw1
最后if'strpw1
strpw2 =请求。饼干（密码）
如果strpw2 123456
响应。重定向（安全）
最后if'strpw2 123456
%>
一旦管理员的认证通过，操作，他们可以通过执行包括了：
查看来宾表中的所有记录。
编辑或
删除指定记录
将邮件发送到邮件列表中的所有用户
管理页面了如图4所示。当显示客人表的记录，这些记录，首先提取，然后用每个…下结构遍历记录集的字段集合的集合，提取的字段名称和设置表格标题。在这一页，我们不再显示guest_id领域，但每个用户记录中有一个链接，删除在每个用户记录前编辑功能。用户名字段和邮件领域guest_name guest_email转换为超链接，并点击名字可以发送邮件到用户。要格式化的其他领域包括发送邮件（mail_list）和用户信息（guest_comment）。生成标题代码：
从记录的选择
strsql_select =选择guests.guest_id客人。guest_email_
guests.guest_name客人。mail_list，_
guests.guest_comment，客人。sign_date_
从客人点菜的客人。guest_name；
集oconn = server.createobject（数据连接）
OConn打开strdsnpath。
集rsgbook = oconn执行（strsql_select）。
如果rsgbook.bof =真实rsgbook.eof =真
…空暗示，略…
其他的
rsgbook.movefirst
%>
U3000
U3000
U3000
如果头。名称=guest_id然后%>
…删除和编辑的头部，有点…
U3000
U3000
U3000
案例guest_name
响应。写name
案例mail_list
答复：写邮件列表
案例guest_comment
响应。写入消息
最后选择
%>
U3000
U3000
二%>
U3000
为了在表的其余部分显示用户注册记录，我们使用两个嵌套循环遍历所有记录的所有字段，即为每个记录嵌入一个字段…下一个循环在do…循环。数据的格式被放置在每个…下一个循环。事实上，现代代码类，例如：
U3000
U3000
U3000
如果领域。名称=guest_id然后%>
U3000
…稍微删除链接的功能…
U3000
U3000
…稍微编辑链接的功能…
U3000
U3000
U3000
U3000
响应。写
其他的
如果领域。名称=guest_name
响应，写入…The mailto link of the name of the user, a little...
领域。名称=mail_list
…输出是是或否。
领域。名称=guest_comment
…输出用户消息，稍微…
最后if' field.name
最后if'isnull（场）%>
U3000
U3000
下一个
rsgbook。MoveNext %>
U3000
U3000
U3000
现在我们在form.edit_record.asp和delete_record.asp显示的记录可以通过点击表中的图形链接访问，和这两个文件提供编辑和删除功能，分别记录。首先，让我们看看删除功能的实现：
U3000
iguestid =请求。Querystring（ID）
如果iguestid 然后
从删除ID标识的记录中删除
strsql_delete =删除从客人_
在guest_id =iguestid
集oconn = server.createobject（数据连接）
OConn打开strdsnpath。
下次继续出错
OConn，执行strsql_delete
接近OConn。
集oconn =没有
如果err.number 0
响应。重定向（行政asperror_del =真）
其他的
响应。重定向（行政asperror_del =假）
最后如果
其他的
响应。重定向（）
最后if'iguestid
%>
上面的代码是在unsubscribe.asp代码非常相似，而事实上，这两个任务是非常相似的。这里的ID是必要的，以确定需要删除的记录。实际删除任务被删除SQL命令行。
该代码用于更新记录页面edit_record.asp是稍微复杂一点的，其界面如图5所示。在这里，我们需要使用SQL语句的SQL选择语句：先选择需要编辑的记录；第二SQL UPDATE语句保存编辑的编辑的结果。我们在这里不再是实施过程中的具体分析，请参阅代码和本文所附的注释。