% Dim mObject Dim Counter Dim UserOnLIne Set mObject = Server.CreateObject("eMotionCounter.cCounter") Counter = mObject.Counter(Application("AppName"), "WEBEL01\SQL") Set mObject = Nothing Session("UserOnLIne") = Application("UserOnLine") 'response.redirect ("http://weblive.emotionlab.it/_detect_plugin.asp?myweb=arredomarket&counter="&counter) %>
|
||||||||||||||