电话留言脚本

‘壹’ vb制作网站自动留言

这个用VBS脚本语言写的跟方便，代码如下，将其复制到记事本，另存为***.vbs就可以了，我用的是世界之窗浏览器，你的不是需要改一下，点击右键编辑就可以，打开要留言的网页，将任务栏的名称输到引号里就行，运行时先打开要留言的网页，不要最大化，再双击运行
Set objShell = CreateObject("Wscript.Shell")
set WshShell = CreateObject("WScript.Shell")
WshShell.AppActivate "输入留言 - 世界之窗"
WshShell.SendKeys "{TAB}" '模拟按下 tab 键切换焦点
WScript.Sleep 100 '延时0.3秒
WshShell.SendKeys "{TAB}" '模拟按下tab 键切换焦点
WScript.Sleep 100
WshShell.SendKeys "d" '模拟按下d
WScript.Sleep 100
WshShell.SendKeys "e" '模拟按下e
WScript.Sleep 100
WshShell.SendKeys "a" '模拟按a
WScript.Sleep 100
WshShell.SendKeys "r" '模拟按r
WScript.Sleep 100
WshShell.SendKeys "{TAB}" '模拟按下tab 键切换焦点
WScript.Sleep 100
WshShell.SendKeys "h" '模拟按下h
WScript.Sleep 100
WshShell.SendKeys "o" '模拟按下o
WScript.Sleep 100
WshShell.SendKeys "l" '模拟按下l
WScript.Sleep 100
WshShell.SendKeys "l" '模拟按下l
WScript.Sleep 100
WshShell.SendKeys "e" '模拟按下e
WScript.Sleep 100
WshShell.SendKeys "y" '模拟按下y
WScript.Sleep 100
WshShell.SendKeys "{TAB}" '模拟按下tab 键切换焦点
WScript.Sleep 100
WshShell.SendKeys "{ENTER}" '模拟按下回车键提交

‘贰’ 按键精灵自动喊话脚本如何写

a=1
For1//这For1是循环1次改成你想要的数字就行
KeyPress"Enter",1
Delay50
SayString"按键精灵自动喊话"&a
Delay100
KeyPress"Enter",1
Delay50
a=a+1
Next

‘叁’ html做一个简单的在线留言

单纯的html是不能处理这个的，
必须要搭配动态脚本语言等。才能进行文件操作。
你可以将留言的内容等信息传递到动态页面，进行后台处理。

‘肆’ 留言本如何制作

留言本应该说是一个比较简单的功能模块的

首页先你要分析一下留言需要哪些字段（常见就是标题和内容），继而就设计数据库的；

其次就是程序设计，无论那种脚本语言来编写。基本就是别人留言（插入操作），后台进行管理（回复、删除、修改等操作）；

最后呢，可以进行一些细节的完善；一些关键词的过滤。还有就是签发功能，就是后台签发了，前台才能显示的等等。希望对你有作用。

‘伍’ 留言板有组件怎么做的

留言板需要配合服务器端脚本和数据库端写，这个光有客户端的前端页面是不行的。打个比方说，你的页面地址是不变的，如果你不做后台页面的话，只有前端那你输入再多的留言内容等你下一次再打开这个页面不是又回到你设计的前端初始页面了吗（这个叫静态页面）。留言的显示内容是会随着留言的增加而改变，它是把你输入的数据存储到数据库里面，通过后台脚本调用到前端进行显示的。这个不需要什么组件，用php+mysql配合前端就可以做了

‘陆’ 脚本怎么写 范文大全

脚本的写法：

这里的脚本主要是各类编程脚本，包括按键精灵脚本、python脚本、js脚本、易语言脚本等等。

1、首先你要确定你所谓的脚本是那种类型的脚本，根据你的使用目的决定，例如你要用脚本实现自动化操作，例如在抖音上自动给目标用户留言重复操作等等，你需要用按键精灵脚本，你需要用爬虫采集某个网站的数据，你需要用python脚本。

‘柒’ 电话销售的过程应该怎么说

