BÌA VÀ MỤC LỤC

<% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open(Server.Mappath("../database/proceedings5.mdb")) set rs = Server.CreateObject("ADODB.recordset") rs.Open "Select * from HNTQ5 ORDER BY ID", conn %> <% do until rs.EOF %><% for each x in rs.Fields %><% next %><% rs.MoveNext loop %>
ID Tên tác giả Tên bài báo Trang
<% if x.name="TenBai" then %>.pdf"> <% end if if x.name<>"TenBai" then %><% end if Response.Write(x.value) if x.name<>"TenBai" then %><% end if if x.name="TenBai" then %><% end if %>
<% rs.close conn.close %>