|
|||
KONTOPRUEF-Navigation: |
Einbindung von KONTOPRUEF-ONLINE in Visual StudioIm folgenden Beispiel wird am Beispiel von Visual Basic Schritt für Schritt gezeigt, wie Sie KONTOPRUEF-ONLINE in Ihre eigene Anwendung integrieren können. Ein fertiges Beispielprojekt, geschrieben in Visual Basic 2013, können Sie HIER herunterladen.
1. Erstellen der BenutzeroberflächeDiesen Schritt können Sie natürlich überspringen, falls Sie selbst bereits eine fertige Anwendungssoftware haben. Er dient lediglich zum Erstellen einer kleinen Demo-Anwendung mit Eingabe- und Antwortfeldern. Starten Sie VB.NET und legen Sie ein neues Projekt an, hier z.B. KtoPruefOnline. Der Anfangsbildschirm sieht dann wie folgt aus: Legen Sie nun sechs Label bzw. TextBox und einen Button auf das Formular. Die sechs Label-/TextBox-Kombinationen benennen Sie wie folgt:
Benennen Sie der Übersichtlichkeit halber die Elemente entsprechend, also z.B. LabelBlz, TextBoxKto, LabelResult, TextBoxResulttext etc. Bei den unteren vier Feldern sollten Sie die Eigenschaft ReadOnly auf True setzen. Im Formular selbst stellen Sie die Eigenschaft AcceptButton auf ButtonPruefen um. Ihr Formular sollte dann in etwa wie folgt aussehen: 2. Import der KONTOPRUEF-SchnittstelleWählen Sie im Projektmappen-Explorer das Projekt aus (hier KtoPruefOnline), klicken Sie die rechte Maustaste für das Kontextmenü und wählen Sie dort Webverweis hinzufügen aus: Geben Sie in die Zeile URL die Adresse http://webservices.hanft.de/wsdl/IKtoPruef ein und klicken Sie auf Gehe zu: Sie erhalten dann die Beschreibung des WebServices: Klicken Sie auf Verweis hinzufügen: de.hanft.webservices ist nun als Webverweis im Projektmappen-Explorer eingetragen: 3. Aufruf der KONTOPRUEF-SchnittstelleZeigen Sie das Formular der Anwendung an und doppelklicken Sie auf den Prüfen-Button. Sie sehen Ihren Programmcode wie folgt: Schreiben Sie zwischen Private Sub und End Sub folgenden Programmcode: Dim myKtoPruef As New de.hanft.webservices.IKtoPruefservice Dim myResult As Integer Dim myResulttext As String = "" Dim myBankname As String = "" Dim myNewBlz As String = "" Dim myIban As String = "" Dim myBic As String = "" myResult = myKtoPruef.TestBlzKto("demo", "demo", TextBoxBlz.Text, TextBoxKto.Text, "DE", 0, "", _ myResulttext, myBankname, myNewBlz, myIban, myBic) TextBoxResult.Text = myResult.ToString TextBoxResulttext.Text = myResulttext TextBoxBankname.Text = myBankname TextBoxNewBlz.Text = myNewBlz Falls Sie schon Zugangsdaten zum Prüfserver erhalten haben, tragen Sie natürlich diese statt demo in den obigen Programmcode ein (zuerst Benutzername, dann Kennwort). Sie werden beim Tippen von VisualStudio mit Code-Ergänzungs-Vorschlägen unterstützt. Klicken Sie abschließend Erstellen / KtoPruefOnline erstellen. Sie sollten keine Fehlermeldungen und/oder Warnungen erhalten. 4. Testen des ProgrammsStarten Sie das Programm mit der F5-Taste (oder das EXE aus dem Explorer). Was Sie nun testen können, hängt davon ab, ob Sie (wie oben angegeben) demo als Zugangsdaten verwenden oder bereits "echte" Zugangsdaten eingetragen haben:
5. Anmerkungen
|
||
|