% dim connstr dim db db="admin/database/topwang.asp" Set conn = Server.CreateObject("ADODB.Connection") connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"") conn.open connstr %> <% set rs=server.CreateObject("adodb.recordset") sql="select * from [course] where id="&request("id")&"" rs.open sql,conn,1,3 %>
![]() |
![]() |
![]() |
|
|
|
|