<% While Not RS.EOF Count = Count + 1 RS.MoveNext Wend NowPage= 0 if Request.QueryString("Page")<>"" then NowPage = cint(Request.QueryString("Page")) if Request.Form("ToPage")<>"" then NowPage = cint(Request.Form("ToPage")) if NowPage <=0 then NowPage = 1 if Count/20 > (Count\20) then TotalPage=(Count\20)+1 else TotalPage=(Count\20) If RS.EOF AND Count > 0 Then RS.MoveFirst End IF if NowPage > TotalPage then NowPage = TotalPage IF not RS.EOF Then RS.Move (NowPage-1) * 20 End IF I=0 Do while not RS.EOF AND I<20 I=I+1 if i mod 2 >0 then bg="#DEE0CB" else bg="#FFFFFF" END IF page="" if request("page")="" then page=1 else page=request("page") end if typenamea="" tds="" msds="" %> <% rs.movenext loop %>

課程名稱	上課日期	時數	上課時間	會員價格	上課費用
" title="<%=rs("Class_title")%>" alt="<%=rs("Class_title")%>"><%=rs("Class_title")%>	<% if IsNull(rs("Class_date")) then response.write "----" else response.write RS("Class_date") end if %>	<%=RS("Class_hour")%>小時	<% if IsNull(rs("Class_times")) then response.write "----" else response.write RS("Class_times") end if %>	<% if rs("Class_price_member")=0 then response.write "--/--" else response.write "$"&RS("Class_price_member") end if %>	<% if rs("Class_price")=0 then response.write "--/--" else response.write "$"&RS("Class_price") end if %>