권장 : 객체가 릴리스되었는지 여부를 결정하는 방법 다음은 참조 된 내용입니다. < %dim conn '선언 세트 conn = server.createobject (adodb.connection)'생성 '사용 세트 conn = nothing'
| <% response.write (<head> <tyle> <!-Span {font-size : 9pt}-> </style> </head>) 다음에 오류가 재개됩니다 Dim Thisurl, Thistext thisURL = request (thisURL) '파일 주소 정의 (비 HTML 형식 문서)! thisurl =이면 response.write (<Span> 파일 주소를 먼저 입력하십시오! </span>) 응답. 엔드 끝 If 기능 objxmlhttp (xmlurl) 다음에 오류가 재개됩니다 set objxml = createobject (microsoft.xmlhttp) objxml.open get, xmlurl, false objxml.setRequestheader content-type, application/x-www-form-urlencoded objxml.send objxmlhttp = objxml.responsebody 그렇다면 err.clear response.write (<Span> 연결이 설정되지 않았거나 파일이 존재하지 않거나 네트워크 문제가 없습니다!; 오류 이유 : & err.Description &! </span>) 응답. 엔드 끝 If 엔드 기능 함수 BYTES2BSTR (VIN) strreturn = i = 1 대 Lenb (Vin)의 경우 thischarCode = ASCB (MIDB (Vin, I, 1)) 이 charcode <& h80 인 경우 strreturn = strreturn & chr (thischarcode) 또 다른 NextCharCode = ASCB (MIDB (VIN, I 1,1)) strreturn = strreturn & chr (clng (thischarcode) * & h100 cint (nextcharcode)) i = i 1 끝 If 다음 바이트 2bstr = strreturn 엔드 기능 thisurl2 = split (thisurl ,,) thisurl2의 각 II에 대해 thistext = bytes2bstr (objxmlhttp (ii)) IF IF DEST (thistext, <html>) <> 0 response.write (<Span> & ii & <b> × </b> </span> <br>) 또 다른 response.write (<Span> & ii & <b> √ </b> </span> <br>) 끝 If 다음 그렇다면 err.clear Response.write (<Span> 사고 종료!; 오류 이유 : & err.Description &! </span>) 응답. 엔드 끝 If %> |
공유 : IIS 가상 호스트 웹 사이트 반 트로이 허가 설정 및 보안 구성 정렬 나는 인터넷에서 많은 보안 설정을 언급했으며 혼자서 몇 가지 관행을 수행했습니다. 이러한 보안 설정 기사를 작성했습니다. 모든 사람에게 도움이되기를 바랍니다. 또한 단점이 있으면 조언을 한 다음 보충하십시오. 감사합니다! 1. 시스템