<% set rs1=Server.CreateObject("ADODB.Recordset") sql1="select * from zxjy_users where userid="&session("id") set rs1=server.createobject("ADODB.Recordset") rs1.open sql1,conn,1,3 Full_name=rs1("Full_name") if rs1("user_sex")=0 then user_sex="男" else user_sex="女" end if user_phone=rs1("user_phone") currencys=rs1("currencys") integral=rs1("integral") adddate=rs1("adddate") lastlogin=rs1("lastlogin") portrait=rs1("portrait") user_type=rs1("user_type") session("Job_No")=rs1("Job_No") rs1.close set rs1=nothing set rsb=server.CreateObject("adodb.recordset") sqlb="select * from zxjy_jibie" rsb.open sqlb,conn,1,3 do while not rsb.eof if integral>=rsb("jieibief") and integral<=rsb("jieibiefj") then jibiename=rsb("jibiename") End if rsb.movenext loop rsb.close set rsb=nothing %> 学员中心 - 朝霞教育
<%if portrait<>"" then response.Write("") else response.Write("") end if%>
<%=session("username")%>
真实姓名:  <%=Full_name%> 性  别:  <%=user_sex%>
联系电话:  <%=user_phone%> 会员类型:  <%if user_type=1 then response.Write("普通") else response.Write("员工") end if%>
账户余额:  <%=currencys%> 会员等级:  <%=jibiename%>
注册时间:  <%=adddate%> 上次登录:  <%=lastlogin%>
<% set rs=server.CreateObject("adodb.recordset") sql="select * from zxjy_yhj_Sequenceo where shangid="&session("id")&"" rs.open sql,conn,1,3 yhj=0 if rs.eof and rs.bof then yhj=0 else do while not rs.eof yhj=yhj+1 rs.movenext loop end if rs.close set rs=nothing %> <%if yhj>0 then%>
 我的优惠卷:共 <%=yhj%>
<%end if%> <% set rs=server.CreateObject("adodb.recordset") sql="select * from zxjy_myclss where userid="&session("id")&" order by daodate" rs.open sql,conn,1,3 if rs.eof and rs.bof then %> <% else i=0 do while not rs.eof %> <% i=i+1 if i>=10 then exit do rs.movenext loop end if rs.close set rs=nothing %>
 我的课程
课程名称 课程类型 主讲人 开班时间
您暂时没有课程
.html" target='_blank'><%=GetArticleTitle(rs("classID"))%> <% set rs1=server.CreateObject("adodb.recordset") rs1.open "select SortName from xuer_Class where ID="&rs("typeID")&"",conn,1,3 if rs1.bof and rs1.eof then response.Write(" ") else response.Write(""&rs1("SortName")&"") end if rs1.close set rs1=nothing %> .html" target="_blank"><%=GetArticleName(Rs("Teacher"))%> <%=Format_Time(rs("daodate"),8)%>
<% set rs=Server.CreateObject("ADODB.Recordset") sql="select * from zxjy_myclss where userid="&session("id")&" order by daodate" rs.open sql,conn,1,3 if rs.eof and rs.bof then %>
<%=dlwname%>
今 天 是:<%=year(date())%>年<%=month(date())%>月<%=day(date())%>日
订购自己的课程
<% else i=0 do while not rs.eof daodate=rs("daodate") rq=cdate(daodate) jc=DateDiff("d",now,rq) if jc<10 then %>
<%=dlwname%>
今 天 是:<%=year(date())%>年<%=month(date())%>月<%=day(date())%>日
班  级:.html" target='_blank'><%=GetArticleTitle(rs("classID"))%>
开班时间:
<%=Format_Time(daodate,8)%>
<% if jc<0 then response.Write("考试以结束") 'response.Write(""&jc&"--考试以结束") else response.Write("距离上课时间还有 "&jc&" 天") end if %>
<% end if i=i+1 if i>=2 then exit do rs.movenext loop end if rs.close set rs=nothing %>