<% id = clng(request.querystring("id")) If id = "" or id = 0 Then id = 1 end if set conn=server.createobject("adodb.connection") DBPath = Server.MapPath("scholarship.mdb") conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath set rs = server.createobject("adodb.recordset") sql = "select * from scholarship where id = "&id rs.open sql, conn, 1, 1 %> <%if rs.recordcount = 1 then%>

-- SCHOLARSHIPS / FELLOWSHIPS --
About the Fellowship
<%=rs("about")%>
Eligibility
<%=rs("Eligibility")%>
Selection
<%=rs("Selection")%>
Awards
<%=rs("Awards")%>
Link / Contact
<%=rs("Link")%>

<%else%>

系统中暂时没有记录... <%end if%>