熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> .NET編程 >> 正文

asp 驗證組件是否安裝

2013-11-13 10:39:23  來源: .NET編程 

  作用驗證組件是否安裝
 參數組件名稱
 Public Function IsObjInstall(obj)
  Dim IsObj
  On Error Resume Next
  Set IsObj = ServerCreateObject(obj)
  if Err = then
    Rem IsObjInstall = "√"
     IsObjInstall = "True"
  else
    Rem IsObjInstall = "<span style=""color:#FF"">×</span>"
     IsObjInstall = "Flase"
  end If
  Set IsObj = Nothing
  If Err <> Then ErrClear
 End Function


From:http://tw.wingwit.com/Article/program/net/201311/14233.html
    推薦文章
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.