我的邮件界面排序要求:收件人"未阅"的在前面, "已阅"的在后面;且要按发邮件的时间倒序排列,即最新的放到最前面.我在数据库中只能按收件人"未阅"字段排序,不能同时对两个字段排序,那是不是要写代码来实现?但时间的代码如何写呢?
程序如下:
<%
dim Rs
set Rs= Server.CreateObject("ADODB.Recordset")
Rs.ActiveConnection="File Name=" & Server.MapPath("Ado.udl")
Rs.Source="Select * From MailReceived1 ORDER BY Read_Time DESC"
Rs.CursorType=3
Rs.LockType=1
Rs.Open%>
<table align=center>
<tr>
<td align="center">重要性</td>
<td>发件人</td>
<td>主题</td>
<td>发送时间</td>
</tr>
</table>
<%
'显示当前页数据
Response.write "<table>"
Do While (Not Rs.Eof)
Response.write "<tr>"
Response.write "<td>" & Rs.Fields(1).Value & "</td>"
Response.write "<td>" & Rs.Fields(2).Value & "</td>"
Response.write "<td>" & Rs.Fields(3).Value & "</td>"
Response.write "<td>" & Rs.Fields(4).Value & "</td>"
Response.write "</tr>"
Rs.MoveNext
Loop
Reponse.write "</table>"
Rs.Close
Set Rs=Nothing
%>
(注: 数据库中Rs.Fields(0)是邮件编号字段;Rs.Fields(4)是邮件发送时间字段;Rs.Fields(5)是收件人是否阅读邮件字段)
程序如下:
<%
dim Rs
set Rs= Server.CreateObject("ADODB.Recordset")
Rs.ActiveConnection="File Name=" & Server.MapPath("Ado.udl")
Rs.Source="Select * From MailReceived1 ORDER BY Read_Time DESC"
Rs.CursorType=3
Rs.LockType=1
Rs.Open%>
<table align=center>
<tr>
<td align="center">重要性</td>
<td>发件人</td>
<td>主题</td>
<td>发送时间</td>
</tr>
</table>
<%
'显示当前页数据
Response.write "<table>"
Do While (Not Rs.Eof)
Response.write "<tr>"
Response.write "<td>" & Rs.Fields(1).Value & "</td>"
Response.write "<td>" & Rs.Fields(2).Value & "</td>"
Response.write "<td>" & Rs.Fields(3).Value & "</td>"
Response.write "<td>" & Rs.Fields(4).Value & "</td>"
Response.write "</tr>"
Rs.MoveNext
Loop
Reponse.write "</table>"
Rs.Close
Set Rs=Nothing
%>
(注: 数据库中Rs.Fields(0)是邮件编号字段;Rs.Fields(4)是邮件发送时间字段;Rs.Fields(5)是收件人是否阅读邮件字段)
解决方案 »
- 怎样利用Calendar的DayRender事件添加背景图片
- 研究:读取DLL内部资源文件的问题
- 网站对象生命周期问题
- 再问,做web打印时,能直接打印吗?就是不选择打印机,直接打印要输出的页面,急急 在线等,
- 好久没做web开发了,想请教一个问题
- 求,请高手回答,如何实现DATAGRID手动调整顺序
- 奇怪!!!为什么每次跳转页面都会触发"Application_Start"和"Session_Start"事件?
- 为什么在连VFP时会出现cannot slove backlink
- 求助:关于TreeView控件...
- MyXls 导出数据到excel
- 这个为什么没反应,到第二句就不执行了。
- 求助:关键字作为标识符无效 是什么问题?
其中Receive_Time是另一个字段名
---------------------------------可以这样排啊,楼主应该补习一下 SQL 语句的基础。呵..Rs.Source="Select * From MailReceived1 ORDER BY Read_Time DESC, Receive_Time DESC"