Ниже будет показано как можно определить - установлен ли нужный 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 обязательна!
Оставить комментарий
Вы должны войти, чтобы оставить комментарий.