谁能帮我看看这段代码错在哪里，网站统计流量了，数据库已经建立

<%
  set conn=Server.CreateObject("ADODB.Connection")
conn.open"Provider=Microsoft.JET.OLEDB.4.0;Data Source="&server.mappath("../dataaccess/lccweb.mdb")&";Persist Security Info=false"
set rs=Server.CreateObject("ADODB.Recordset")
  if(Session("Guest")="") then
  Application.Lock
  if (application("Counter")="") then
  sql="select Max(counter) as C form tbcounter"
  Set rs=conn.Execute(sql)
  counter=rs("C")
  rs.close()
  Set rs=nothing
  else
  counter=Application("counter")
  end if
  counter=Cint(counter)+1
  sql="insert into tbcounter(counter) values("&counter&")"
  conn.Execute(sql)
  application("counter")=counter
  Session("Guest")=true
  Application.UnLock
  end if
  %>

想知道代码错哪里，学会使用：response.write。
sql="select Max(counter) as C from tbcounter"
response.write "<br>sql="&sql