지속적인 작동을 위해 시스템 구성 요소가 있는지 또는 구성 요소가 성공적으로 설치되었는지 확인하십시오. 사용자에게 더 나은 정보 지침을 제공합니다. 서버에 특정 ASP 구성 요소가 설치되어 있는지 확인하기 위해 더 일반적으로 사용되는 코드는 다음과 같습니다.
다음과 같이 코드 코드를 복사합니다.
<%
'기능: 시스템 구성요소가 존재하는지, 구성요소가 성공적으로 설치되었는지 확인
'매개변수: 구성 요소 이름
함수 IsObjInstalled(strClassString)
오류 발생 시 다음 재개
IsObjInstalled = 거짓
오류 = 0
DimxTestObj
xTestObj = Server.CreateObject(strClassString) 설정
0 = Err이면 IsObjInstalled = True
xTestObj = 없음 설정
오류 = 0
기능 종료
'시스템 구성 요소의 버전 번호를 가져옵니다.
함수 getver(Classstr)
오류 발생 시 다음 재개
getver=
오류 = 0
DimxTestObj
xTestObj = Server.CreateObject(Classstr) 설정
0 = Err이면 getver=xtestobj.version
xTestObj = 없음 설정
오류 = 0
기능 종료
%>
호출 방법은 다음과 같습니다.
다음과 같이 코드 코드를 복사합니다.
<%
IsObjInstalled(fso.file) =True인 경우
response.write(이미 설치됨)&getver(fso.file)
종료하면
%>