| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 943 人关注过本帖
标题:大家来找一下这个代码的错误!!
只看楼主 加入收藏
sncelpl
Rank: 1
等 级:新手上路
帖 子:87
专家分:0
注 册:2006-6-28
结帖率:86.67%
收藏
 问题点数:0 回复次数:13 
大家来找一下这个代码的错误!!

<%
if request.form("title3")="" then
response.write "错误提示:请输入电影名称!"
response.end
end if

if request.form("typeid")="影片类型" then
response.write "错误提示:请输入电影类型!"
response.end
end if

if request.form("where")="出产地区" then
response.write "错误提示:请输入电影出产地区!"
response.end
end if
if request.form("movietype")="" then
response.write "错误提示:请输入电影类型!"
response.end
end if
if request.form("softlevel")="选择推荐度" then
response.write "错误提示:请输入电影推荐度!"
response.end
end if
if request.form("name")="" then
response.write "错误提示:请输入电影领衔主演!"
response.end
end if
if request.form("content3")="" then
response.write "错误提示:请输入电影简介!"
response.end
end if
%>
<%

title=request.form("title3")
no=request.form("no")
set rs=server.createobject("adodb.recordset")
sql="select * from learning where (articleid is null)"
rs.open sql,conn,1,3
rs.addnew
rs("serverip")=request.form("serverip")
rs("typeid")=Request.Form("typeid")
rs("softlevel")=Request.Form("softlevel")
rs("where")=Request.Form("where")
rs("title")=title
rs("content")=replace(request.form("content3"),vbcrlf,"<br>")
rs("dateandtime")=date()
rs("onlinelook")=request.form("onlinelookb")
rs("down")=request.form("downv")
rs("canlook")=request.form("canlook")
rs("howlong")=request.form("howlong4")
rs("url")=request.form("url")
rs("best")=request.form("best")
rs("domurl")=request.form("domurl3")
rs("hits")=request.form("hits")
rs("name")=request.form("name")
rs("count")=request.form("count")
rs("movietype")=request.form("movietype")
rs.update
articleid=rs("articleid")
rs.close
set rs=server.createobject("adodb.recordset")
sql1="select * from movieurl where (id is null)"
rs.open sql1,conn,1,3
for i=1 to no
rs.addnew
url=trim(request.form("urla"&i&""))
rs("nameid")=articleid
rs("url")=url
rs.update
next
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
帮我看一下怎么rs("nameid")=articleid代码没法执行。这是两个表的字段是让第一个表的articleid内容传到第二个表的nameid里。

搜索更多相关主题的帖子: response end form request 
2006-06-28 22:53
islet
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:89
帖 子:6548
专家分:0
注 册:2005-1-28
收藏
得分:0 
啥错误提示?
2006-06-29 07:48
sncelpl
Rank: 1
等 级:新手上路
帖 子:87
专家分:0
注 册:2006-6-28
收藏
得分:0 

怎么没人知道吗

2006-06-29 16:18
hangxj
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:2045
专家分:0
注 册:2006-4-10
收藏
得分:0 
你运行的时候没有什么错误提示的吗?

http://www./
2006-06-29 16:32
sncelpl
Rank: 1
等 级:新手上路
帖 子:87
专家分:0
注 册:2006-6-28
收藏
得分:0 
没有只有一句没法
rs("nameid")=articleid
2006-06-29 16:42
hangxj
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:2045
专家分:0
注 册:2006-4-10
收藏
得分:0 
没法什么?不能存储到数据库?
你先看看前面的
articleid=rs("articleid")
有没有把值传过来?

http://www./
2006-06-29 16:46
craft001wen
Rank: 2
等 级:论坛游民
帖 子:242
专家分:62
注 册:2006-5-4
收藏
得分:0 
以下是引用sncelpl在2006-6-28 22:53:45的发言:

<%
if request.form("title3")="" then
response.write "错误提示:请输入电影名称!"
response.end
end if

if request.form("typeid")="影片类型" then
response.write "错误提示:请输入电影类型!"
response.end
end if

if request.form("where")="出产地区" then
response.write "错误提示:请输入电影出产地区!"
response.end
end if
if request.form("movietype")="" then
response.write "错误提示:请输入电影类型!"
response.end
end if
if request.form("softlevel")="选择推荐度" then
response.write "错误提示:请输入电影推荐度!"
response.end
end if
if request.form("name")="" then
response.write "错误提示:请输入电影领衔主演!"
response.end
end if
if request.form("content3")="" then
response.write "错误提示:请输入电影简介!"
response.end
end if
%>
<%

