|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。online.asp文件
以下为援用的内容:
<!--#includefile="dbconn.asp"-->
<%
onlineTimeout=10界说在线举动工夫的工夫距离
FunctionUserip()
GetClientIP=Request.ServerVariables("HTTP_X_FORWARDED_FOR")取得用户的假造IP地点
IfGetClientIP=""orisnull(GetClientIP)orisempty(GetClientIP)Then
GetClientIP=Request.ServerVariables("REMOTE_ADDR")假如未利用代办署理服务器,就取得来历的IP地点
EndIf
Userip=GetClientIP
EndFunction
sql="selecto_idfromc_onlinewhereo_ip="&Userip()&""在数据库中查找所取得的IP地点的id
Setrs=conn.execute(sql)
Ifrs.eofandrs.bofThen
sql="insertintoc_online(o_ip)values("&Userip()&")"假如数据库中没有就标明是新IP,那末拔出操纵
conn.execute(sql)
Else
sql="updatec_onlineseto_ltime=now()whereo_ip="&Userip()&""更数据库确当前工夫
conn.execute(sql)
EndIf
sql="deletefromc_onlinewheredateadd(s,"&onlineTimeout*60&",o_ltime)<now()"界说非常钟革新
conn.execute(sql)
rs.close
Setrs=nothing
Functionallonline()
tmprs=conn.execute("Selectcount(o_id)fromc_online")
allonline=tmprs(0)
settmprs=nothing
endFunction
%>
<%Response.Write"document.write(""在线"&allonline()&"人"")"%>
对于中小型web应用来说,php有很强的竞争力,linux+apache+mysql+php(lamp)的组合几乎可以胜任绝大多数网站的解决方案,对于大型应用来讲,对于系统架构要求更高,需要有成熟的框架支持,jsp的struts是个不错的框架,国内介绍它的资料也非常多,应用逐渐广泛起来。asp就不用说了, |
|