go.asp

燃点真情的WAP整站程序,WAP建站系统,,更多WAP源码再登陆http://xywap.cn

<!--#include file="Head.asp"-->
<!--#include file="Ip.asp"-->
<%
'============================================================
' Copyright 2007-09 燃点真情. All Rights Reserved.
' Last Update: 2007-12-16  13:28
' E-Mail: [e-mail]  QQ:531233814
'============================================================
%>
<!--#include file="Config.asp"-->
<% dim Rs,Sql,id
ID=cint(request.QueryString("ID"))
set Rs=Server.CreateObject("ADODB.Recordset")
Sql="select [ID],[in],[time] from [link] Where ID="&ID
Rs.open Sql,conn,1,3
Rs("in")=Rs("in")+1
Rs("time")=now()
Rs.update()
%>
<card id='card1' title='正在进入' ontimer='/index.asp'><timer value='5'/>
<p>欢迎您访问本站所有服务完全免费!如果你觉得本站不错，请加为书签！谢谢你的支持！</p>
</card></wml>
<%call ALLClose()%>