title=request.form("title3")
no=request.form("no")
set rs=server.createobject("adodb.recordset")
sql="select * from learning where (articleid is null)"
rs.open sql,conn,1,3
rs.addnew
rs("serverip")=request.form("serverip")
rs("typeid")=Request.Form("typeid")
rs("softlevel")=Request.Form("softlevel")
rs("where")=Request.Form("where")
rs("title")=title
rs("content")=replace(request.form("content3"),vbcrlf,"<br>")
rs("dateandtime")=date()
rs("onlinelook")=request.form("onlinelookb")
rs("down")=request.form("downv")
rs("canlook")=request.form("canlook")
rs("howlong")=request.form("howlong4")
rs("url")=request.form("url")
rs("best")=request.form("best")
rs("domurl")=request.form("domurl3")
rs("hits")=request.form("hits")
rs("name")=request.form("name")
rs("count")=request.form("count")
rs("movietype")=request.form("movietype")
rs.update
articleid=rs("articleid")
rs.close
set rs=server.createobject("adodb.recordset")
sql1="select * from movieurl where (id is null)"
rs.open sql1,conn,1,3
for i=1 to no
rs.addnew
url=trim(request.form("urla"&i&""))
rs("nameid")=articleid
rs("url")=url
rs.update
next
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
帮我看一下怎么rs("nameid")=articleid代码没法执行。这是两个表的字段是让第一个表的articleid内容传到第二个表的nameid里。

articleid=rs("articleid") ,这句错了,前面用的,addnew ,说明你的id是空值。没有值怎么传?articleid=rs("articleid")set rs=server.createobject("adodb.recordset")
sql1="select * from movieurl where (id is null)"
rs.open sql1,conn,1,3
for i=1 to no
rs.addnew
url=trim(request.form("urla"&i&""))
rs("nameid")=articleid
rs("url")=url
rs.update
next
rs.close
set rs=nothing
conn.close
set conn=nothing
%>最好放在另一个页面,在articleid有值后,再调用。


2006-06-29 16:46
sncelpl
Rank: 1
等 级:新手上路
帖 子:87
专家分:0
注 册:2006-6-28
收藏
得分:0 
这个问题我也想过不过如是ACCESS的数据库就行,SQL的数据库就不行了.我主要是把ACCESS改成SQL的用ACCESS的数据库都正常.
2006-06-29 16:57
hangxj
Rank: 6Rank: 6
等 级:贵宾
威 望:29
帖 子:2045
专家分:0
注 册:2006-4-10
收藏
得分:0 
那你试一下

....
rs("movietype")=request.form("movietype")
rs.update
sql="select @@identity as id"
set rs1=server.createobject("adodb.recordset")
rs1.open sql,conn
if not rs.eof then
articleid=rs("id")
conn.execute sql
end if
rs1.close
rs.close

这个我也没有用过,不知道有没有问题,你先试一下,看有什么问题再说

http://www./
2006-06-30 09:02
sncelpl
Rank: 1
等 级:新手上路
帖 子:87
专家分:0
注 册:2006-6-28
收藏
得分:0 
以下是引用hangxj在2006-6-30 9:02:32的发言:
那你试一下

....
rs("movietype")=request.form("movietype")
rs.update
sql="select @@identity as id"
set rs1=server.createobject("adodb.recordset")
rs1.open sql,conn
if not rs.eof then
articleid=rs("id")
conn.execute sql
end if
rs1.close
rs.close

这个我也没有用过,不知道有没有问题,你先试一下,看有什么问题再说

rs("movietype")=request.form("movietype")
这句是不是错了哦movietype没有这个字段名.
怎么加放在那个地方.
articleid这个字段我设的是自动编号.
nameid这个字段我要求把articleid的编号复制过来.这是SQL数据库哦.
我这段代码在ACCESS数据库运行是正常的.
在SQL数据库里好象是articleid自动编号还没生成nameid就复制.所以rs("nameid")=articleid这句代码就没运行,这就是/admin/savemovie.asp,行 86 .
出现

Microsoft OLE DB Provider for SQL Server 错误 '80040e21'

多步 OLE DB 操作产生错误。如果可能,请检查每个 OLE DB 状态值。没有工作被完成。

/admin/savemovie.asp,行 86
这个错是我把nameid的值设成"不允许为空"出现的.就是这句rs("nameid")=articleid不对没法在SQL数据库里运行在ACCESS数据库里可以运行.请高手帮忙解决一下在此谢谢.

[此贴子已经被作者于2006-6-30 11:05:33编辑过]

2006-06-30 11:02
快速回复:大家来找一下这个代码的错误!!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.043416 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved