[TUT] Sicheren Chat in VB.NET erstellen

EDIT: Sehe es wurde schon geposted :/ bitte schlie�t es jemand

[Only registered and activated users can see links. Click Here To Register...]

Hier habe ich mal eine einfache Chat API f�r .NET Programme. Wenn du zum Beispiel eine Art Chat bzw. Shoutbox in dein VB.NET oder C# Program einbauen willst, kannst du diese einfach zu benutzende API verwenden. Im folgenden wird dir die Klasse vorgestellt und gezeigt, wie sie verwendet wird.

Vorbereitungen:
Damit der Chat funktioniert, ben�tigst du zuerst einen FTP und eine PHP Datei, die du auf den FTP hochladen musst. Die PHP - Datei findest du im Anhang. Einen FTP bekommst du zum Beispiel auf funpic.de. Einfach registrieren und FTP Daten notieren und dann mit zum beispiel FileZilla hochladen. F�r das Tutorial musst du dir dann nur noch notieren, wo du die PHP Datei hochgeladen hast. Dann kann es auch schon losgehen.

Anleitung f�r VB.NET:

Spoiler

Ladet euch zun�chst das .rar Archiv aus dem Anhang herunter. Entpackt es anschlie�end. Ihr findet lediglich eine DLL und die oben erw�hnte PHP - Datei vor. �ffnet nun MS Visual Basic 2010 und erstellt ein neues WindowsForm - Projekt. Erstellt nun drei TextBoxes und einen Button. Dabei wird in der TextBox1 die Nachrichten der User ausgegeben. In der Textbox2 soll dein Nachrichten-Text eingegeben werden und in der TextBox3 soll der Nickname gew�hlt werden k�nnen. Bei TextBox1 solltet ihr unter Eigenschaften 'ReadOnly' und 'MultiLine' auf 'true' stellen und eine vertikale Scrollbar hinzuf�gen. Nach einem Druck auf dem Button soll die Nachricht gesendet werden.
So als n�chstes m�sst ihr die Chat-Klasse aus der Dll eurem Projekt hinzuf�gen. Klickt dazu im Projektmappenexplorer doppelt auf das Item 'My Project'. Klickt nun auf 'Verweise' und dann auf 'Hinzuf�gen'. W�hlt anschlie�end 'Durchsuchen' und sucht nach der Dll, die ihr am Anfang runtergeladen habt. W�hlt sie aus und dr�ckt auf 'Ok'. Nun k�nnen wir anfangen zu programmieren.

Als erstes m�ssen wir den Namespace der Chat-Klasse importieren. Dieser lautet "chatLib":

Code:

Imports chatLib


Public Class Form1

End Class

Als n�chstes deklarieren wir ein Objekt der Klasse 'PHPChatClient'. Diese Klasse regelt den gesamten Chatablauf:

Code:

Imports chatLib


Public Class Form1
    Private myChat As PHPChatClient

End Class

Als n�chstes wird das Objekt im Konstruktor der Form erstellt:

Code:

Imports chatLib


Public Class Form1
    Private myChat As PHPChatClient

    Sub New()
        InitializeComponent()
        myChat = New PHPChatClient("http://test.te.funpic.de/", TextBox3, TextBox1, TextBox2, Me)
    End Sub
End Class

Der erste Parameter ist die Adresse des Verzeichnisses, an der die PHP - Datei liegt. Ich habe die PHP - Datei in diesem Beispiel in das root Verzeichniss hochgeladen, also "http://test.te.funpic.de". Ihr m�sst nat�rlich den Link mit dem Verzeichniss eurer PHP-Datei ersetzen. Der zweite Parameter ist die TextBox, die den Nickname beinhaltet. Der dritte Parameter ist die Textbox, die die Nachrichten anzeigen soll. Der vierte Parameter ist die Textbox, die die Eingabe des Users beinhaltet. Und der letzte Parameter ist unsere Form, in der der Chat angezeigt werden soll.
Nachdem das Chat-Objekt erstellt wurde, m�ssen wir ihn starten, damit er die Nachrichten empfangen kann:

Code:

Imports chatLib


Public Class Form1
    Private myChat As PHPChatClient

    Sub New()
        InitializeComponent()
        myChat = New PHPChatClient("http://test.te.funpic.de/", TextBox3, TextBox1, TextBox2, Me)
        myChat.StartReceiving(4000)
    End Sub

End Class

Um den Chat zu startet rufen wir also einfach die 'StartReceiving()' Funktion auf. Der Parameter gibt den Intervall in millisekunden an, nach dem sich der Chat refreshed. In dem Beispiel also alle 4Sekunden.
Um einen Text zu senden m�ssen wir lediglich die 'SendMessage()' Funktion aufrufen. Das machen wir am besten, wenn der Senden-Button gedr�ckt wurde:

Code:

Imports chatLib


Public Class Form1
    Private myChat As PHPChatClient

    Sub New()
        InitializeComponent()
        myChat = New PHPChatClient("http://test.te.funpic.de/", TextBox3, TextBox1, TextBox2, Me)
        myChat.StartReceiving(4000)
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim str As [String] = myChat.SendMessage()
        If str IsNot Nothing Then
            TextBox1.Text = str
        End If
    End Sub
End Class

Die Funktion 'SendMessage()' gibt einen String mit dem neuen Inhalt der Ausgabe-TextBox zur�ck, sodass wir diese auch refreshen k�nnen. Jedoch m�ssen wir davor pr�fen, ob der String �berhaupt einen Wert erh�lt. Konnte die 'SendMessage()' Funktion nicht richtig ausgef�hrt werden, gibt sie n�mlich Nothing zur�ck.

Damit w�re der Chat eigentlich schon fertig. Bis auf das Aufr�umen. Es ist essentiell, dass am Schluss ordnungsmgem�� aufger�umt wird, sonst kann das Programm unter Umst�nden nicht richtig beendet werden. Zum Aufr�umen muss einfach folgende Funktion hinzugef�gt werden:

Code:

Protected Overrides Sub OnClosing(e As System.ComponentModel.CancelEventArgs)
	myChat.Dispose()
	myChat = Nothing
	GC.Collect()
End Sub

Damit sieht der vollst�ndige Code so aus:

Code:

Imports chatLib


Public Class Form1
    Private myChat As PHPChatClient

    Sub New()
        InitializeComponent()
        myChat = New PHPChatClient("http://test.te.funpic.de/", TextBox3, TextBox1, TextBox2, Me)
        myChat.StartReceiving(4000)
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim str As [String] = myChat.SendMessage()
        If str IsNot Nothing Then
            TextBox1.Text = str
        End If
    End Sub

    Protected Overrides Sub OnClosing(ByVal e As System.ComponentModel.CancelEventArgs)
        Me.myChat.Dispose()
        Me.myChat = Nothing
        GC.Collect()
    End Sub
End Class

Anleitung f�r C#:

Spoiler

Download: [Only registered and activated users can see links. Click Here To Register...]
VirusTotal: [Only registered and activated users can see links. Click Here To Register...]

Credits:
OpenSource