<% dim conn, connstr Session.TimeOut = 50 connstr="DBQ="+Server.MapPath("admin/mb_db.asp")+";DefaultDir=;Driver={Microsoft Access Driver (*.mdb)};" Set conn=Server.CreateObject("ADODB.Connection") conn.open connstr %> 北京市德业兴劳务服务有限责任公司
 
 

<% 'if Trim(Request.QueryString("id")) = "" then ' Response.Write("

参数错
") ' Response.end 'end if Set rs = Server.CreateObject ("adodb.recordset") sql = "Select * From info where i_id = 12" '& Request.QueryString("id") rs.Open sql,conn,1,3 %> <%=rs("tx_text")%>