|
楼主 |
发表于 2005 年 12 月 12 日 16:06:48
|
显示全部楼层
这个是把数据库的东西都写出来, 只要前十条信息,加什么代码????
<%
Set conn1 = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("/xuyuan/282836278.mdb")
conn1.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set Rs=Server.CreateObject("ADODB.RECORDSET")
Sql="Select * From wish"
Rs.Open Sql,Conn1,1,3
while not rs.EOF
response.Write("<font color=red>"&"姓名:"& "</font>"&Rs(1)&"<hr align=center width=100% size=1 color=#FFCCFF noshade>")
rs.MoveNext
wend
%>
这个是把数据库的东西都写出来, 只要前十条加什么代码???? |
|