〔主题一〕：电话行销的必备信念 一般销售员对电话行销的误解是：电话是为了预期客户面对面会谈的代理者的观念。然而在顶尖的推销员眼中，电话线那头生疏的声音，是不能与有效的面对面的表现相比较的。下面是一些非常有效的电话行销信念。拥有这些信念，你的电话行销一定会成功。 1)我一定要和任何跟我通电话、我确认要见面的、有趣的人会面；2)我所接听到的每一个电话都可能是一次宝贵的交易机会；3)我所拨出的每一通电话，都可能为客户；4)我的每一通电话不是要获得交流，而是为了获得与客户见面的机会。有机会你就默念它们，牢记它们，重复的次数越多，越能深入到你的潜意识中。 [主题二]：二、电话行销突破接待人员的八个策略 我们的销售人员在电话行销中遭受到接待人员阻拦而得到的挫折太大了。接待人员总是挡在我们和决策者进行实质接触的大门之外。在这里提供你一些诀窍，让你利用人性和心理学，增加突破的机会，获得见面的机会。你还可以选择你个人风格的方法，或者根据对方的反映随机应变。 1)克服你的内心障碍；--不妨了解你为什么对于没法突破接电话的人，会觉得心理很惶恐：是否因为过去的经验造成的心理障碍；必须突破这种心理障碍；是否从小就被教导：跟陌生人通电话要客气。否觉得买方公司是你的衣食父母，你不敢轻易冒犯。你是否站在接电话的人的角度思考，想象他将如何拒绝你。如果你这样想，就变成了两个人在拒绝你。 2)注意你的语气--好象是打给好朋友；--早安，请问张先生在吗？不要说：我是xx要说出公司的名称。不要说我是xx的xx人，如果接电话的人说出他自己的名字，就说：嗨，李小姐，请问张先生在吗？ 3)将接待人员变成你的朋友；--你以平常的开场白说：早安！我是xx，我想跟张先生谈谈，请问您尊姓大名？接电话的人说：我是他的秘书，李小姐。你说：假如你是我，而你必须跟张先生谈谈，你要怎么办呢？ 4)避免直接回答对方的盘问；--接电话的人通常会盘问你三个问题：你是水？你是哪家公司？有什么事情？如果你不直接回答这些问题，他们就不知道该怎么办。你或许该这样回答：我很想告诉你，但是这件事情很重要，我必须直接跟他说。我也不确定。你觉得这会讲很久吗？我是打长途电话呢！喂喂，你那边在下雨吗？ 5)使出怪招，迂回前进；让接电话的人措手不及，不要让自己听起来就象推销员，要使出些怪招让对方失去戒心。--例如：对方：这是某某公司，您好！你：嗨！张先生在吗？对方：请问你是哪家公司？你：我也不知道，所以我才打电话找她。对方：你要推销什么？你很迷惑地说：我实在搞不懂。对方提高声音再问一次：你要推销什么吗？你还是很迷惑地说：有没有可能是李勇要卖东西给我？ 6)摆高姿态，强渡难关。--你跟陌生人讲电话都是这样的吗？你老板交代你要这样吗？你帮我转电话之前，还想知道关于我个人什么事？你为什么不让我跟你的老板说话？你不转这通电话,公司将会因此而失去赚钱的机会，你愿意冒这个风险吗？既然你不愿意接电话，能不能告诉我你的名字？如果贵公司还有人打电话来询问，我就可以告诉他，我曾经跟谁谈过了。 7)别把你的名字跟电话号码留给接电话的人。如果买方不在或是没空，再找机会试试。--如果你是我，你会再打电话来吗？我想我再打电话过来，什么时间比较恰当？ 8)对于语音信箱；--如果是语音信箱，通常不必留下任何讯息。不过要仔细听他的声音，想象以后如何沟通比较好。如果在语音信箱留话，务必令人印象深刻。你可以这么说：有三个理由你一定要打电话给我。将这通留言消去，并不能消去你的问题。将这通留言消去，你可能付出很高的代价，你愿意冒这个风险吗？你还可以，先留下你的名字和电话号码，然后在重要事项讲一半时切断电话，好象是电话线突然中断一样。 [主题三]：有效的电话约访 1)电话约访的要领－－电话约访的重要性：提高工作效率、节省时间、电话约访的物件（陌生人、朋友、朋友介绍）、名单种类（公会亲友活动杂志社团协会邻居同学录名片交换月刊电话本以前同事报纸推荐名单熟识）； 2)电话约访的原则：“热”、“赞”、“精”、“稳”——（热情，赞美，精简，稳重，喜悦，肯定）约访不代表说明，仅是约见面时间，地点即可；——（简短有力、不要超过3分钟）约访（内容）7%、腔调、语气、情感38%、肢体动作55%用电话脚本：好处—工作时可100%投入，不会离题； 3)电话约访前的暖身运动－－做生理暖身运动自我确认词句—马上行动、我爱我自己；心理预演—上次成功的感觉；注意表情—注意脸部表情及肢体动作，想着上一次成功的感觉；不被干扰—请别人代接电话打电话工具—镜子、名单（100）、脚本、笔、白纸、行程表、访谈记录； 4)重点要领－－简短有力、创意性、吸引力开场白；热、赞、精、稳—热情、真诚、兴奋、信心、专业、轻松；三分钟原则—不要在电话谈训练，记录谈话内容；三不谈—产品、自己、公司；三要谈—提升获利率、相关行业、家庭亲密度引起对方好奇—兴趣、幽默一笑；名中脚本之要领—完全陌生、缘故、推荐名单，熟识。。。等脚本；确定时间、地点—见面时间、地点、再次敲定确认；高潮结束—给对方的期待例：见了面，相信你一定会非常高兴的！约访中的赞美—这时赞美，但求真心真诚自然约到人后，欢呼一下，保持心情，继续邀约、记录重点—客户资料、约定时间及地点、约接电话的人也可以一口气打五十通电话、何访约来公司洽谈 5)忌讳--不可用不真实语欺骗顾客、言词不可夸张膨胀或过度赞美、绝不批评同行。信念的力量告诉你。你不会得到你所要的，你只会得到你所相信的 [主题四]：有效的电话约访脚本 电话接听要领：xx你好，敝姓○～很高兴为您服务～哦！是的，他在，请问您贵姓？?先生，请您稍等一下。～如询问事项：?先生（小姐）请问您贵姓？哦！?先生（小姐）请您稍等一下，我帮您转给△△为您服务，请稍等。先生（小姐）很抱歉，他不在位子上，可能4点会回来。哦！?先生（小姐）您要不要留个电话，或者我可以协助您吗？好的，麻烦您再打电话过来，祝福您请详填来电者姓名、受电者姓名，重要留言及留言日期及时间。简单的话直接代为回答。 1)管理阶层：老板、主管篇－－管理阶层：老板、主管篇中华培训网：您好，请接△△△，麻烦您谢谢！ 老板：请问有什么事吗？中华培训网：我有重要的事请教他，我姓，麻烦您了，谢谢老板：请稍待中华培训网：您好，我这里是中华培训网，我姓?，是这样的，我们是专业在提升业绩和工作绩效的训练机构，希望和您约个时间约20分钟，分享其他客户使用我们的服务后的有效成果，您明天或后天，哪天比较有空？（若有同行第三者证言则更佳）。 2)企业开发篇－－喂，请问您是△先生（小姐）吗？您好，我是中华培训网的，我姓?，我们公司是在代理提升获利率的最新knowhow管理决策研习系统的机构，我们提供一套，改进销售方案的训练课程，不少公司像甲骨文、abb公司都在采用，使他们的业绩有大幅度的提升。（若有其他同行第三者有力证言更佳）您有兴趣了解这个使您业绩可能提高20%--30%的方法？很好，我想，我们可以找个时间碰个面，当面研究研究，我大概要20分钟就够了我想或（时间）哪一个时间，您觉得比较方便？很好，那我将在（时间），到贵公司拜访您。请问您的地址是在：，是楼吗？很好，我们就约定（时间）在（地址）见，很高兴与您交谈，谢谢，再见。 3)秘书篇——穿针引线、通过秘书、不是会谈、邀约决策者－－请找△△△，麻烦您谢谢 我是中华培训网的，我有很重要的事要跟△△△谈，能不能帮我一个忙，麻烦您谢谢！( 麻烦您谢谢先生（小姐）您贵姓，从您的声音感觉您是一位很热心的人！我是中华培训网的△，麻烦您，谢谢 我姓△，麻烦您谢谢，

求采纳

‘捌’ 给一个asp留言板制作教程

一、安装与调试常听朋友感叹ASP程序难学不易懂，不过我起初学习这门技术的时候也有过这样的感悟。从今天开始，我将以我学ASP的经验来做一个简单的ASP留言本，这个留言本用了Access数据库，所以务必请大家要跟我一起做的朋友都安装好Office软件，相信各位自己的电脑上都有了。好了，开始。

创建ASP的运行环境（安装IIS）

IIS(Internet Information Service)是构建ASP站点所必须的，所以，我们应该先确认自己的电脑已安装了IIS信息服务，如果没有安装好的话，请按以下步骤：

1、打开“控制面板”

2、双击“添加/删除程序”

3、单击“添加/删除Windows组件”，打开添加/删除Windows组件对话框：

3、从下拉的列表中选择“Internet 信息服务(IIS)”单击“下一步”：

4、出现组件安装进度窗口，如弹出需要安装盘的话，放入Windows2000安装盘，按提示操作即可。直至最后安装完毕。

---------------------------------------------------------------------------------------------------------

二、设计数据库

ASP程序本身并不能储存数据，众所周知，留言本有以下信息需要保存：留言者姓名、联系方式、留言内容等等。因为ASP并不能储存数据，所以数据库在这种环境之下就产生了。数据库的种类也很多，针对不同的程序也有适用于它的数据库，比如Access和Ms SQL就比较适用ASP和ASP.net程序，至于其它的数据库和程序，就不属于本文所讨论的问题了，有兴趣的朋友可以查看其它一些资料。

那么既然Access和MS SQL都适用ASP，那么具体又如何来选择呢？我们可以打一个比方：比如钉一枚小钉子，聪明的人一定不会用一个大的棒槌，而是选择小的铁锤，虽然用大的棒槌也一样的可以把钉子钉进去，可是没有人愿意这样做。

数据库也一样：Access比较适用小型的应用，而MS SQL则适用于大中型的数据库应用，所以要做一个留言本，理所当然是选择Access更好一些，但是如果你决心使用MS，没有人会极力阻止你。好了，废话少说，切入正题，下面开始创建数据库。

Access是微软office办公软件中的其中一个，默认的安装Office是有这个Access的，好了，打开程序，开始了,GO!

进入实战了。打开程序后，出现一个对话框，这里我们选择第一个选项”空Access数据库”点击确定，弹出一个新建数据库的文件框，选择你上次你建的站点目录，起个data的文件名，点击创建，OK! 双击”使用设计器创建表”打开表创建窗口”如图

创建表的结构如下表：

字段名称
数据类型
备注(笔者注释)

id 自动编号 设置“自动编号”
name 文本 留言者姓名
qq 数字 留言者的QQ，因为QQ号是由数字组成
email 文本 留言者的电子邮件
content 备注 留言内容
data 日期/时间 留言时间，设定默认值为Now()

数据库设计好了以后，可以直接在数据库里添加两条记录，以后测试时候用！这一节就到此了

-------------------------------------------------------------------------------------------------

三、连接数据库

在上一节，我们已经为我们的程序创建了一个数据库，在这一节中，我们来用ASP把程序和数据库连接起来，以后就可以连接到数据库、在ASP中显示数据库中的数据以及更复杂的插入、修改和删除。
一起看以下代码，这就是ASP程序中常用的连接数据库的代码：
<%
set conn=server.createobject("adodb.connection")
c&server.mappath("data.mdb")
conn.open connstr
%>

解释一下以上代码：
<% '这是ASP程序的起始
set conn=server.createobject("adodb.connection") '在服务器上创建了一个连接数据库的对象
c&server.mappath("data.mdb") '告诉ASP数据库的接接方法以及路径
conn.open connstr '创建了对象后就用来打开数据库进行连接
%> '一切OK了!结束ASP程序

将上面的代码另存为conn.asp文件，放在服务器目录下面就可以了。怎么样，简单吧？
这一节是最重要的，一定要弄明白，否则以后操作数据库将变得不现实，如果有不懂的问题，欢迎和我讨论，我的电子邮件地址是。这一节就到此，下节我们就将数据库中的数据显示在页面中（这就实现了留言本的查看功能）

---------------------------------------------------------------------------------------------

四、制作留言本首页

前面我们已经连接好了数据库，就要让它在这里发挥一下作用了，这一节将讲述如何将数据库里的数据用ASP读取出来，在页面中显示出来，这样就等于是查看留言本了。

利用DW制作首页面（这里我就不讲如何去做这个页面了，最后我将会给出HTML代码下载）

将制作好的文件存为index.asp，下面就创建数据记录集，用来显示数据库的数据到这个页面中：

用记事本打开index.asp，在页头加入以下代码：

<%@LANGUAGE="VBScript" codepage="936"%>
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select user,qq,email,content,data from main order by id desc"
rs.open sql,conn,1,1
%>

解释一下：

第一行，表明ASP使用的是VB脚本
第二行，是用include包含文件，这里包含的是数据库连接文件。
第三行，ASP程序开始
第四行，利用Server内置对象创建一个记录集
第五行, SQL语句，这里的意思是选择数据库中的user,qq,email,content,data字段，指定该数据表的名称是“main”数据 的排列顺序是倒序。
第六行，用刚才创建的名为rs的记录集打开数据库，设置属性为只读（1,1为只读数据,1,3为插入数据，2,3是修改数据。

这样就打开了数据库，接下来就可以显示了。

将“留言人”代替为“<%=rs("user")%>
“时间”代替为“<%=rs("data")%>
“留言内容在此”代替为“<%=rs("content")%>
“QQ”链接到 http://search.tencent.com/cgi-bin/friend/user_show_info?ln=<;;%=rs("qq")%>
“邮件”链接到：mailto:<%=rs("email")%>
最后将“填写留言”链接 add.asp “管理留言”链接 admin.asp

好了，再次保存，浏览看看！

怎么了？只显示一条记录？原来我们在数据库里添加了两条记录的哦！还有一条呢？别急，因为我们没有指定ASP循环显示，所以就只有一条啦。。。

在刚才的代码后面添加一行

<%do while not rs.eof%>

并在页面的第一个表格的末尾加上

<%
rs.movenext
loop
%>

上面的代码就是说用rs记录集指针一条一条往下一条移动，直到末尾，loop是循环的意思。。哈哈，再次浏览这个文件

看明白了吗，这样就可以让数据库中的数据全部显示在页面中了，好了，这节就到这，下节讲一个也很重要的部份（添加留言功能。)

