<% status=request("status") userid=getusrid if userid="" or userid=0 then response.redirect "logout.asp" alias=getalias mywelcomemsg=getmymsg '/// Reject a Request busy=request("busy") if busy<>"" then set conn=server.createobject("ADODB.Connection") conn.open connection call setbusy(busy,userid) conn.close set conn=nothing response.redirect "LMRequests.asp" end if '/// Set user as online application("xlaALSlastlogin")=getlogin(now) requestrate=requestrate*1000 response.buffer=true response.flush %> <% psql="SELECT TOP 5 ip, sessionid, topic, requestid, name, userid, deptid FROM xlaALSCustomers INNER JOIN xlaALSRequests ON xlaALSCustomers.customerid = xlaALSRequests.customerid WHERE userid="&userid&" AND requestid Not In (select requestid from xlaALSBusy where userid="&userid&") AND accepted=0 AND requestdate>='"&getlastlogin&"';" set conn=server.createobject("ADODB.Connection") conn.open connection set rs=conn.execute(psql) if not(rs.eof) then response.write "" if playsound<>"" then response.write "" do until rs.eof requestid=rs("requestid") name=rs("name") ip=rs("ip") sessionid=rs("sessionid") deptid=rs("deptid") deptname="" topic=rs("topic") if deptid<>0 then psql2="select deptname from xlaALSdepts where deptid="&deptid set rs2=conn.execute(psql2) if not(rs2.eof) then deptname=rs2("deptname") rs2.close set rs2=nothing else topic="Proactive Chat : User was invited by rep." end if %> <%rs.movenext loop end if rs.close set rs=nothing conn.close set conn=nothing%>
Customer Department Topic Actions
<%=name%> <%=deptname%> <%=topic%> Accept - Busy