Kite's Blog 技术文章版

‘连接数据库
<%
Set conn = Server.CreateObject("ADODB.Connection")
Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; "
Strconn=Strconn & "DBQ=" & Server.MapPath("manage\liangqichao.mdb")
conn.Open Strconn
%>
'建立记录集
<%
dim bg,rs
bg="select top 7 * from article order by newsid DESC"
set rs=conn.execute(bg)
%>
'读取字段值，其实16就是读取前16个字
<%=left(rs("title"),16)%>