 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
<SCRIPT LANGUAGE=VBScript RUNAT=Server> sub Application_OnStart Application("conn")="dsn=;uid=;pwd=" end sub Sub session_onstart session("ip")=Request.ServerVariables("REMOTE_ADDR") session("stime")=now() application.Lock if application("clicks")="" then application("clicks")=0 end if application("clicks")=application("clicks")+1 application.UnLock End Sub Sub Session_Onend application.Lock StrSQL="dsn=;uid=;pwd=" set conn=server.createobject("ADODB.CONNECTION") conn.open StrSQL SQL = "insert into client(c_date,stime,etime,ip) values(\\\'"&date()&"\\\',\\\'"&_ session("stime")&"\\\',\\\'"&now()&"\\\',\\\'"&session("ip")&"\\\')" conn.Execute(sql) conn.Close set conn=nothing application.UnLock End Sub 返回类别: 教程 上一教程: ASP 3.0高级编程(三十四) 下一教程: ASP 3.0高级编程(十八) 您可以阅读与"取得浏览者的离开时间"相关的教程: · 判定访问者的浏览器是否支持JAVASCRIPT和COOKIES · 无刷新随时取得当前服务器时间用户登陆时间，在线时间，空闲时间并自动退出的例子 · 计算两个时间的差的函数 · 浏览器性能组件 · 用ASP统计用户在站点的停留时间(2) |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
