jjqqhh 发表于 2005 年 12 月 12 日 16:51:03

多谢了啊`~~~~~好感动啊`~~~

泪下兰泽 发表于 2005 年 12 月 12 日 16:51:27

下面是引用jjqqhh于2005-12-12 16:45发表的:
怎么写出最新的10条啊`~
你让数据按时间顺序排放啊~

xchange 发表于 2005 年 12 月 12 日 16:51:49

下面是引用winsock于2005-12-12 16:46发表的:
<%
Dim i
Set conn1 = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("/xuyuan/282836278.mdb")
conn1.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
.......

大数据量时效率可能会很低

泪下兰泽 发表于 2005 年 12 月 12 日 16:54:14

怎么会呢?只是列出TOP 10而已

xchange 发表于 2005 年 12 月 12 日 17:01:00

下面是引用泪下兰泽于2005-12-12 16:54发表的:
怎么会呢?只是列出TOP 10而已
我没说你啊……我说的是死板的winsock

winsock 发表于 2005 年 12 月 12 日 17:03:47

下面是引用xchange于2005-12-12 16:51发表的:


大数据量时效率可能会很低

刚才的确实有问题。。这样也许好一点

<%
Set conn1 = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("/xuyuan/282836278.mdb")
conn1.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set Rs=Server.CreateObject("ADODB.RECORDSET")
Rs.maxrecords=10
Sql="Select * From wish"
Rs.Open Sql,Conn1,1,3
while not rs.EOF
response.Write("<font color=red>"&"姓名："& "</font>"&Rs(1)&"<hr align=center width=100% size=1 color=#FFCCFF noshade>")
rs.MoveNext
wend
%>

泪下兰泽 发表于 2005 年 12 月 12 日 17:09:08

为什么要这么麻烦呢?
直接select top 10 from wish就OK了~

winsock 发表于 2005 年 12 月 12 日 17:14:11

下面是引用泪下兰泽于2005-12-12 17:09发表的:
为什么要这么麻烦呢?
直接select top 10 from wish就OK了~


select top 108符合SQL语言的标准

xchange 发表于 2005 年 12 月 12 日 17:24:58

啥时候limit也能标准化呢……

泪下兰泽 发表于 2005 年 12 月 12 日 17:31:12

Access就支持这种语法~~他用的是Access数据库~~所以当然用这个最简单哈~~
页: 1 [2] 3
查看完整版本: 这个是把数据库的东西都写出来， 只要前十条信息，加什么代码？？？？