Winsock Orcas Problem

  • VB.NET

    Winsock Orcas Problem

    Hallo

    ich habe den Winsock Orcas Server laufen und wollte beim Empfang prüfen ob es sich um ein File handelt.
    Das ganze Projekt habe ich HIER geladen

    VB.NET-Quellcode

    1. Private Sub _wsks_DataArrival(ByVal sender As Object, ByVal e As Winsock_Orcas.WinsockDataArrivalEventArgs) Handles _wsks.DataArrival
    2. Dim gid As Guid = _wsks.findGID(CType(sender, Winsock_Orcas.Winsock))
    3. Dim usr As User = CType(_users(gid), User)
    4. Dim obj As Object = _wsks.Item(gid).Get()
    5. Dim s As String = CStr(obj)
    6. Dim dp As New DataPacket(s)
    7. If obj.GetType() Is GetType(Winsock_Orcas.WinsockFileData) Then
    8. MsgBox("file")
    9. end if
    10. end sub


    Bei der Zeile

    VB.NET-Quellcode

    1. If obj.GetType() Is GetType(Winsock_Orcas.WinsockFileData) Then
    2. MsgBox("file")
    3. end if



    bekomme ich bem Senden einer Datei den Fehler

    VB.NET-Quellcode

    1. Ein Aufrufziel hat einen Ausnahmefehler verursacht.

    Wie kann ich den Filempfang ermöglichen?


    in der Singel Demo von Orcas ist der Dateiempfang möglich, leider hat der Server nicht die Funktionen die ich möchte.

    MfG
    Haufe
    ähh? wasn das :)