郁闷了好几天了，首先承认我比较菜
本人专业不是编程，而是搞网络的偏偏又接了个网站
现在是我的提交信息的页面提交不了记录进数据库 ，希望大大门帮忙
提交的代码
<!--#include file="../f/conn.asp"-->
<%
lb=request.form("xz")
gsmc=trim(request.form("gsmc"))
lxr=trim(request.form("lxr"))
dh=trim(request.form("dh"))
sj=trim(request.form("sj"))
dz=trim(request.form("dz"))
ywjs=trim(request.form("ywjs"))
ztcp=trim(request.form("ztcp"))
zy=trim(request.form("zy"))
qq=trim(request.form("qq"))
msn=trim(request.form("msn"))
email=trim(request.form("email"))
If gsmc="" or lxr=""or  dh=""Or sj="" Or dz="" or email=""or ywjs=""Then
response.write  "<script language=javascript>alert('星号处为必填!');history.go(-1);</script>"
response.end
Else
  set rse=server.createobject("adodb.recordset")
    se="select * from ["&lb&"] where gsmc='"&gsmc&"'"
   rse.open se,conn,1,1
  if rse.eof and rse.bof then   
    ins="insert into ["&lb&"](gsmc,lxr,dh,sj,dz,ywjs,ztcp,zy,qq,msn,email) values ('"&gsmc&"','"&lxr&"','"&dh&"','"&sj&"','"&dz&"','"&ywjs&"','"&ztcp&"','"&zy&"','"&qq&"','"&msn&"','"&email&"')"
   conn.execute ins
    Set myErrors=conn.errors
    If myErrors.count=0 Then
      response.write  "<script language=javascript>alert('出错了!');history.go(-1);</script>"
response.End
    else
    response.write  "<script language=javascript>alert('允许提交!');history.go(-1);</script>"
response.End
    end if
else
  response.write  "<script language=javascript>alert('已有该公司信息!感谢您的提交!');history.go(-1);</script>"
  response.end
end if
end if    
rse.close
set rse=nothing
%>
conn页面的代码
<%
on error resume next
    SqlDataBase    = "../database/db.mdb"        '数据库路径
    SqlProvider    = "Microsoft.Jet.OLEDB.4.0"        '驱动程序[ Microsoft.Jet.OLEDB.4.0  Microsoft.ACE.OLEDB.12.0 ]
    SqlPassword    = ""                            'ACCESS数据库密码
    adConn="Provider="&SqlProvider&";Jet Oledb:Database Password="&SqlPassword&"; Data Source="&Server.MapPath("\")&""&SqlDataBase&""
    set conn=server.createobject("ADODB.CONNECTION")
    if err then
        err.clear
    else
        conn.open adconn
    end if
    SqlNowString="now()"
    
    sub CloseConn()
    conn.close
    set conn=nothing
     end sub
%>
本人恳请大家帮忙为谢

我是听说这个论坛大家都对新手很好
但是现在怎么没人理我？
谁告诉我下啊~~~

具体错误信息

<%
lb=request.form("xz")
gsmc=trim(request.form("gsmc"))
lxr=trim(request.form("lxr"))
dh=trim(request.form("dh"))
sj=trim(request.form("sj"))
dz=trim(request.form("dz"))
ywjs=trim(request.form("ywjs"))
ztcp=trim(request.form("ztcp"))
zy=trim(request.form("zy"))
qq=trim(request.form("qq"))
msn=trim(request.form("msn"))
email=trim(request.form("email"))

if gsmc="" or lxr="" or dh="" or sj="" or dz="" or email=""or ywjs="" then
    response.write "<script language=javascript>alert('星号处为必填！');history.go(-1);</script>"
    response.end
end if


if conn.execute("select count(*) from ["&lb&"] where gsmc='"&gsmc&"'")(0)<>0 then
    response.write "<script language=javascript>alert('该公司信息已存在！');history.go(-1);</script>"
else
   conn.execute "insert into ["&lb&"](gsmc,lxr,dh,sj,dz,ywjs,ztcp,zy,qq,msn,email) values('"&gsmc&"','"&lxr&"','"&dh&"','"&sj&"','"&dz&"','"&ywjs&"','"&ztcp&"','"&zy&"','"&qq&"','"&msn&"','"&email&"')"
   response.write "<script language=javascript>alert('信息添加成功！');history.go(-1);</script>"
end if
%>

没有错误信息
显示的是   允许提交!
可是就是数据库里面没有插入进记录去

感谢斑竹hmhz
不管行不行总算有人理了
我先试试
不行再找大家帮帮

hmhz
斑竹大大
我也用你的 代码试了
老是  信息添加成功！信息添加成功！
可是就是 信息添加不成功！
我现在怀疑该是我的表上字段定义的问题
数据库CONN大家帮我看看了吗？
没问题吧？
字段是这样的

字段名称    数据类型
id          自动编号
sfxs        数字
lxr         文本
dh          文本
sj          文本
dz          文本
ywjs        备注
ztcp        备注
zy          文本
qq          文本
msn         文本
email       文本
click       数字
riqi       日期/时间
tj          数字

没有屏掉错误吧，帮你顶！

数据库给锁了吗？？