| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 694 人关注过本帖
标题:[求助]为什么我的自动编号不能实现了?
只看楼主 加入收藏
roylong
Rank: 1
等 级:新手上路
帖 子:12
专家分:0
注 册:2005-12-27
收藏
 问题点数:0 回复次数:4 
[求助]为什么我的自动编号不能实现了?

为什么我的自动编号不能实现了?
我设想的是,用lianluo为主编号,手工输入,但是有很多数据拥有同样的主编号lianluo,这样,这些数据靠输入的顺序自动编号设置为item的编号来区分

<!--#include file="xh_conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from 工件信息"
rs.open sql,db,1,3
rs.addnew
rs("lianluo")=trim(request.form("lianluo"))
rs.update
rs.close
set rs=nothing
%>
<%
set rs=server.createobject("adodb.recordset") 20行
sql="select max(item) from where lianluo="&lianluo 21行
rs.open sql,db,3,3 22行
rs.addnew
b=rs.RecordCount
b=CDbl(b)
b=b+1
rs("item")=b
rs.update
rs.close
set rs=nothing
response.redirect "gj_add.asp"
%>

错误提示如下
错误类型:
错误类型:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC SQL Server Driver][SQL Server]在关键字 'where' 附近有语法错误。
/roylong/admin/gj_save.asp, 第 22 行

但是我并没发现错误啊

[此贴子已经被作者于2006-1-16 22:23:27编辑过]

搜索更多相关主题的帖子: lianluo 自动 set form 
2006-01-16 22:16
unix
Rank: 1
等 级:新手上路
帖 子:134
专家分:0
注 册:2005-12-28
收藏
得分:0 


sql="select max(item) from where lianluo="&lianluo

From 與 Where 間應該有表的名稱!


根據上下文,可能是

sql="select max(item) from 工件信息 where lianluo="&lianluo


上面的內容 是一個朋友告訴我的,我改了後運行出現這樣的錯誤

錯誤類型:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC SQL Server Driver][SQL Server]第 1 行: '=' 附近有語法錯誤。
/roylong/admin/gj_save.asp, 第 22 行

[此贴子已经被作者于2006-1-17 13:59:35编辑过]

2006-01-17 08:19
qqqking
Rank: 1
等 级:新手上路
帖 子:17
专家分:0
注 册:2006-1-16
收藏
得分:0 

二楼是对的,不过用英文好点... 多试试,其实一切都很简单..!

2006-01-17 14:18
stragewind
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2006-1-17
收藏
得分:0 
<!--#include file="xh_conn.asp"-->
<%
lianluo=trim(request.form("lianluo"))
if lianluo="" then
response.write "error <BR>"
response.end
else

set rs=server.createobject("adodb.recordset")
sql="select max(item) from 工件信息 group by lianluo having lianluo="&lianluo
rs.open sql,db,1,1
if rs.eof and rs.bof then
b=1
else
b=rs(0)
b=Cint(b)
b=b+1
end if
rs.close

rs.open "工件信息",db,1,3
rs.addnew
rs("lianluo")=lianluo
rs("item")=b
rs.update
rs.close
set rs=nothing

end if
response.redirect "gj_add.asp"
%>

[此贴子已经被作者于2006-1-17 16:27:46编辑过]

2006-01-17 15:29
unix
Rank: 1
等 级:新手上路
帖 子:134
专家分:0
注 册:2005-12-28
收藏
得分:0 
以下是引用stragewind在2006-1-17 15:29:00的发言:
<!--#include file="xh_conn.asp"-->
<%
lianluo=trim(request.form("lianluo"))
if lianluo="" then
response.write "error <BR>"
response.end
else

set rs=server.createobject("adodb.recordset")
sql="select max(item) from 工件信息 group by lianluo having lianluo="&lianluo
rs.open sql,db,1,1
if rs.eof and rs.bof then
response.write "wrong lianluo<BR>"
response.end
else
b=rs(0)
b=Cint(b)
b=b+1
end if
rs.close

rs.open "工件信息",db,1,3
rs.addnew
rs("lianluo")=lianluo
rs("item")=b
rs.update
rs.close
set rs=nothing

end if
response.redirect "gj_add.asp"
%>

運行顯示 wrong lianluo

2006-01-17 16:21
快速回复:[求助]为什么我的自动编号不能实现了?
数据加载中...
 
   



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

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