各位大虾，我做了一个ASP得通讯录，但是除了查询功能好像其他都有问题，其中添加功能如下，能指导一下我哪里出错了吗？
<html>
<head>
<title>无标题文档</title>
</head>
<body>
<h3>若需要加入联系人，请填写下列信息：</h3>
<form method="post" action="charu2.asp">
<p>姓 名：<input type="text" size="25" name="Name" ></p>
<p>电话号码：<input type="text" size="25" name="Nbr" ></p>
<p>家庭住址：<input type="text" size="25" name="Add" ></p>
<p><input type="submit" value="确定" name="B1"></p>
</form>
</body>
</html>
<% Option Explicit %>
<html>
<head>
<title>无标题文档</title>
</head>
<body>
<%
'如果上面的信息填全了，就添加记录，否则给出错误信息
If Request.Form("Name")<>"" And Request.Form("Nbr")<>"" And Request.Form("Add")<>"" Then
'以下连上数据库，建立一个Connection对象实例db
Dim db,strconn
Set db=Server.CreateObject("ADODB.Connection")
strConn="Dbq=" & Server.Mappa
