Moin Leutz...
Ich hoffe man kann mir bei meinem kleinen Prob helfen...
Ich möchte mit einem kleinen Tool die angeschlossenen USB geräte an der Fritzbox 7170 ermitteln.
Die Anfrage an die Box per UPNP klappt soweit auch. Bis auf das ich keine Ausgabe bekomme
Ich denke mal das der Code soweit Richtig ist. Normalerweise sollte es so laufen das wenn keine Geräte angeschlossen sind ja eigenetlich auch nix kommt.
Doch auch hier passiert nix.
Ich hoffe das es hier jemanden gibt der mir da weiterhelfen kann...
Greetz Deep
Ich hoffe man kann mir bei meinem kleinen Prob helfen...
Ich möchte mit einem kleinen Tool die angeschlossenen USB geräte an der Fritzbox 7170 ermitteln.
Die Anfrage an die Box per UPNP klappt soweit auch. Bis auf das ich keine Ausgabe bekomme
VB.NET-Quellcode
- Private Sub USBPlugListToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles USBPlugListToolStripMenuItem.Click
- 'Anzeige möglicher USB Geräte
- On Error GoTo 0
- Const cUDN = "uuid:75802409-bccb-40e7-8e6c-fa095ecce13e-00150CD7782E"
- Const cURN = "urn:any-com:serviceId:any1"
- Const cACTION = "GetInfo"
- Const cVARIABLE = "UsbPluglist"
- Dim oFindDevice As UPNPLib.UPnPDeviceFinder
- Dim oDevice As UPNPLib.UPnPDevice
- Dim oServices As UPNPLib.UPnPServices
- Dim oService As UPNPLib.UPnPService
- Dim vIn(0) As Object
- Dim vOut(0) As Object
- Dim sValue As String
- Dim iRet As Integer
- oFindDevice = New UPNPLib.UPnPDeviceFinder
- oDevice = oFindDevice.FindByUDN(cUDN)
- If Not oDevice Is Nothing Then
- oServices = oDevice.Services
- If Not oServices Is Nothing Then
- oService = oServices.Item(cURN)
- If Not oService Is Nothing Then
- oService.AddCallback(iRet)
- oService.InvokeAction(cACTION, vIn, vOut)
- System.Threading.Thread.Sleep(3000)
- sValue = oService.QueryStateVariable(cVARIABLE)
- Label3.Text = (sValue)
- If oService Is Nothing Then
- Label3.Text = "Keine Geräte erkannt"
- End If
- End If
- End If
- End If
- End Sub
Ich denke mal das der Code soweit Richtig ist. Normalerweise sollte es so laufen das wenn keine Geräte angeschlossen sind ja eigenetlich auch nix kommt.
Doch auch hier passiert nix.
Ich hoffe das es hier jemanden gibt der mir da weiterhelfen kann...
Greetz Deep