--------------------------------------------------------------------------------------------------

五、制作添加留言页面，实现留言功能

我们是做的一个留言本，实现留言的功能就十分重要了，要不然就算不上留言本了，接下来就一起来实现这个功能。
用DW制作以下这样的页面：

设置表单的属性如下：

姓名：设置为单行文本域，名称为“user”
QQ号：设置为单行文本域，名称为“qq”
邮件：设置为单行文本域，名称为“email”
内容：设置为多行文本域，名称为“content”
最后将表单的“Action”动作指向addsave.asp就可以了。

保存文档名为add.asp，OK！下一步！

表单是做好了，但是还需要后台程序的支持，一起来使用ASP编写一个添加留言处理程序，添加留言代码：

<%@LANGUAGE="VBScript" codepage="936"%> '表明ASP使用的是VB脚本
<!--#include file="conn.asp"--> '是用include包含文件，这里包含的是数据库连接文件
<%
set rs=server.createobject("adodb.recordset") '利用Server内置对象创建一个记录集
sql="select user,qq,email,content,data from main" 'SQL语句，上节有详解
rs.open sql,conn,1,3 '用刚才创建的名为rs的记录集打开数据库，设置属性为插入数据
rs.addnew '用记录集新添加一条数据
user=request.form("user") '请求表单的变量，定义变量为user，这里request.form是请求表单的意思
qq=request.form("qq") '请求表单的变量，定义变量为qq，这里request.form是请求表单的意思
email=request.form("email") '请求表单的变量，定义变量为email，这里request.form是请求表单的意思
content=request.form("content") '请求表单的变量，定义变量为content，这里request.form是请求表单的意思
rs("user")=user '将请求到的表单值传向记录集中代表user字段的名称
rs("qq")=qq '将请求到的表单值传向记录集中代表qq字段的名称
rs("email")=email '将请求到的表单值传向记录集中代表email字段的名称
rs("content")=content '将请求到的表单值传向记录集中代表content字段的名称
rs.update '更新一下数据库中的数据。
rs.close '关闭记录集
set rs=nothing '销毁记录集
conn.close '关闭数据库连接
set rs=nothing '销毁数据库连接
%>

将以上文件存为addsave.asp，测试下！咦？怎么填好提交以后就出现空白了，为什么？这是因为在addsave.asp中没有设置数据成功提交好后的转向页面，这里不用做那么复杂的，只要做一个刷新页面就行了，在程序的后面加上：

<meta http-equiv="refresh" c>

然后在页面中添加提示信息，比如：“您的留言已经成功提交，2秒钟后将自动返回留言本首页”

‘玖’ 如何在网站内制作动态留言板，请详解！

楼主可以去我的论坛看，里面有图片，看起来更方便些，下面这个留言本绝对可行的

http://bbs.polch.tf168.cn/mybbs/viewthread.asp?TopicID=224082&BoardID=103384&WebID=253977

一、安装与调试

常听朋友感叹ASP程序难学不易懂，不过我起初学习这门技术的时候也有过这样的感悟。从今天开始，我将以我学ASP的经验来做一个简单的ASP留言本，这个留言本用了Access数据库，所以务必请大家要跟我一起做的朋友都安装好Office软件，相信各位自己的电脑上都有了。好了，开始。

创建ASP的运行环境（安装IIS）

IIS(Internet Information Service)是构建ASP站点所必须的，所以，我们应该先确认自己的电脑已安装了IIS信息服务，如果没有安装好的话，请按以下步骤：

