% Set fs=Server.CreateObject("Scripting.FileSystemObject") Set rs=fs.opentextFile(Server.MapPath("../pages/hntqEcounter.txt"),1,false) fcount=rs.readline rs.close set rs=nothing set fs=nothing session("hitCount")=fcount %>
ID | Authors | Paper titles | Page |
<% 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 %> | <% next %>
____________________
Access Nr: <%=session("hitCount")%>