ASP调用函数

来源:百度知道 编辑:UC知道 时间:2024/05/19 12:19:44
我想实现图片点击,但着段代码自动UPDATA,怎么能够点饥图片再执行这段代码,我的意思是怎么做调用函数啊.具体步骤,以为我什么都不会啊
<%
set conn=server.CreateObject("adodb.connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("data.mdb")
set rs=server.CreateObject("adodb.recordset")
sql="select 访问次数 from 计数器"
rs.open sql,conn,1,3
if rs.eof then
rs.addnew
rs("访问次数")=1
else
rs("访问次数")=rs("访问次数")+1 '每次自动加1
end if
rs.update
set rs=nothing
conn.close
set conn=nothing
%>

<%
if request.querystring("yanzi") = 1 then
set conn=server.CreateObject("adodb.connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("data.mdb")
set rs=server.CreateObject("adodb.recordset")
sql="select 访问次数 from 计数器"
rs.open sql,conn,1,3
if rs.eof then
rs.addnew
rs("访问次数")=1
else
rs("访问次数")=rs("访问次数")+1 '每次自动加1
end if
rs.update
set rs=nothing
conn.close
set conn=nothing
end if
%>
<a href="?yanzi=1"><img src="https://gss0.bdstatic.com/70cFsjip0QIZ8tyhnq/img/logo-zhidao.gif" /></a>

这样就可以了~~~~~~~~