1、打开“控制面板”

2、双击“添加/删除程序”

3、单击“添加/删除Windows组件”，打开添加/删除Windows组件对话框：

3、从下拉的列表中选择“Internet 信息服务(IIS)”单击“下一步”：

4、出现组件安装进度窗口，如弹出需要安装盘的话，放入Windows2000安装盘，按提示操作即可。直至最后安装完毕。

二、设计数据库

ASP程序本身并不能储存数据，众所周知，留言本有以下信息需要保存：留言者姓名、联系方式、留言内容等等。因为ASP并不能储存数据，所以数据库在这种环境之下就产生了。数据库的种类也很多，针对不同的程序也有适用于它的数据库，比如Access和Ms SQL就比较适用ASP和ASP.net程序，至于其它的数据库和程序，就不属于本文所讨论的问题了，有兴趣的朋友可以查看其它一些资料。

那么既然Access和MS SQL都适用ASP，那么具体又如何来选择呢？我们可以打一个比方：比如钉一枚小钉子，聪明的人一定不会用一个大的棒槌，而是选择小的铁锤，虽然用大的棒槌也一样的可以把钉子钉进去，可是没有人愿意这样做。

数据库也一样：Access比较适用小型的应用，而MS SQL则适用于大中型的数据库应用，所以要做一个留言本，理所当然是选择Access更好一些，但是如果你决心使用MS，没有人会极力阻止你。好了，废话少说，切入正题，下面开始创建数据库。

Access是微软office办公软件中的其中一个，默认的安装Office是有这个Access的，好了，打开程序，开始了,GO!

进入实战了。打开程序后，出现一个对话框，这里我们选择第一个选项”空Access数据库”点击确定，弹出一个新建数据库的文件框，选择你上次你建的站点目录，起个data的文件名，点击创建，OK! 双击”使用设计器创建表”打开表创建窗口”如图

