% ' 與資料庫連線 Set conn = Server.CreateObject("ADODB.Connection") DBPath = Server.MapPath("../fpdb/download.mdb") conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath Set rs = Server.CreateObject("ADODB.Recordset") rs.Open "select * from download where fileid=" & Request.Querystring("fileid") , conn,1,3 %>