ASP 충격 디버그 클래스 (vbscript)

많은 친구들 이이 방법 "response.write"를 사용한 다음 관련 진술을 출력하여 올바른지 확인할 수 있다고 생각합니다. 며칠 전, 나는 약 7 ~ 8 개의 하위/기능을 포함하는 천선 페이지를 썼습니다. 디버깅 할 때 30 개 이상의 응답을 사용했습니다. 오 세상에, 디버깅 후,이 30 가지를 하나씩 삭제하십시오.

오늘 저는 ASP에서 디버그 클래스 (VBS)를 보았습니다. 나는 그것을 시도했다, 그것은 놀랍습니다!

사용 방법은 매우 간단합니다.

test.asp

코드 사본은 다음과 같습니다.

<!-#include file = "DebuggingConsole.asp"->

<%

출력 = "xxxx"

Debugstr = New DebuggingConsole을 설정하십시오

debugstr.enabled = true

Debugstr.print "매개 변수 출력의 값", 출력

'...

Debugstr.Draw

디버그 스트 = 아무것도 설정하지 않습니다

%>

=====================================================================================

디버깅 콘솔 .ASP

코드 사본은 다음과 같습니다.

<%

클래스 디버깅 콘솔

개인 DBG_ENABLED

개인 DBG_SHOW

개인 DBG_RequestTime

개인 DBG_FINISHTIME

개인 DBG_DATA

개인 DBG_DB_DATA

개인 DBG_ALLVARS

개인 DBG_SHOW_DEFAULT

개인 분할 (2)

'construktor => 기본값을 설정합니다

private sub class_initialize ()

dbg_requesttime = now ()

dbg_allvars = false

set dbg_data = server.createObject ( "scripting.dictionary")

divsets (0) = "<tr> <td style = 'cursor : hand;' onclick = "javaScript : if (document.getElementById ( 'data#sectname#'). style.display == 'none') {document.getElementByid ( 'data#sectname#'). style.display = 'block';} else.getElementById ( 'data##sectname#'; id = sect#sectname#style = ""font-weight : bold; cursor : 핸드; 배경 :#7ea5d7; 컬러 : 흰색; 패딩-오른쪽 : 4; 패딩-버트 톰 : 2; "">#제목#| onclick = ""window.event.cancelBubble = true; "> |#data#| </div> | "

divsets (1) = "<tr> <td> <div id = sect#sectname#style =" "font-weight : bold; cursor : hand; 배경; 배경 : 흰색; 패딩-왼이트 : 4; 패딩-오른쪽 : 4; 패딩-바닥 : 2;" ""Javascript : if (Document.GetElementById ( 'data#sectname#'). style.display == 'none') {document.getElementById ( 'data#sectname#'). style.display = 'block';} else.getElementById ( 'data#sectName#') id = data#sectname#style = ""커서 : 텍스트; 디스플레이 : 블로그; 배경 : #fffff; padding-left : 8; ""onclick = ""window.event.cancelBubble = true; ""</div> | </div> |.

divsets (2) = "<tr> <td> <div id = sect#sectname#style =" "배경 :#7ea5d7; 색상 : lightsteelblue; Padding-left : 4; Padding-right : 4; Padding-Bottom : 2;" ">###|#|#|#| Style = ""디스플레이 : 없음; 배경 : LightSteelBlue; 패딩 왼쪽 : 8 ""> |#data#| "

DBG_SHOW_DEFAULT = "0,0,0,0,0,0,0,0,0,0,0,0,0"

종료 서브

공공 재산 let enabled (bnewvalue) ''[bool] 설정 "활성화"를 true 또는 false로 설정