出错在哪里?求助!

hsyun 2010-12-27 02:13:49
saveTheme.asp文件内容如下

<%@ LANGUAGE="VBSCRIPT" %>
<%
Dim author,ip_addr,theme,pic_path,content
author=Trim(Request.Form("txtAuthor"))
ip_addr=Request.ServerVariables("REMOTE_ADDR")
theme=Trim(Request.Form("txtTheme"))
pic_path=Request.Form("optPic")
content=Trim(Request.Form("txtContent"))


%>

<html>
<head>
<base href="file:///C:/Inetpub/wwwroot/saveTheme.asp" fptype="TRUE">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>保存主题</title>
</head>

<body>
<%

Dim id,cnn,rst,ssql
Set cnn=Server.CreateObject("ADODB.Connection")

cnn.ConnectionString="DSN=mydsn;uid=sa;pwd=wwwfox"
cnn.Open

ssql="insert into articles(art_id,author,ip_addr,theme,pic_path,content,view_times,reply_times)"
ssql=ssql & "values (22,'" & author & "','" & ip_addr & "','"

ssql=ssql & theme & "','" & "images/" & pic_path & "','" & content & "',0,0)"

cnn.Execute ssql, ,adCmdText


%>

<p>主题保存成功!</p>

<p><a href="forum.asp">返回论坛首页</a></p>

</body>
</html>







错误信息:

ASP服务器发现运行时错误,以下是错误的详细描述:

Microsoft OLE DB Provider for ODBC Drivers
错 误 码:0x80040E14

错误代码:cnn.Execute ssql, ,adCmdText
错误描述:[Microsoft][ODBC SQL Server Driver][SQL Server]第 1 行: ',' 附近有语法错误。

文件名称:c:\inetpub\wwwroot\saveTheme.asp
所在行号:34


出错在哪里?求助



...全文
311 46 打赏 收藏 转发到动态 举报
写回复
用AI写文章
46 条回复
切换为时间正序
请发表友善的回复…
发表回复
hsyun 2010-12-29
  • 打赏
  • 举报
回复
在线等答案
急!
hsyun 2010-12-29
  • 打赏
  • 举报
回复
还有个问题,content内容 填写字数多了数据里查不到了,如最后两行content列空白。字数少没问题。
如图:


结贴后,还能回答吗?
hsyun 2010-12-29
  • 打赏
  • 举报
回复
[Quote=引用 31 楼 lzd_83 的回复:]
sql 语句有问题
[/Quote]
错在哪?
hsyun 2010-12-29
  • 打赏
  • 举报
回复
能运行出来了
hsyun 2010-12-29
  • 打赏
  • 举报
回复
谢谢 jinhuiSystem 和各位。结贴给分
晓风拂月 2010-12-29
  • 打赏
  • 举报
回复
[Quote=引用 41 楼 hsyun 的回复:]
修改了,删了<%=Request.Form

另外,麻烦的头像pic_path不要了。
相关的删。

结果,列表能出来了。但content内容不知道为什么还存不进去。
[/Quote]

content=Trim(Request.Form("txtContent"))

<tr>
<th>内容</th>
<td><textarea rows=6 name="txtContext" cols="50"><%=Request.Form("txtContent")%></textarea></td>
</tr>


你的content 的name值那个地方不一致,当然还存不进去了,改一下就ok了
晓风拂月 2010-12-29
  • 打赏
  • 举报
回复
[Quote=引用 41 楼 hsyun 的回复:]
修改了,删了<%=Request.Form

另外,麻烦的头像pic_path不要了。
相关的删。

结果,列表能出来了。但content内容不知道为什么还存不进去。
[/Quote]

content=Trim(Request.Form("txtContent"))

<tr>
<th>内容</th>
<td><textarea rows=6 name="txtContext" cols="50"><%=Request.Form("txtContent")%></textarea></td>
</tr>


你的content 的name值那个地方不一致,当然还存不进去了,改一下就ok了
hsyun 2010-12-29
  • 打赏
  • 举报
回复
修改了,删了<%=Request.Form

另外,麻烦的头像pic_path不要了。
相关的删。

结果,列表能出来了。但content内容不知道为什么还存不进去。
晓风拂月 2010-12-29
  • 打赏
  • 举报
回复
[Quote=引用 38 楼 hsyun 的回复:]
这句如何改?


