ps时间轴添加图片:高手们,请帮我连下数据库,无法吧数据写进数据库是为什么啊?请一定邦我调试下【有分送你哦】

<%

dim a,b,c,d,e,f
a=request.form("username")
b=request.form("userpwd")
c=request.form("userpwdok")
d=request.form("usertel")
e=request.form("useremail")
f=request.form("useradd")

response.write nc
response.write pwd
response.write pwdok
response.write un
response.write em
response.write add

if trim(len(a))<4 then
response.redirect "error.asp?ErrorDescription=您的用户名不够长,请输入四个字节以上！&ErrorCode=1001"
end if
if len(b)<3 then
response.redirect "error.asp?ErrorDescription=请输入3位数密码！&ErrorCode=1003"
end if
if b<>c then
response.redirect "error.asp?ErrorDescription=你两次输入的密码不一致,请重新输入！&Errorcode=1003"
end if
if trim(len(d))<4 then
response.redirect "error.asp?ErrorDescription=您的电话号码不正确,请重新输入！&ErrorCode=1002"
end if
if trim(len(e))<4then
response.redirect "error.asp?ErrorDescription=你输入的电子邮箱有问题,请检查！&Errorcode=1004"
end if
if trim(len(f))<2 then
response.redirect "error.asp?ErrorDescription=您的地址不正确,请重新输入！&ErrorCode=1002"
end if

dim cnn,rst,ssql
set cnn=Server.CreateObject("ADODB.connection")
set rst=server.createobject("ADODB.recordset")
cnn.open "Provider=Microsoft.jet.oledb.4.0;Data Source=" & Server.mappath("message.mdb") & ";Persist security info=false"

cnn.execute "select * from m"
rst.open "select * from m",cnn,1,3

ssql="insert into m(name,pwd,pwdok,tel,email,add) values('"& a &"','"& b &"','"& c &"','"& d &"','"& e &"','"& f &"')"

'response.write rst.fields.count
'cnn.Execute "insert into m(name,pwd,pwdok,tel,email,add) values('"& a &"','"& b &"','"& c &"','"& d &"','"& e &"','"& f &"')"

response.redirect "ChangPic.htm"

%>