创建表的结构如下表：

字段名称 数据类型 备注(笔者注释)

id 自动编号 设置“自动编号”
user 文本 留言者姓名
qq 数字 留言者的QQ，因为QQ号是由数字组成
email 文本 留言者的电子邮件
content 备注 留言内容
data 日期/时间 留言时间，设定默认值为Now()

数据库设计好了以后，可以直接在数据库里添加两条记录，以后测试时候用！

三、连接数据库

在上一节，我们已经为我们的程序创建了一个数据库，在这一节中，我们来用ASP把程序和数据库连接起来，以后就可以连接到数据库、在ASP中显示数据库中的数据以及更复杂的插入、修改和删除。
一起看以下代码，这就是ASP程序中常用的连接数据库的代码：
<%
set conn=server.createobject("adodb.connection")
connstr="Provider=Microsoft.jet.oledb.4.0;data source="&server.mappath("data.mdb")
conn.open connstr
%>
解释一下以上代码：
<% 这是ASP程序的起始
set conn=server.createobject("adodb.connection") 在服务器上创建了一个连接数据库的对象
connstr="Provider=Microsoft.jet.oledb.4.0;data source="&server.mappath("data.mdb") 告诉ASP数据库的接接方法以及路径
conn.open connstr 创建了对象后就用来打开数据库进行连接
%> 一切OK了!结束ASP程序

将上面的代码另存为conn.asp文件，放在服务器目录下面就可以了。怎么样，简单吧？

四、制作留言本首页

前面我们已经连接好了数据库，就要让它在这里发挥一下作用了，这一节将讲述如何将数据库里的数据用ASP读取出来，在页面中显示出来，这样就等于是查看留言本了。

利用DW制作如下页面（这里我就不讲如何去做这个页面了，最后我将会给出HTML代码下载）

将制作好的文件存为index.asp，下面就创建数据记录集，用来显示数据库的数据到这个页面中：

用记事本打开index.asp，在页头加入以下代码：

<%@LANGUAGE="VBScript" codepage="936"%>
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select user,qq,email,content,data from main order by id desc"
rs.open sql,conn,1,1
%>
代码拷贝框
<%@LANGUAGE="VBScript" codepage="936"%>
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select user,qq,email,content,data from main order by id desc"
rs.open sql,conn,1,1
%>
[Ctrl+A 全部选择 然后拷贝]

解释一下：

第一行，表明ASP使用的是VB脚本
第二行，是用include包含文件，这里包含的是数据库连接文件。
第三行，ASP程序开始
第四行，利用Server内置对象创建一个记录集
第五行, SQL语句，这里的意思是选择数据库中的user,qq,email,content,data字段，指定该数据表的名称是“main”数据 的排列顺序是倒序。
第六行，用刚才创建的名为rs的记录集打开数据库，设置属性为只读（1,1为只读数据,1,3为插入数据，2,3是修改数据。

这样就打开了数据库，接下来就可以显示了。

将“留言人”代替为“<%=rs("user")%>
“时间”代替为“<%=rs("data")%>
“留言内容在此”代替为“<%=rs("content")%>
“QQ”链接到：http://search.tencent.com/cgi-bin/friend/user_show_info?ln=<;%=rs("qq")%>
“邮件”链接到：mailt<%=rs("email")%>
最后将“填写留言”链接 add.asp “管理留言”链接 admin.asp

好了，再次保存，浏览看看！

怎么了？只显示一条记录？原来我们在数据库里添加了两条记录的哦！还有一条呢？别急，因为我们没有指定ASP循环显示，所以就只有一条啦。。。

在刚才的代码后面添加一行

<%do while not rs.eof%>
并在页面的第一个表格的末尾加上

<%
rs.movenext
loop
%>
上面的代码就是说用rs记录集指针一条一条往下一条移动，直到末尾，loop是循环的意思。。哈哈，再次浏览这个文件

看明白了吗，这样就可以让数据库中的数据全部显示在页面中了。

五、制作添加留言页面，实现留言功能

我们是做的一个留言本，实现留言的功能就十分重要了，要不然就算不上留言本了，接下来就一起来实现这个功能。
用DW制作以下这样的页面：

设置表单的属性如下：

姓名：设置为单行文本域，名称为“user”
QQ号：设置为单行文本域，名称为“qq”
邮件：设置为单行文本域，名称为“email”
内容：设置为多行文本域，名称为“content”
最后将表单的“Action”动作指向addsave.asp就可以了。

保存文档名为add.asp，OK！下一步！

表单是做好了，但是还需要后台程序的支持，一起来使用ASP编写一个添加留言处理程序，添加留言代码：

