 |
|
| 美国原装进口---无创血流动力学监护系统 |
|
<%
set conn = server.CreateObject ("adodb.connection")
str_provider = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mapPath("admin_cn/asp_szsolaris/mdb_szsolaris.mdb")
conn.Open str_provider
set rs1 = server.CreateObject ("adodb.recordset")
sql1 = "select * from news_type1 where enabled=1 order by SortID,id desc"
rs1.Open sql1,conn,1,3,1
set rs2 = server.CreateObject ("adodb.recordset")
sql2 = "select * from pdtype where enabled=1 and if_show=1 order by SortID,id desc"
rs2.Open sql2,conn,1,3,1
%>
 |
|
