</head> <!--#include file="inc/db_conn.asp" --> <% set rschecks=server.CreateObject("ADODB.recordset") strchecks="select * from title where femployeeid="&(session("EisMemberid"))&"" rschecks.open strchecks,conn,1,1 if not rschecks.eof then countss=rschecks.recordcount else countss=0 end if call closetable(rschecks) set rscheck=server.CreateObject("ADODB.recordset") strcheck="select * from title where ischeck=0 and femployeeid="&(session("EisMemberid"))&" order by ttime desc" rscheck.open strcheck,conn,1,1 if not rscheck.eof then counts=rscheck.recordcount else counts=0 end if call closetable(rscheck)
strexp="select expforum.*, Exp_answer.* from expforum, Exp_answer where expforum.employeeid="&(session("EisMemberid"))&" and expforum.id=Exp_answer.qid" 'response.Write(strexp) ' response.End() set rsexp=server.CreateObject("ADODB.recordset") rsexp.open strexp,conn,1,1 if not rsexp.eof then countsss=rsexp.recordcount else countsss=0 end if call closetable(rsexp)
str="select * from expforum where employeeid="&(session("EisMemberid"))&"" set rs=server.CreateObject("ADODB.recordset") rs.open str,conn,1,1 countssss=rs.recordcount countsssss= countssss - countsss call closetable(rs)
set rs1=server.CreateObject("ADODB.recordset") str1="select * from title where temployeeid="&(session("EisMemberid"))&"" rs1.open str1,conn,1,1 if not rs1.eof then count1=rs1.recordcount else countss=0 end if
call closetable(rs1) set rs2=server.CreateObject("ADODB.recordset") str2="select * from title where temployeeid="&(session("EisMemberid"))&" and ischeck=1" rs2.open str2,conn,1,1 if not rs2.eof then count2=rs2.recordcount else count2=0 end if call closetable(rs2)