Kategorie: VB.NET

.Net Framework-Unterstützung von TLS 1.2

Posted on by Chef vom Dienst

Ich habe vor ein paar Jahren ein kleines Tool programmiert. In diesem wurde eine Webschnittstelle abgefragt. Bei einer Aktualisierung wurde nun die interne Schnittstelle ebenfalls auf TLS1.2 umgestellt.

Das .Net Framework unterstützt unterschiedlich das Protokoll:

  • .Net Framework 3.5: Keine direkte Unterstützung von TLS 1.2
    Über KB3156421 vom 10. Mai 2016 wird diese in Windows 10 implementiert
  • .Net Framework 4.0: Keine native Unterstützung von TLS 1.2
    Wenn der Client allerdings .Net Framework 4.5 installiert hat, kann TLS 1.2 angesteuert werden:

    ServicePointManager.SecurityProtocol = (SecurityProtocolType)3072;
  • .Net Framework 4.5: Native Unterstützung von TLS 1.2
    Das Protokoll ist allerdings nicht als Standard gesetzt:

    ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12
  • .Net Framework 4.6: Native Unterstützung und Standard-Protokoll von TLS 1.2

Genauere Informationen gibt es in diesem Artikel.

XmlTextreader und DataGridView – Verarbeitung von XML in Tabellenform

Posted on by Chef vom Dienst

Ich habe mich in den letzten 2 Tagen mal wieder etwas mit Programmierung beschäftigt. Dabei wollte ich eine XML-Datei in ein DataGridView importieren. Dabei bin ich auf 3 Themen gestoßen die ich hier gerne dokumentiere.

XmlTextReader und Umlaute:
Der XmlTextReader benötigt in der XML-Datei die Enconding-Information, damit Umlaute eingelesen und dargestellt werden.

encoding="iso-8859-1

Spalten können anhand der Überschriften sortiert werden:
Bei mir habe ich eine vordefinierte XML-Datei. Die Aufteilung der Spalten war für meine Funktion nicht sinnvoll. Entsprechend möchte ich diese in der Darstellung anpassen.

DataGridView1.Columns("TitelA").DisplayIndex = 0
DataGridView1.Columns("TitelC").DisplayIndex = 1
DataGridView1.Columns("TitelB").DisplayIndex = 2

Angeklinkter Wert im DataGridView soll weiterverarbeitet werden:
Ich möchte in meinem Tool den ausgewählten Wert der DataGridView weiter verarbeiten.
Dazu habe lasse ich den Wert in diesem Beispiel in eine Textbox ausgeben

Private Sub DataGridView1_CellClick(sender As Object, e As DataGridViewCellEventArgs) Handles DataGridView1.CellClick
        TextBox1.Text = ""
        TextBox1.Text = DataGridView1.CurrentCell.Value.ToString
End Sub

Ich habe bewusst den Aufruf „DataGridView1_CellClick“ gewählt.
Mit dem der Funktion „DataGridView1_CellContentClick“ muss man neben der Zelle auch der Text angeklickt werden.

Wenn man neben der Wert auf direkt eine Weiterverarbeitung im Ablauf starten möchte kann auch die Funktion „DataGridView1_CellDoubleClick“ sinnvoll sein.

Man sollte das Attribut „MultiSelect“ der DataGridView auf „False“ setzen. Damit wird der korrekte Wert übernommen.

MS Office 2013 wechselt in den Extended Support

Posted on by Chef vom Dienst

Zum 10. April 2018 wechseln die Applikationen der Microsoft Office 2013-Suite in den Extended Support. Der Extended Support läuft mindestens 5 Jahre und enthält kostenlose Sicherheitsupdates sowie kostenpflichtige, nicht sicherheitsrelevante Updates und kostenpflichtigen Support. Microsoft nimmt während der erweiterten Support-Phase keine Anforderungen nach Entwurfsänderungen oder neuen Features entgegen.

Des Weiteren entfällt zu diesem Datum der Support für die Produkte des Visual Studio 2008 inklusive der Express Version.

Einfache ODBC-Datenanzeige in DataGrid per Visual Basic

Posted on by Chef vom Dienst

Für ein größeres Projekt musste ich testen, wie einfach ich Abfragen an eine ODBC-Datenbank erstellen kann. Dabei ist bei der „Fingerübung“ der folgende Code entstanden

Dim str As String = "DSN=ODBC−ConName;uid="loginsuser";pwd="loginpassword";"
Dim con As New OdbcConnection(str)
Dim com As String = "Select Name, Domain from dbo.Clients"
Dim Adpt As New OdbcDataAdapter(com, con)
Dim ds As New DataSet()
Adpt.Fill(ds)
DataGridView1.DataSource = ds.Tables(0)

Es müssen die Verbindungsdaten definiert werden. Diese können natürlich auch per Comboboxen oder Textboxen ersetzt werden, damit die Ausführung unter den jeweiligen Benutzerdaten des indiviuellen Anwenders ausgeführt werden. In diesem Fallbeispiel wird die Tabelle „dbo.Clients“ mit den Spalten „Name“ & „Domain“ abgefragt.

Dieser Aufruf dient einfach nur zur Anzeige. Man sollte nur überlegen, in wie weit man über das DataGrid auch Änderungen vornehmen soll. Ansonsten wäre es die sicherere Alternative dieses über die Eigenschaften des Objektes zu verbieten.

VB.NET: Mehrere Zeilen kommentieren

Posted on by Chef vom Dienst

Um Tests durchzuführen, warum gewisse Programmteile nicht so funktionieren wie gewünscht oder weil ein Programmcode einige Zeilen Kommentierung erfordern, kann es hilfreich sein, diese nicht einzeln mit einem ‚ (Auslassungszeichen oder auch Hochkomma genannt) versehen zu müssen.

Dieses lässt sich mit einer Tastenkombination nach der Markierung der erforderlichen Zeilen recht einfach umsetzen:

STRG+K+C

Natürlich kann man dieses auch rückgängig machen:

STRG+K+U

Entsprechend werden die markierten Zeilen mit dem erforderlichen Zeichen versorgt.

Selbstverständlich ist dieses auch nach der Markierung der Zeilen per Menü möglich:

Bearbeiten – Erweitert – Auswahl kommentieren

Bearbeiten – Erweitert – Auskommentierung der Auswahl aufheben

Umrechnung von Bytes in größere Einheiten

Posted on by Chef vom Dienst

Bei einigen Auswertungen oder Abfragen per Visual Basic oder anderen Skriptsprachen erhält man Datengrößen in Bytes.
Nun werden diese Zahlen zuweilen sehr lang, so dass man diese zur vernünftigen Darstellung umrechnen sollte.
Dabei soll folgende Umrechnungstabelle unterstützen:

  • 1 KiloByte sind 1024 Bytes
  • 1 MegaByte sind 1048576 Bytes
  • 1 GigaByte sind 1073741824 Bytes
  • 1 TerraByte sind 10995116277776 Bytes

Entsprechend mit diesen Angaben können die Werte in die erforderlichen Größeneinheiten umgerechnet werden.