各位大侠：
      小弟求解读计算机程序   尤其是红色部分 小弟先谢谢了
<%
  function counts(counterfile)
   dim objfso,objts
   application.lock
   set objfso=server.createobject("scripting.filesystemobject")
   set objts=objfso.opentextfile(server.mappath(counterfile),1,true)
  if not objts.atendofstream then
   counts=clng(objts.readline)
  end if
  counts=counts+1
  objts.close
  set objts=objfso.opentextfile(server.mappath(counterfile),2,true)
  objts.writeline(counts)
  objts.close
   application.unlock
  end function
%>

小弟跪求

if not objts.atendofstream then
   counts=clng(objts.readline)
  end if
  counts=counts+1
这段代码意思是当不是文件尾的话执行counts=clng(objts.readline)为什么这么写

谢谢dzt0001，小弟刚接触asp，以后请多多指教

哦 明白了 小弟把end if 看做成了 elseif了  谢谢