권장 : ASP 간단한 텍스트 카운터 %set fs = createobject (scripting.filesystemobject) wfile = server.mappath () cgi-binwww.111cn.cn/asp/asp.html.txt on error resume a = fs.opentextFile (wfile) hits = clng (a.readline) hits = a.
아래 예제 자습서를 살펴 보겠습니다.
제출 된 페이지를 살펴 보겠습니다.
<form action = saveInfo.asp method = post>
<!-여기에서 당신의 필드->
<입력 유형 = 제출 값 = 제출>
</form>
데이터를 수신하고 저장하는 페이지를 살펴 보겠습니다.
<%
set fs = createobject (scripting.filesystemobject)
FolderPath = server.mappath () 및 /cgi-bin /messages143718
wcounter = folderPath &/counter.txt
set fs = createobject (scripting.filesystemobject)
fs.DODEREXISST (폴더 스팟)라면
a = fs.opentextfile (wcounter) 설정
hits = clng (a.readline)
적중 = 적중 + 1
A. 클로즈
또 다른
a = fs.createfolder (폴더 스팟) 설정
적중 = 1
끝 If
set a = fs.creatextfile (wcounter, true)
A.WriteLine (hits)
A. 클로즈
fs = 아무것도 설정하지 않습니다
set fs = createobject (scripting.filesystemobject)
a = fs.creatextfile (폴더 스팟 & & hits & .txt)을 설정하십시오.
request.form의 각 x에 대해
A.WriteLine (X & : & request.form (x))
다음
A. 클로즈
a = 아무것도 설정하지 않습니다
fs = 아무것도 설정하지 않습니다
%>
공유 : ASP 온라인 사용자 통계 코드 코드 테이블을 텍스트 파일로 복사하여 홈 디렉토리의 웹 사이트 (/global.asa)에 저장하십시오. 스크립트 언어 = vbscript runat = 서버 서브 애플리케이션 _onstart 응용 프로그램 (activevisitors) = 0 엔드 서브 서브 application _onend sub sevet_onstart application.lock ap