오류가 나는곳의 주소를 알려주시면 더 빠르고 정확하게 답변 받을 수 있습니다.

오류 주소 : www.daea.com

저는 홈페이지를 제작하는 asp에 대해서는 초보자입니다.
asp의 알고리즘을 제대로 이해하지 못하고 있는데, 클라이언트가 방문자카운트를 해 달라고 해서
main.asp에 한쪽구석에 레이어위에 방문자카운트가 들어가는 자리를 만들고 그곳에 카운트를 달려고 하였습
니다.
먼저 wwwroot폴더안에 global.asa파일과 visit.txt를 테오사이트에서 다운받아서 넣어 두고 홈페이지의 루트상
에서도 visit.txt를 복사하여 넣었습니다. 그리고 루트상에 index.asp와 main.asp를 만들어서 넣었습니다. 주소
가 바뀌지 않으려고 프라임창을 만들었습니다. 그런데 카운트가 올라 오지 않습니다.
어떻게 고쳐야 하는지 좀 가르쳐 주세요...

아래의 내용은 wwwroot에 넣어 둔 global.asa파일의 본문입니다.

global.asa

<SCRIPT LANGUAGE=VBscript RUNAT=Server>

Sub Application_OnStart
  strFname=Server.MapPath(".")+"http://www.daea.com/visit.txt" 
  'visit.txt가 있는 곳의 경로지정. 현재 global.asa 가 있는 디렉토리에 존재하는 visit.txt로 설정한다.
  Set objFile = Server.CreateObject("Scripting.FileSystemObject")
  Set out = objFile.OpenTextFile(strFname,1)
  Application("visit") = out.ReadLine      '텍스트 파일안에 있는 숫자를 읽어온다.
  Set out = nothing
  Set objFile = nothing
End Sub

Sub Application_OnEnd
  strFname=Server.MapPath(".")+"http://www.daea.com/visit.txt" 
  Set objFile = Server.CreateObject("Scripting.FileSystemObject")
  Set out = objFile.CreateTextFile(strFname, true)
  out.WriteLine(Application("visit"))      '텍스트 파일에 현재까지의 방문자의 총 수를 저장한다.
  Set out = nothing
  Set objFile = nothing
End Sub

Sub Session_OnStart
  strFname=Server.MapPath(".")+"http://www.daea.com/visit.txt" 

  Application.Lock
  Application("visit") = Application("visit") + 1
  Application.UnLock

  If Application("visit") MOD 5 =0 then
      Set objFile = Server.CreateObject("Scripting.FileSystemObject")
      Set out = objFile.CreateTextFile(strFname, true)
      Application.Lock
      out.WriteLine(Application("visit"))
      Application.UnLock
      Set out = nothing
      Set objFile = nothing
  End If
End Sub

</SCRIPT>


그리고 main.asp속에 레이어안에 들어 있는 코딩.

<%=Application("visit")%>


레이어속에 이렇게만 넣어 두었습니다.

왜 카운트가 나오지 않을까요?
제발 가르쳐 주세요...