% Set conobject=Server.CreateObject("ADODB.Connection") DBPath=Server.MapPath("asp/business.mdb") conobject.Open "Driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath Set rs_news=Server.CreateObject("ADODB.Recordset") Set rs_case=Server.CreateObject("ADODB.Recordset") SQL_news="Select * from news order by id desc" SQL_case="Select * from case order by id desc" rs_news.Open SQL_news,conobject,1,3 rs_case.Open SQL_case,conobject,1,3 num_news=0 num_case=0 %>
![]() |
|
||||||||||||||||||||
| 联系我们 | 信息反馈 | 责任声明 | 2006年北京赛迪信息工程监理有限公司 版权所有 京ICP备05009440号 |