다음을 통해 공유

연결 상태를 표시하는 방법

  • 아티클

연결의 상태 검색하는 것은 WMI를 사용하여 수행할 수 있는 일반적인 작업입니다.

연결의 상태 표시하려면

  1. 매개 변수에 모니커가 있는 GetObject 를 사용하여 네임스페이스에 연결합니다.

  2. ExecQuery를 사용하여 MsSnaStatus_Connections 열거합니다.

  3. 필요한 경우 오류 코드를 표시합니다.

    다음 예제에서는 HIS(Host Integration Server)에 정의된 모든 연결의 상태 표시하는 방법을 보여 줍니다.

Private Function DisplayConnectionStatus ()  
'Variables  
   Dim objWMIService, colItems, iCounter, objItem, _  
       strReport  
'Connect to the namespace  
   Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\microsofthis")  
'Enumerate the Class  
   Set colItems = objWMIService.ExecQuery("Select * from MSSnaStatus_Connection")  
   iCounter = colItems.Count  
   if Err.Number = 0 then  
      For Each objItem in colItems  
         strReport = "Connection " & objItem.Name & " status is " & objItem.StatusText     
         Wscript.Echo strReport  
         strReport = ""        
      Next  
   else  
      Wscript.Echo "An error occurred enumerating instances for status " & Err.Number & " " & Err.Description  
   End If  
   DisplayConnectionStatus = true  
End Function