这个数据库插入该怎么写?

pretty_yang 2004-12-06 10:50:44
为啥每次都是文章插入不了数据库,也不能重定向回原来页面?
<% Response.Buffer=True %>
<!--#Include file="conn.asp"-->
<html>
<head>
<title>回复文章</title>
</head>
<body>
<%
Dim art_id,title
art_id=Request("art_id") '返回欲回复文章编号
title=Request("title") '返回欲回复文章标题
%>
<h2 align="center">回复文章</h2>
<center>
<table border="0" width=90%>
<form method="post" action="" name="form1" >
<tr><td>主题:</td><td><input type="text" name="title" size="60"
value="re:<%=title%>"></td>
</tr>
<tr><td>内容:</td><td><textarea name="body" rows="4" cols="60" wrap="soft">
</textarea></td></tr>
<tr><td></td><td><input type="submit" value=" 提交 " size="20"></td></tr>
</form>
</table>
</center>
<p align=center><a href="particular.asp?art_id=<%=art_id%>">返回首页</a>
<%
If Request("title")<>"" And session("user_name")<>"" Then
Dim body,layer,parent_id,child,hits,user_name
title=Request.Form("title")
body=Request.Form("body")
user_name=session("user_name")
layer=2
parent_id=art_id
child=0
hits=0


Dim sql,svalues
sql="Insert Into art(title,layer,parent_id,child,hits,user_name,submit_date"
svalues = "Values('" & title & "'," & layer & "," & parent_id & "," &child & "," & hits & ",'" & user_name & "','" & now() & "'"

If body<>"" Then '如果有内容,则添加body字段
sql = sql & ",body"
svalues = svalues & "," & "'" & body & "'"

End If
sql = sql & ") " & svalues & ")"
db.Execute(sql)
db.Close
'重定向回原来页面
Response.Redirect "particular.asp?art_id=" & art_id
End If
%>
</body>
</html>
...全文
84 点赞 收藏 7
写回复
7 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
pretty_yang2 2004-12-07
倒点分,大哥们别见怪,实在是分不多了,问题还一大堆呢
回复
feifeiyaqi 2004-12-06
从SQL语句上找啊.MicrosoftOLEDBProviderforODBCDrivers(0x80004005) -->打开数据库出错,没有在指定目录发现数据库

MicrosoftOLEDBProviderforODBCDrivers(0x80040E14)-->sql语句出错(字段名错误,或数据类型不匹配)
回复
pretty_yang 2004-12-06
加了[]也不行,我如果直接打开这个回复页面的话,能显示表格,但是填了内容提交的时候,显示的是如下错误
错误类型:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] INSERT INTO 语句的语法错误。
/home/bbs/TMPm63jw8b3u3.asp, 第 44 行
如果是从浏览文章,再按回复文章转到这个页面的话,是出现这个错误,就是不能看到回复页面的表格啊什么的了,直接就出错
错误类型:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 字段 'art.title' 不能是零长度的字符串。
/home/bbs/re_art.asp, 第 44 行
回复
pretty_yang 2004-12-06
把所有的控制都注释过了,还是不行
回复
阿泰 2004-12-06
怎么掉了半句?

先把这个控制注视掉再看看行不行
If Request("title")<>"" And session("user_name")<>"" Then
回复
lienzhu 2004-12-06
user_name加上[]看看
sql="Insert Into art(title,layer,parent_id,child,hits,[user_name],submit_date"
回复
阿泰 2004-12-06
先把这个控制注视掉再看看行不行
回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2004-12-06 10:50
社区公告
暂无公告