| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2386 人关注过本帖
标题:请求解决:取字段某段后提唯一
只看楼主 加入收藏
yessanya
Rank: 2
等 级:论坛游民
帖 子:69
专家分:20
注 册:2007-6-23
结帖率:66.67%
收藏
已结贴  问题点数:20 回复次数:5 
请求解决:取字段某段后提唯一
ACCSEE数据库(AQXZ.MDB)
id    SJDZ
1    安庆市永忠县吴家镇宏博海棠名都
2    安庆市永忠县清流镇顺河路
3    安庆市永忠县吴家镇燕子坝村
4    安庆市永忠县铜鼓镇共和村
5    安庆市永忠县广顺街道工农村
6    安庆市永忠县仁义镇仁义国税所
7    安庆市永忠县直升镇老黄泥坳村
8    安庆市永忠县昌洲街道天龙牧业公司
9    安庆市永忠县古昌镇盛家沟村
10    安庆市永忠县河包镇中学
11    安庆市永忠县双河街道荣兴街
12    安庆市永忠县路孔镇学府路
13    安庆市永忠县昌洲街道新公安局安置房
14    安庆市永忠县安富街道古桥邮政储蓄所大楼
15    安庆市永忠县昌元街道交通局家属院
16    安庆市永忠县昌洲街道文化中心
17    安庆市永忠县昌洲街道荣和花园
18    安庆市永忠县古昌镇新民村
19    安庆市永忠县昌洲街道工业园区标准厂房
20    安庆市永忠县荣隆镇荣隆派出所大楼
21    安庆市永忠县盘龙镇打铁巷街
22    安庆市永忠县昌元街道高管小区
23    安庆市永忠县昌元街道红旗桥一建司家属院
24    安庆市永忠县昌洲街道石河高庙村
25    安庆市永忠县昌元街道齐天商务宾馆
26    安庆市永忠县荣隆镇太平村
27    安庆市永忠县盘龙镇萝卜巷A区
28    安庆市永忠县安富街道陶都博物馆
29    安庆市永忠县路孔镇万灵村
30    安庆市永忠县双河街道铁路坝村

ASP页面(xz.asp)
<select name="xz">
        <option value="" selected>-建设乡镇查询-</option>
<%
set Rs=server.CreateObject("adodb.recordset")
rs.open "select * from AQXZ where SJDZ",conn,1,1
do while NOT rs.EOF
XZ=rs("SJDZ")
HQ=Instr(XZ,"镇")
If HQ = 0 Then
X=Mid(XZ,7,4)
Else
X=Mid(XZ,7,3)
End if
%>
        <option value="<%=X%>"><%=X%></option>

<%
rs.MoveNext
Loop
rs.close
set rs=Nothing
%>
</select>

问题请教:
让“X”值取唯一
搜索更多相关主题的帖子: 安庆市 公安局 数据库 安置房 工农村 
2015-10-26 22:02
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:10 
ASP页面(xz.asp)
<select name="xz">
        <option value="" selected>-建设乡镇查询-</option>
<%
set Rs=server.CreateObject("adodb.recordset")
rs.open "select * from AQXZ where SJDZ",conn,1,1 && where后面应该是个逻辑表达式,如果你的SJDZ字段是逻辑型的,则这样表示所有逻辑值为T的记录全部选中。但从你提供的数据来看,这个字段应该是字符型的,则你的where 之后应该是SJDZ="安庆市****",这样的运算结果才会是逻辑值。

 NOT rs.EOF
XZ=rs("SJDZ")
HQ=Instr(XZ,"镇")
If HQ = 0 Then
X=Mid(XZ,7,4)
Else
X=Mid(XZ,7,3)
End if
%>
        <option value="<%=X%>"><%=X%></option>

<%
rs.MoveNext
Loop
rs.close
set rs=Nothing
%>
</select>


活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2015-10-27 17:01
yessanya
Rank: 2
等 级:论坛游民
帖 子:69
专家分:20
注 册:2007-6-23
收藏
得分:0 
请教问题重点:查出的数据“取唯一”,请帮助解答
2015-10-27 20:13
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:0 
请先检查筛选出来的记录集是否符合要求,如果前提都不存在,后面的问题解决就是空话。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2015-10-28 07:46
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:10 
where后面应该是个逻辑表达式
2015-10-28 15:05
yessanya
Rank: 2
等 级:论坛游民
帖 子:69
专家分:20
注 册:2007-6-23
收藏
得分:0 
最后的结贴完成:

<select name="xz">
        <option value="" selected>-建设乡镇查询-</option>
<%
set Rs=server.CreateObject("adodb.recordset")
rs.open "select distinct Mid(SJDZ,7,3) as Z from AQXZ",conn,1,1
do while NOT rs.EOF
%>
        <option value="<%=RS("Z")%>"><%If right(RS("Z"),1)="街" Then%><%=RS("Z")%>道<%else%><%=RS("Z")%><%End If%></option>

<%
rs.MoveNext
Loop
rs.close
set rs=Nothing
%>
</select>

还是谢谢各位了!
2015-10-31 21:47
快速回复:请求解决:取字段某段后提唯一
数据加载中...
 
   



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

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