How to monitor the mms

All questions related to installations, configurations and maintenance of Advanced Host Monitor (including additional tools such as RMA for Windows, RMA Manager, Web Servie, RCC).
Post Reply
Stone_ll
Posts: 51
Joined: Sun Apr 27, 2008 9:23 pm

How to monitor the mms

Post by Stone_ll »

Currently I am looking for the method of monitoring MMS.
Such as mms://192.167.31.14/shtv
Can you give me a good one?
thanks .
KS-Soft
Posts: 13012
Joined: Wed Apr 03, 2002 6:00 pm
Location: USA
Contact:

Post by KS-Soft »

I think you may use TCP test to check TCP port 1755. This is the only option I see

Regards
Alex
Stone_ll
Posts: 51
Joined: Sun Apr 27, 2008 9:23 pm

Post by Stone_ll »

yes,I also think so.
But I want to monitor the vedio,the audio.^_^,I think that can not be monitored by test tools.
thank you all the same...
best wishes!
KS-Soft
Posts: 13012
Joined: Wed Apr 03, 2002 6:00 pm
Location: USA
Contact:

Post by KS-Soft »

But I want to monitor the vedio,the audio.^_^,I think that can not be monitored by test tools.
Sorry, HostMonitor cannot do that
hank you all the same...
best wishes!
Thank you :)

Regards
Alex
User avatar
greyhat64
Posts: 246
Joined: Fri Mar 14, 2008 9:10 am
Location: USA

Post by greyhat64 »

Stone II,
I don't know of any way to monitor the mms stream for audio or vidèo (why, if spelled correctly does vidèo show up as a dash - :x ), but I did stumble upon this on the MSDN site.
The simplest way to capture exposed WMI events is through the WMI scripting API. The following Visual Basic Scripting Edition (VBScript) example uses SwbemServices and SWbemSink to query for events and display event properties.

VBScript Example

' Declare objects.
Dim Server As WMSServer
Dim Services As SWbemServices
Dim WithEvents EventSink As SWbemSink
Dim strQuery As String

Private Sub Form_Load()
' Initialize server.
Set Server = CreateObject("WMSServer.Server")

' Create event sink.
Set EventSink = New SWbemSink

' Get services.
Set Services = GetObject( _
"winmgmts:{impersonationLevel=impersonate}!\\" _
& Server.Name & "\Root\cimv2")

' Set individual queries for each event class that you want to log.
strQuery = "select * from WMS_PublishingPoint_Event"
Services.ExecNotificationQueryAsync EventSink, strQuery

strQuery = "select * from WMS_Server_Event"
Services.ExecNotificationQueryAsync EventSink, strQuery

strQuery = "select * from WMS_Client_Event"
Services.ExecNotificationQueryAsync EventSink, strQuery

strQuery = "select * from WMS_LimitChanged_Event"
Services.ExecNotificationQueryAsync EventSink, strQuery

strQuery = "select * from WMS_LimitHit_Event"
Services.ExecNotificationQueryAsync EventSink, strQuery

strQuery = "select * from WMS_Plugin_Event"
Services.ExecNotificationQueryAsync EventSink, strQuery

strQuery = "select * from WMS_Cache_Event"
Services.ExecNotificationQueryAsync EventSink, strQuery

strQuery = "select * from WMS_Playlist_Event"
Services.ExecNotificationQueryAsync EventSink, strQuery
End Sub

Private Sub EventSink_OnObjectReady( _
ByVal objWbemObject As WbemScripting.ISWbemObject, _
ByVal objWbemAsyncContext As WbemScripting.ISWbemNamedValueSet)

' Catch event.
strEventText = objWbemObject.GetObjectText_
End Sub
I don't even know what this does, but I bet you can find more if you try! :D
Post Reply