<%if allowtracking="" then response.end proactive=application("xlaALSproactive") ip=request.ServerVariables("REMOTE_ADDR") sessionid=getsessionid() if request("dontbother")<>"" then set conn=server.createobject("ADODB.Connection") conn.open connection call updatevisitoraction(ip,sessionid,5,"Do Not Disturb") conn.close set conn=nothing response.end end if lookfor="["&ip&"|"&sessionid&"]" found=instr(1,proactive,lookfor,1) if found>0 then found=found+len(lookfor) finalstr1=instr(found,proactive,"<#>") finalstr2=instr(found,proactive,vbcrlf) userid=mid(proactive,found,finalstr1-found) myinvitemsg=mid(proactive,finalstr1+3,finalstr2-found-4) proactive=replace(proactive,lookfor&userid&"<#>"&myinvitemsg&vbcrlf,"") application("xlaALSproactive")=proactive if myinvitemsg="" then myinvitemsg=invitemsg end if %> <%if userid<>"" then%> <%end if%>