一个简单的计数器问题
xzjxu 2005-10-27 04:53:03 下列是asp代码:
<%
id=Request.QueryString("id")
if trim(id)<>EMPTY then
set conn=server.createobject("adodb.connection")
'conn.Open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath("count.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("count.mdb")
set rs=server.createobject("adodb.recordset")
Application.Lock '将对象锁定
SQLcmd = "select * from count where id='" & trim(id) & "'"
set rs=conn.Execute(SQLcmd)
if not rs.EOF then
dir=trim(rs("dir"))
k=rs("len")
count=rs("count")+1
SQLcmd1 = "update count set count=count+1"
conn.Execute SQLcmd1
conn.close
x = right(string(k,"0") & CStr(count),k)
%>
<% For i = 1 To Len(x)%><img border="0" src="<%=dir%>/<%=mid(x,i,1)%>.bmp"><%Next%>
<% end if
Application.UnLock '将对象解除锁定
end if
%>
问题是如何将此计数器插入html网页???
如下插入代码不工作:
<script src="xxxx.asp?id=xxx"></script>