<%@LANGUAGE="VBScript" codepage="936"%> 表明ASP使用的是VB脚本
<!--#include file="conn.asp"--> 是用include包含文件，这里包含的是数据库连接文件
<%
set rs=server.createobject("adodb.recordset") 利用Server内置对象创建一个记录集
sql="select user,qq,email,content,data from main" SQL语句，上节有详解
rs.open sql,conn,1,3 用刚才创建的名为rs的记录集打开数据库，设置属性为插入数据
rs.addnew 用记录集新添加一条数据
user=request.form("user") 请求表单的变量，定义变量为user，这里request.form是请求表单的意思
qq=request.form("qq") 请求表单的变量，定义变量为qq，这里request.form是请求表单的意思
email=request.form("email") 请求表单的变量，定义变量为email，这里request.form是请求表单的意思
content=request.form("content") 请求表单的变量，定义变量为content，这里request.form是请求表单的意思
rs("user")=user 将请求到的表单值传向记录集中代表user字段的名称
rs("qq")=qq 将请求到的表单值传向记录集中代表qq字段的名称
rs("email")=email 将请求到的表单值传向记录集中代表email字段的名称
rs("content")=content 将请求到的表单值传向记录集中代表content字段的名称
rs.update 更新一下数据库中的数据。
rs.close 关闭记录集
set rs=nothing 销毁记录集
conn.close 关闭数据库连接
set rs=nothing 销毁数据库连接
%>
代码拷贝框
<%@LANGUAGE="VBScript" codepage="936"%> 表明ASP使用的是VB脚本
<!--#include file="conn.asp"--> 是用include包含文件，这里包含的是数据库连接文件
<%
set rs=server.createobject("adodb.recordset") 利用Server内置对象创建一个记录集
sql="select user,qq,email,content,data from main" SQL语句，上节有详解
rs.open sql,conn,1,3 用刚才创建的名为rs的记录集打开数据库，设置属性为插入数据
rs.addnew 用记录集新添加一条数据
user=request.form("user") 请求表单的变量，定义变量为user，这里request.form是请求表单的意思
qq=request.form("qq") 请求表单的变量，定义变量为qq，这里request.form是请求表单的意思
email=request.form("email") 请求表单的变量，定义变量为email，这里request.form是请求表单的意思
content=request.form("content") 请求表单的变量，定义变量为content，这里request.form是请求表单的意思
rs("user")=user 将请求到的表单值传向记录集中代表user字段的名称
rs("qq")=qq 将请求到的表单值传向记录集中代表qq字段的名称
rs("email")=email 将请求到的表单值传向记录集中代表email字段的名称
rs("content")=content 将请求到的表单值传向记录集中代表content字段的名称
rs.update 更新一下数据库中的数据。
rs.close 关闭记录集
set rs=nothing 销毁记录集
conn.close 关闭数据库连接
set rs=nothing 销毁数据库连接
%>

[Ctrl+A 全部选择 然后拷贝]

将以上文件存为addsave.asp，测试下！咦？怎么填好提交以后就出现空白了，为什么？这是因为在addsave.asp中没有设置数据成功提交好后的转向页面，这里不用做那么复杂的，只要做一个刷新页面就行了，在程序的后面加上：

<meta http-equiv="refresh" content="2;URL=index.asp">
然后在页面中添加提示信息，比如：“您的留言已经成功提交，2秒钟后将自动返回留言本首页”

好了，这个留言的功能总算实现了，最后再测试下，看看效果！

OK！

六、制作管理登陆页面

留言本的管理功能对于留言本来说就不言而喻了，像论坛的登陆功能就是一个很好的例子，不过我们做留言本基本上有删除功能就行了，写这个教程是为了更多的ASP入门者更好的了解ASP，所以旨在学习用，当然也可以在这基础上添加更多的功能，比如回复留言者。

好了，开始了，还是按照以前的，用Dreamweaver做一个登陆页面，如下图：

把用户名的表单名称设置为admin，密码的表单名称设为password，把动作指向checkpass.asp，，存admin.asp这样登陆页面就好了，

下面就做检测密码的ASP程序了，看以下代码解释：

<!--#include file="conn.asp"--> 把conn.asp包含进来连接数据库
<% ASP起始
admin=request.form("admin") 定义admin的值是表单传过来的用户名域名称admin
password=request.form("password") 定义admin的值是表单传过来的用户名域名称admin
if admin="" or password="" then 这句的意思是假如用户名和密码没有输入的话那么执行下一句
response.Write("<script language=javascript>alert(请填写完整!);history.go(-1)</script>") 用javascript脚本提示用户
end if 结束if语句
sql="select * from admin where admin="&admin&" and password="&password&"" 这句很重要，我们放到后面讲
set rs=conn.execute(sql) 设定记录集rs，用conn执行SQL语句
if rs.eof or rs.bof then 当没有符合筛选结果时，则执行下面的句子
response.write "<script language=javascript>"
response.write "alert(用户或密码不对!);"
response.write "javascript:history.go(-1);"
response.write "</script>" 用javascript脚本提示用户
else 如果符合条件的时候
session("admin")=admin 新建session，值等于表单传来的用户名
response.redirect "mymanage.asp" 转向到mymanage.asp，进入管理页
end if 结束if语句
%> ASP结束

