帮我看看 用ASP写入数据库 为什么不能提交？

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
dim name,edu,shouji,qq,email,text '定义两个变量分别用来接收从表单传送来的数据
name=request.form("name")
edu=request.form("edu")
shouji=request.form("shouji")
qq=request.form("qq")
email=request.form("email")
text=request.form("text")
%>

<% '建立数据库链接
dim Str,conn '用dim定义两个变量
Str = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("date.mdb")
'前面是数据库驱动程序，后面是数据库路径
Set conn = Server.CreateObject("ADODB.Connection")'建立数据库对象
conn.open Str '用conn对象的open方法打开数据库

%>
<% '打开数据库中的某个表
set rs=server.createobject("adodb.recordset")
sql="select * from main"'* from是查询语句，后面加上表的名称
rs.open sql,conn,1,1
%>

<% '打开数据库中的表并写入从表单位中提取的数据