求查找access2000 的查找sql语句-----------------------急死了！！！！！！！！！！！
最近用vb 编数据库程序,
读取数据库是用以下类似方法:
Dim str As String
Dim Conn As New Connection
Dim rs As New Recordset
If Right(App.Path, 1) = "\" Then
sdbName = Left(App.Path, Len(App.Path) - 1) + dataPath
Else: sdbName = App.Path + dataPath
End If
str = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Persist Security Info=False;" & "Data Source=" & sdbName & ";" & "Jet OLEDB:Database Password=" & sPassword & ";"
Conn.Open str
rs.Open "DELETE * FROM tabUser WHERE User='" & userName & "'", Conn
Set rs = Nothing
Set Conn = Nothing
现在我有两个问题:
1. 我想查最后10条记录,该用什么sql语句
2. 数据库中有一个表 tbImMsg
表中有一个字段是date,数据类型是 日期/时间 ，比如我想查4月份的记录或是*号到*号的记录，该如何实现。
现在我是将 now函数 的结果存进去的，需要改么，怎么修改？？？
问题点数：80、回复次数：7Top
1 楼aohan（aohan）回复于 2005-08-02 22:50:26 得分 31
1、select top 10 * from table order by date desc
2、rs.Open "select * FROM tbImMsg WHERE date between cdate(' 2005-04-01 ') and cdate('2005-04-15') ", Conn
Top
2 楼Leftie（左手,为人民币服务）回复于 2005-08-02 23:04:19 得分 10
str = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Persist Security Info=False;" & "Data Source=" & sdbName & ";" & "Jet OLEDB:Database Password=" & sPassword & ";"
Conn.Open str
conn.execute "DELETE * FROM tabUser WHERE User='" & userName & "'"
Set rs = Nothing
Set Conn = Nothing
1,select top 10 * from tablename order by 字段名 desc
2,rs.Open "select * from tbImMsg where 日期字段 between #2005-04-01# and #2005-04-15#", conn,adopenkeyset,adlockreadonly
Top
3 楼unsigned（僵哥(发站内消息，请附上链接或问题说明，否则不予回复)）回复于 2005-08-02 23:25:55 得分 8
哭哭，这年头，星星原来抢分那厉害……Top
4 楼dxw（）回复于 2005-08-04 23:12:00 得分 0
不行呀，，，，，，
http://pickup.mofile.com/1661643879027927
只是源码，帮我看一下吧
Top
5 楼dxw（）回复于 2005-08-05 12:57:14 得分 0
行不通！！！！！！！！！！！！！！！！！！！！！！！！
请大家把源码下下来看看！！！！！！！！！！！！！！！！！Top
6 楼jiemupig（伦涯飘）回复于 2005-08-05 13:09:09 得分 13
select top 10 * from table order by date desc
Select * from tbImMsg format([Date],'yyyy-mm-dd')>='"&format(开始日期,"yyyy-mm-dd") &"' and format([Date],'yyyy-mm-dd')<='"&format(结束日期,"yyyy-mm-dd") &"'Top
7 楼Free_Windy（自由风）回复于 2005-08-07 10:05:25 得分 18
select top 10 * from table order by date desc
这就可以啊.
rs.Open "select * from tbImMsg where 日期字段 between #2005-04-01# and #2005-04-15#", conn,adopenkeyset,adlockreadonlyTop
