asp 图形计数器

来源:百度知道 编辑:UC知道 时间:2024/06/04 04:00:07
好心人,帮帮忙吧。。。
先看一段代码,是书上的,不过我按照它的做法,不好用呀。。。。
----------------------------conn1.asp连接数据库---------------------<%
dim connstr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db_picture.mdb")
set cn=server.CreateObject("ADODB.Connection")
cn.open connstr
%>
------------------------counter1.asp数据库取值----------------------
<%
If(Session("Guest") = "")Then
Sql = "Select Max(Counter) as C from tb_picture"
Set rs = conn.Execute(Sql)
Counter = rs("C")
rs.Close
Set rs = Nothing
Counter = Cint(Counter)+1
looktime=now()
Sql = "Insert Into tb_picture (Counter,looktime) values('"&Counter&"','"&looktime&"')"
conn.Execute(Sql)
Session("Guest") = true
session("count")=Counter
End If
%>
---------------------

插入数据有问题 也就是说
Counter = Cint(Counter)+1
looktime=now()
Sql = "Insert Into tb_picture (Counter,looktime) values('"&Counter&"','"&looktime&"')"
conn.Execute(Sql)
这里面有问题,但是我又不知道你的表结构是怎么写的,你自己测试下
看看Counter,looktime 这两个值是否可以正常输出。
Sql = "Insert Into tb_picture (Counter,looktime) values('"&Counter&"','"&looktime&"')"
response.write sql
response.end()
自己断点测试下

没有提示在第几行吗?