Ниже будет показано как можно определить - установлен ли нужный ASP-компонент на сервере. Такая задача может возникнуть, например, при переносе ASP-приложения на сервер хостера, или для динамического определения в скрипте доступности того или иного компонента.
Файл check.asp:
< %@Language=VBScript%>
< %
option explicit
Response.Buffer = True
if checkObj("ASPTree.TreeMenu") then
Response.Write "1.Такой компонент доступен !
"
else
Response.Write "1.Такой компонент не доступен !
"
end if
if checkObj("Scripting.FileSystemObject") then
Response.Write "2.Такой компонент доступен !
"
else
Response.Write "2.Такой компонент не доступен !
"
end if
Function checkObj(progid)
Dim obj
On Error Resume Next
Set obj = Server.CreateObject(progid)
checkObj = (Err=0)
End Function
%>
О сайте
Постоянные ссылки
При копировании ссылка на TeaM RSN обязательна!
Оставить комментарий
Вы должны войти, чтобы оставить комментарий.