请问下面程序哪儿有错,麻烦給改一下:

<%
set conn=server.CreateObject("adodb.connection")
connstr="provider=microsoft.jet.oledb.4.0;data source="& server.MapPath("db1.mdb")
conn.open connstr
%>
<%

name=request.Form("name")
content=request.Form("content")
oicq=request.Form("oicq")
email=request.Form("email")
homepage=request.Form("homepage")
connstr="insert into book(name,content,oicq,email,homepage)values('"&name&"','"&content&"','"&oicq&"','"&email&"','"&homepage&"')"
conn.execute(connstr)
conn.close
set conn=nothing
response.Redirect"index.asp"
%>
测试错误提示:

错误类型：
Microsoft JET Database Engine (0x80004005)
字段 'book.email' 不能是零长度的字符串。
/save.asp, 第 14 行
这里的'book.email' 不能是零长度的字符串"是什么意思?

你数据库中设置字段不能为空,这里页面提交时没有值,
或提交时传递值不成功.

只要将email字段设为可以为空就行了。

劳驾讲清楚一点，怎么设置email为空，我是个新手

你是什么数据库？ACCESS的？

你建数据库时，是一个一个字段设计出来的，

设置email字段时下面会有选择是否允许为空，设为允许为空就是了

问一下，他的data source对吗，不是用dbp的吗

用数据源一般是本地电脑，网上的不能用数据源的。

你在创建表的时候将email字段设置为not null但是你提交数据的时候email=request.Form("email")这里的值是空值。
解决办法，打开这张表的数据库，然后右键单击这张表，选择设计表这项改下就可以了。mssql 和 access都可以用这个方法

谢谢您的指导,可是一部分好使,但有一部分不好使,添加只能添加一部分