<% '---- CursorTypeEnum Values ---- Const adOpenForwardOnly = 0 Const adOpenKeyset = 1 Const adOpenDynamic = 2 Const adOpenStatic = 3 '---- LockTypeEnum Values ---- Const adLockReadOnly = 1 Const adLockPessimistic = 2 Const adLockOptimistic = 3 Const adLockBatchOptimistic = 4 %> <% Set DbCon=Server.CreateObject("ADODB.Connection") DbCon.Open("DSN=ch71;UID=sa;PWD=pages30") Set RS=Server.CreateObject("ADODB.RecordSet") sql="select * from ch71_mem where ban='"&Request("classs")&"' order by no asc" Set rs=DbCon.Execute(sql) %> 각 반

banner06.gif (15365 bytes)

class6_tit.gif (3109 bytes)

 

현재 자료가 등록된 동문만 정렬됩니다.

<% Rs.PageSize=62 If Not(RS.BOF and RS.EOF) then i=1 Do Until RS.EOF OR i>Rs.PageSize %> <% RS.MoveNext i=i+1 Loop End If %>

&hakname=<%=RS("name")%>"><%=RS("name")%>