新手求助 asp页面记录插入数据库 - ASP

不材之木

电梯直达

1^#

发表于 2010-1-11 01:45:14 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

郁闷了好几天了，首先承认我比较菜
本人专业不是编程，而是搞网络的偏偏又接了个网站
现在是我的提交信息的页面提交不了记录进数据库，希望大大门帮忙
提交的代码

<%
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
%>
本人恳请大家帮忙为谢

收藏0

使用道具举报

￡籍の口∮

2^#

发表于 2010-1-11 01:45:18 | 只看该作者

数据库给锁了吗？？

回复支持反对

使用道具举报

┗白觀喑﹖

3^#

发表于 2010-1-11 01:45:22 | 只看该作者

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

回复支持反对

使用道具举报

ˇ风逍遥ˇ

4^#

发表于 2010-1-11 01:45:26 | 只看该作者

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

回复支持反对

使用道具举报

封xin封mg

5^#

发表于 2010-1-11 01:45:30 | 只看该作者

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

回复支持反对

使用道具举报

夜来香

6^#

发表于 2010-1-11 01:45:34 | 只看该作者

程序代码：
<%
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
%>

回复支持反对

使用道具举报

ミつン戀ン

7^#

发表于 2010-1-11 01:45:38 | 只看该作者

具体错误信息

回复支持反对

使用道具举报

无民

8^#

发表于 2010-1-11 01:45:42 | 只看该作者

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

回复支持反对

使用道具举报

＂Ｍy!ove-、

9^#

发表于 2010-1-11 01:45:46 | 只看该作者

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

回复支持反对

使用道具举报

小猫钓鱼tp

10^#

发表于 2010-1-11 01:45:50 | 只看该作者

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

回复支持反对

使用道具举报

		自动登录	找回密码
密码			注册