作者redming (无尘室游魂)
看板Database
标题[SQL ] ASP连结access 使用select问题
时间Thu Aug 20 19:55:32 2009
不知道此问题是否能在此版发问 如不行请通知
http://www.ee.nthu.edu.tw/chinese/news.php
我想用ASP做出如上网页中的功能
再选择全部时可以个别分类 并有一个分类标题(这个是顺便问的 可忽略)
想来想去还是想不出来 如何利用select去掉用资料库的资料
我目前写的如下 只能全部 还有个别显现 没办法 在选择全部情况下分类 囧
http://140.117.157.18/tech/nsysuee/a.asp?cattype=
code如最下
请各位给我点想法吧>//<
然後再请问一个问题
我的资料库目前是资料库一 那个cattype是表示分类 我原本是用招生 一般事务
不是用数字 但是有人跟我说用数字比较好 原因是?_?
然後她叫我另外弄个资料表如资料库二 还跟我说
这样的话就可以利用Inner Join语法去串出名称
避免如果万一以後要改分类名称可能造成的资料错误
而且修改分类名称也会非常便捷 这句话 有点不太懂 能帮我把她转为例子说明吗>"<
谢谢~
资料库二
CatTypeData]
id Name
1 招生
2 一般事务
资料库一
numbe wdate fdate til content cattype
2 2009/8/1 1 招生 测试招生 11
3 2009/8/2 1 标题5- 4654 11
4 2009/8/15 1 一般事务 ˇˇ 12
6 2009/8/12 1 1123 22 12
<select name="catalogue"
onchange="document.location.href='a.asp?cattype='+this.options[this.selectedIndex].value"
style="background-color: #B8CAE2">
<option>选择浏览项目</option>
<option value="">全部</option>
<option value="12">一般事务</option>
<option value="11">招生</option>
</select>
<%
'取得分类变数值
cattype = Request("cattype")
'判断分类变数值为数值型态(以防被SQL隐码攻击)
IF IsNumeric( cattype ) <> True Then
cattype = 0
End IF
'建立SQL命令
Source = "Select * From 公告 "
'如果cattype变数是正常的数值才加上搜索的判断
IF cattype <> 0 Then
Source = Source & "Where cattype = " & cattype & " "
End IF
'加上时间或者是ID栏位判断,最新的在上面
Source = Source & "Order By wdate Desc "
'开启资料表
Set Rs = GetMdbRecordset("公告.mdb",Source)
'开始准备输出
IF Rs.EOF Then
response.write "目前没有任何相关公告"
Else
Do Until Rs.EOF
%>
<span>[<%=rs("wdate")%>] </span>
<a href="/doc/dynamic/show.asp?no=<%=rs("numbe")%> "><%=
rs("til") %></a>
<br>
<%
Rs.MoveNext
Loop
End If
Rs.Close
Set Rs = Nothing
%>
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.117.157.18