<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <% Dim RsStd,RsYears,SchoolYear Set RsYears = OpenRecordset(Application("gConn2"), "SELECT * FROM YEARS ORDER BY TITLE") SchoolYear=trim(Request.QueryString("id")) Set RsStd = OpenRecordset(Application("gConn2"), "SELECT * FROM STUDENTS WHERE SCHOOL_YEAR= '"& SchoolYear &"' ORDER BY TITLE") %>

<% If Not RsStd.Eof Then %> <% Do While Not RsStd.Eof %> <% RsStd.MoveNext %> <% Loop %> <% End if %>
Μαθητές <%=SchoolYear %>
<%= RsStd(" /> <%= RsStd("TITLE").Value %>

 

 

 

 

 

 

 

 

 
© 2010 www.theoklitos.gr - Κοντά σας από το 1986 | Ενημέρωση Γονέων
 
<% RsStd.Close() : Set RsStd = Nothing RsYears.Close() : Set RsYears = Nothing %>