代码拷贝框
<!--#include file="conn.asp"--> 把conn.asp包含进来连接数据库
<% ASP起始
admin=request.form("admin") 定义admin的值是表单传过来的用户名域名称admin
password=request.form("password") 定义admin的值是表单传过来的用户名域名称admin
if admin="" or password="" then 这句的意思是假如用户名和密码没有输入的话那么执行下一句
response.Write("<script language=javascript>alert(请填写完整!);history.go(-1)</script>") 用javascript脚本提示用户
end if 结束if语句
sql="select * from admin where admin="&admin&" and password="&password&"" 这句很重要，我们放到后面讲
set rs=conn.execute(sql) 设定记录集rs，用conn执行SQL语句
if rs.eof or rs.bof then 当没有符合筛选结果时，则执行下面的句子
response.write "<script language=javascript>"
response.write "alert(用户或密码不对!);"
response.write "javascript:history.go(-1);"
response.write "</script>" 用javascript脚本提示用户
else 如果符合条件的时候
session("admin")=admin 新建session，值等于表单传来的用户名
response.redirect "mymanage.asp" 转向到mymanage.asp，进入管理页
end if 结束if语句
%> ASP结束

[Ctrl+A 全部选择 然后拷贝]

将以上代码保存为checkpass.asp

这样，用户在admin.asp页面中输入用户名和密码后，就把用户名和密码值传给checkpass.asp处理，当用户名和密码的值和数据库中的字段相匹配时，就进入mymanage.asp这个管理页面，同时建一个session，这个session的会话变量将在后面起作用，

七、制作管理页面

上节中讲的是制作登陆页面和检测用户，当用户名和密码正确时就转到管理页面，好了，开始实现它。
其实这个留言本的管理页面和用户直接看到的首页没有多大的区别，只是用了Session会话变量用作保护和增加了一个删除链接，当点击这个链接的时候，就会自动删除这条留言，好了，其本的目的知道了，那就GO！
刚才讲了，这个页面和首页的index.asp相似，那么就先复制就行了，然后再改一下

首先找到下面这句：
sql="select user,qq,email,content,data from main order by id desc"
把它改为
sql="select id,user,qq,email,content,data from main order by id desc"
这样，就选取到了id这个自动编号的值，以便删除留言时锁定这个id。

然后在“邮件”这个链接后面增加一个链接“删除”，链接：del.asp?id=<%=rs("id") ，修改代码后为<a href="del.asp?id=<%=rs("id")%>" onclick="return confirm(是否确定删除本留言？);">删除</a> 这样，待会我们做del这个页的时候，就会知道为什么了！

改过后存为mymanage.asp

现在打开浏览器看看！

怎么不用输入用户名和密码都可进入呀？别急，上节中，我们不是建了一个session的会话变量，这时就派上用场了，直接用记事本打开。在<%@LANGUAGE="VBScript" codepage="936"%>这句的后面加上<%if session("admin")<>"" then%>这句，在末尾写上：
<%
else
response.Redirect("admin.asp")
end if%>
下面来讲解一下。

<%if session("admin")<>"" then%> 就是说如果session这个("admin")的值不是空的话就执行。
<%
else
response.Redirect("admin.asp")
end if%> 为空的话就转向登陆页，重新登陆，这样的话，直接输入网址的话就会跳到admin.asp，简单吧！

八、删除留言
上节我们增加了一个删除留言的链接，以下是这个del.asp的代码

<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
id=Request.QueryString("id")
sql="select * from main where id="&id
rs.open sql,conn,2,3
rs.delete
rs.update
%>
很明了吧，才几句，第1、2、3句都不用我解释了，大家都在上几节中明白了。

第4句：
id=Request.QueryString("id") 用id取值字符串中传的id，回头看一下删除的链接：del.asp?id=<%=rs("id")%> 就是这个链接才把id的值传来的，<%=rs("id")%>是读取数据库中的自动编号字段中的id。

第5句：

用sql定义SQL语句，这里的*是通配符，表示所有，而Where有点像我们汉语中的“当”，整句话的意思是选择所有来自表名为main的字段，它的条件是当数据库中的id字段是字串所传来的id。如果这个没有的话这个一时间不明白也不要紧，慢慢接触就知道了。

第6句是打开符合条件的记录，确切的讲不应该叫记录集了，因为经过我们这样筛选的话，记录绝对是一条，2，3指定可以对数据库中的数据进入修改。

第7、8句

rs.delete 看了就明白了，原来这才是整个程序的精髓，就是执行删除了。
rs.update 这是更新数据库中的表，删除后就更新。

最后大家自己用rs.close和conn.close释放。

经过些学习，大家应该对ASP有所了解和认识了，这个做ASP留言本的教程就到此结束了。欢迎大家到新视野QQ群里面共同讨论学习。