6-07.asp

来自「asp开发 asp开发 asp开发 asp开发」· ASP 代码 · 共 11 行

<%
	set conn = Server.CreateObject("ADODB.Connection")
	conn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" &_
		Server.MapPath("person.mdb"))
	set rs = Server.CreateObject("ADODB.Recordset")
	sql = "SELECT * FROM grade"
	rs.Open sql, conn, 3 ,1 
	rs.AbsolutePosition = 2
	Response.Write(rs(2))
%>