ASP ACCESS ,为什么这段程序不可以将数据插入到ACCESS中?

[hucool]

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../webadmin/config.asp"-->
<%
dim aa,bb,cc,dd,ee,ff,gg,hh,iijason_sql
aa=Request.Form("txtUserName")
bb=Request.Form("txtCompany")
cc=Request.Form("txtCareer")
dd=Request.Form("txtaddress")
ee=Request.Form("txtPostCode")
ff=Request.Form("txttel")
gg=Request.Form("txtEmail")
hh=Request.Form("txtContent")
ii=now()
If aa="" Then
Response.Write("<script>alert('请返回输入姓名，谢谢\t');history.go(-1);</script>")
Response.End()
End If

If gg="" Then
Response.Write("<script>alert('请返回输入电子邮件，谢谢\t');history.go(-1);</script>")
Response.End()
End If

If hh="" Then
Response.Write("<script>alert('请返回输入意见或建议，谢谢\t');history.go(-1);</script>")
Response.End()
End If

jason_sql="insert into [liuyan]([title],[dwmc],[zhiwei],[address],[youbian],[dianhua],[email],[content],[dtime])values"&_
"('"&aa&"','"&bb&"','"&cc&"','"&dd&"','"&ee&"','"&ff&"','"&gg&"','"&hh&"',#"&ii&"#)"
conn.execute jason_sql
Response.Write jason_sql
conn.close
set conn=nothing
Response.Write("数据添加成功！")

%>

[hucool]

提示数据添加成功!
但是数据库中并没有数据.请大侠帮助分析一下.谢谢!

[toury]

1,首先,写代码不能"掩耳盗铃"---你什么判断都没做就直接response.write一句"数据添加成功！"怎么可以呢?你怎么知道真的写入成功了呢?呵呵

<%
'....
'....
err.clear
conn.execute jason_sql
if err=0 then
  response.write "成功!"
else
  response.write "失败!原因:"&err.description
end if
'...
'...
%>

2,把输出的语句放到数据库查询分析器里运行一下看看有什么错误

<%
jason_sql="insert into ......"
response.write jason_sql &"<br>"'把该语句放到数据库查询分析器里运行一下
conn.execute jason_sql
%>

3,注意检查字段约束条件,你上面的代码只检查了3个字段是否为空,如果其他有空值也报错

[sy_binbin]

测试了，可以添加到数据库里

[hucool]

TO:toury

<%
'....
'....
err.clear
conn.execute jason_sql
if err=0 then
  response.write "成功!"
else
  response.write "失败!原因:"&err.description
end if
'...
'...
%>

加上了上面的这个代码出现了以下的提示：请分析，谢谢！

insert into [liuyan]([title],[dwmc],[zhiwei],[address],[youbian],[dianhua],[email],[content],[dtime])values('aaaaaaaaaaaa','aaaaaaaaaaaaaa','aaaaaaaaaaaaaaaaaaaaa','aaaaaaaaaaaaaa','aaaaaaaa','aaaaaaaaaa','aaaaaaaaaaaa','aaaaaa',#2007-12-18 23:52:53#)

失败!原因:缺少对象

[MosquitoWeb]

jason_sql="insert into [liuyan]([title],[dwmc],[zhiwei],[address],[youbian],[dianhua],[email],[content],[dtime])values"&_
"('"&aa&"','"&bb&"','"&cc&"','"&dd&"','"&ee&"','"&ff&"','"&gg&"','"&hh&"','"&ii&"')"

改成这样的

[toury]

在连库文件(你的CONFIG.ASP)中的数据库相对路径不是指CONFIG.ASP和数据库的路径关系,而是指调用数据库连接文件(比如你这个写库文件)和数据库的关系;因此要在CONFIG.ASP中用SERVER.MAPPATH(数据库相对于调用文件的相对路径)来连库;
例如,你把DATA.MDB和CONFIG.ASP放在同级目录AAA中;而这个写库文件是放在和AAA同级的BBB文件夹中,那就要这样写:
connstr="Provider=Microsoft........... DATA SOURCE=" &SERVER.MAPPATH("../AAA/DATA.MDB")
包含文件时写成:<!--#INCLUDE FILE='../AAA/CONFIG.ASP'-->

以此类推,如果有一个文件放在BBB文件夹的一个子文件夹CCC中,那就要另外做一个CONFIG1.ASP,里面的连接字符串改为:
connstr="Provider=Microsoft........... DATA SOURCE=" &SERVER.MAPPATH("../../AAA/DATA.MDB")
包含文件时写成:<!--#INCLUDE FILE='../../AAA/CONFIG1.ASP'-->
===========================================================================================
换句话说,连接字符串中的数据库路径和CONFIG.ASP放在哪里没关系,只和调用数据库连接的文件位置相关;
真正和CONFIG.ASP路径有关的是INCLUDE它的文件时确定路径;

[hucool]

感謝大家,感謝TOURY,sy_binbin在深夜中孜孜不倦的回復．

問題完美解決！！

結貼！

[toury]

你的conn不存在!数据库没有连接上

response.write conn.state'检测 conn是否已正常连接,调试用(0--未连接  1--连接成功)
if conn.state=0 or err<>0 then 
response.write "数据库连接错误,错误描述:" & err.description
response.end
end if
conn.execute jason_sql

[hucool]

的确是这样子的，没有找到数据库


<!--#include file="config.asp"--> 这个应该如何运用？？？

谢谢您！

[toury]

看看你的config.asp里有些什么代码;
无非是连库用的,呵呵,比如:
dim conn ,connstr
connstr="Provider=Microsoft..........."
set conn=server.createobject("adodb.connection")
conn.open connstr
if conn.state=0 then
response.write "数据库连接错误,请检查连接字符串"
set conn=nothing
response.end
end if

大致这样的，呵呵

[hucool]

老大，我是想请教一下 <!--#include file=""--> 这个的用法

上面的这个问题就是指定的文件包含的路径不对．

我的 config.asp和数据库文件在一个文件夹里．但是上一级（和admin同在一个目录）目录中一个文件需要包含config.asp这个文件．
我是这样写的．<!--#include file="../admin/config.asp"--> 这样子写没错，但是在实际执行中，就出现了找不到数据库的错误！！！

[hucool]

又出现了以下错误提示：

1数据库连接错误,错误描述:类型不匹配