<th>内容</th>
<td><textarea rows=6 name="txtContext" cols="50"><%=Request.Form("txtContent")%></textarea></td>
[/Quote]
把<%=Request.Form("txtContent")%> 去掉,尽信书,则不如无书啊!!!
现在还有问题吗?
hsyun 2010-12-29
  • 打赏
  • 举报
回复
那么写是按书上的,书上也是漏洞百出
hsyun 2010-12-29
  • 打赏
  • 举报
回复
这句如何改?


<th>内容</th>
<td><textarea rows=6 name="txtContext" cols="50"><%=Request.Form("txtContent")%></textarea></td>
晓风拂月 2010-12-29
  • 打赏
  • 举报
回复
<th>作者</th>
<td><input type="text" name="txtAuthor" size="50" value=<%=Request.Form("txtAuthor")%>></td>
</tr>

<tr>
<th>主题</th>
<td><input type="text" name="txtTheme" size="50" value=<%=Request.Form("txtTheme")%>></td>
</tr>



<tr>
<th>图像</th>
<td>
<% for each f in fld.files %>
<input name="optPic" type="radio" value=<%=f.name %>>
<% if i=1 then Response.Write Space(1) & "checked"%>
<img src=<%="images/" & f.name %>>
<%
i=i+1
next
%>
</td>
</tr>
<tr>
<th>内容</th>
<td><textarea rows=6 name="txtContext" cols="50"><%=Request.Form("txtContent")%></textarea></td>
</tr>

newTheme.asp
这个页面的txtAuthor,txtTheme,optPic,txtContext的value='<%=request.form("")%>' 不需要的啊,你直接写成value="" 就可以了,request.form("“)是在表单post提交 以后取值用的,这个页面不需要这样写的,在你post表单后的页面saveTheme.asp 再用request.form(”")取出你页面form表单提交过去的值
hsyun 2010-12-29
  • 打赏
  • 举报
回复
第一个所谓首页就是forum.asp
hsyun 2010-12-29
  • 打赏
  • 举报
回复
[Quote=引用 34 楼 jinhuisystem 的回复:]
引用 31 楼 lzd_83 的回复:
sql 语句有问题


不是SQL的问题,是你没有获取到表单填入的数据啊,
<%
Dim author,ip_addr,theme,pic_path,content
author=Trim(Request.Form("txtAuthor"))
ip_addr=Request.ServerVariables("REMOTE_ADDR")
th……
[/Quote]


都贴出来了,在前面。总共3个文件:forum.asp,newTheme.asp,saveTheme.asp
晓风拂月 2010-12-29
  • 打赏
  • 举报
回复
[Quote=引用 31 楼 lzd_83 的回复:]
sql 语句有问题
[/Quote]

不是SQL的问题,是你没有获取到表单填入的数据啊,
<%
Dim author,ip_addr,theme,pic_path,content
author=Trim(Request.Form("txtAuthor"))
ip_addr=Request.ServerVariables("REMOTE_ADDR")
theme=Trim(Request.Form("txtTheme"))
pic_path=Request.Form("optPic")
content=Trim(Request.Form("txtContent"))
%>
把你的整个页面贴出来看看
超维电脑科技 2010-12-28
  • 打赏
  • 举报
回复
response.write(ssql)
response.end()
输出语句到数据库执行下看
Rotel-刘志东 2010-12-28
  • 打赏
  • 举报
回复
sql 语句有问题
hsyun 2010-12-28
  • 打赏
  • 举报
回复
数据库设计



存入数据如下,第7行好像是打开浏览器的第一次存进去的,再存就存不进去
晓风拂月 2010-12-28
  • 打赏
  • 举报
回复
<%
Dim author,ip_addr,theme,pic_path,content
author=Trim(Request.Form("txtAuthor"))
ip_addr=Request.ServerVariables("REMOTE_ADDR")
theme=Trim(Request.Form("txtTheme"))
pic_path=Request.Form("optPic")
content=Trim(Request.Form("txtContent"))
%>
这些值没有获取到,好好检测下
晓风拂月 2010-12-28
  • 打赏
  • 举报
回复
[Quote=引用 27 楼 hsyun 的回复:]
程序
cnn.Execute ssql, ,adCmdText

response.write(ssql)
response.end()

%>

打印出的sql语句是

INSERT INTO articles(author,ip_addr,theme,pic_path,content,view_times,reply_times)values ('','127.0.0.1'……
[/Quote]

你页面文本框里面输入的值没有获取到啊,肯定没有数据了
加载更多回复(26)

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