Einfache ODBC-Datenanzeige in DataGrid per Visual Basic

Posted on By Daniel Lensing Keine Kommentare zu Einfache ODBC-Datenanzeige in DataGrid per Visual Basic

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

Programmstart mit anderen Benutzerdaten per AutoIT

Posted on By Daniel Lensing Keine Kommentare zu Programmstart mit anderen Benutzerdaten per AutoIT

Im Rahmen von Projekten oder auch im Alltag gibt es Situationen, wo es Sinn machen kann, dass ein Anwender mit anderen Benutzerdaten eine Authentifizierung machen kann. In diesem kleinen Beispiel wird der „Druckdienst“ gestoppt und das System nach spĂ€testens 60 Sekunden durchgestartet werden.

#include <MsgBoxConstants.au3>
#include <Process.au3>
 
RunAsWait( "user_stopservice", "domain.local", "securePassword", 0, @ComSpec & " /c " & 'net stop spooler', "", @SW_HIDE)
MsgBox($MB_SYSTEMMODAL, "Neustart erforderlich", "Ein Neustart wird in 60 Sekunden durchgefĂŒhrt.", 60)
shutdown(6)

Somit kann man fĂŒr kleine Themen einen Anwender mit erweiterten Berechtigungen ausstatten ohne im gleichen Atemzug ihm weitreichende Berechtigungen im System zu vergeben. Dieser Ansatz kann zum Beispiel auch fĂŒr Installationen von Software oder andere Routinen verwendet werden.
Durch den Befehl „RunAsWait“ wird auf die AusfĂŒhrung des Skriptes gewartet, was einen sicheren Übergang bei mehreren Zeilen Programmaufrufen gewĂ€hrleistet.

AutoIT

WDR sendet keine Mittelwelle 720 & 774 mehr aus

Posted on By Daniel Lensing Keine Kommentare zu WDR sendet keine Mittelwelle 720 & 774 mehr aus

Wer bereits einmal in NRW im Stau gestanden hat und vielleicht auch noch zu Ferienbeginn oder Ferienende kennt die „Drohung“ der Moderatoren von WDR2 aus den Lautsprechern „Staus und stockender Verkehr ab 6 Kilometer LĂ€nge“ oder so Ă€hnlich. Dieses verband man meistens mit der Ansage nach der benannten AufzĂ€hlung „Alle Staus können Sie empfangen ĂŒber die Mittelwellenfrequenzen 720 und 774 KHz“.

Diese Ära ist heute Nacht um 2 Uhr zu Ende gegangen. Nach 88 Jahren wurde der Betrieb des Senders Langenberg (MW 720 KHz) eingestellt und auch der Sender Bonn (774 KHz) ist heute Nacht kurz nach 2 Uhr abgeschaltet worden. Entsprechend des Standortes empfĂ€ngt man nun andere auslĂ€ndische Programme, welche mit Ihren Sendeanlagen bis ins Empfangsgebiet reichen.

Als ich dieses heute Morgen vernahm, musste ich doch kurz schlucken, da ich diese Sender immer mal wieder in Staus genutzt habe. Auch der Schlusssatz zu den alltÀglichen Staumeldungen war schon ein vertrauter Begleiter. Das Angebot der Sender wie die Ansage der Verkehrslage sind in das Digitalradio DAB+ (VERA) verlagert worden, was mir persönlich allerdings bei meinem Autoradio leider nicht hilft.

Weitere Informationen: hier

Audio

Paul Temple und der Fall Gregory (WDR 5 Hörspiel spezial)

Posted on By Daniel Lensing Keine Kommentare zu Paul Temple und der Fall Gregory (WDR 5 Hörspiel spezial)

Der folgende Podcastbeitrag hat mir heute den Nachmittag sehr verschönert. Man sollte sich nur nicht von der LÀnge abschrecken lassen

Wiederauferstehung eines Krimi-Mythos: Der verschollene erste Temple-Fall „Gregory“ von Francis Durbridge in einer starbesetzten BĂŒhnen-Inszenierung im WDR-Funkhaus. Mit dem WDR Funkhaus-Orchester, Anke Engelke, Janina Sachau, Alexis Kara, Kai Magnus Sting und Bastian Pastewka als Paul Temple!

Empfehlung: Aufgrund der Live-Aufnahme sollte man sich sehr auf das Hörspiel einlassen und auch die kleinen und feinen Nuance hören.
Ein StĂŒck fĂŒr einen ruhigen Nachmittag oder Abend und nicht zum nebenbei hören.

Podcast-Folge: hier
Ausstrahlungstermin: 05.04.2015
SendelÀnge: 02:35:53

Audio

DHCP-Usergruppen fehlen auf Win2K12-Server

Posted on By Daniel Lensing Keine Kommentare zu DHCP-Usergruppen fehlen auf Win2K12-Server

Nach einer Installation der Rolle auf einem Windows Server 2012 sowie Windows Server 2012 R2 fehlen die Benutzergruppen „DHCP-Benutzer“ sowie „DHCP-Administratoren“ auf dem lokalen Computer-System.

Wenn man es, von Ă€lteren Betriebssystemen, gewohnt ist die Authorisation in der DomĂ€ne ĂŒber die DHCP-Konsole durchzufĂŒhren fĂ€llt dieses direkt erst einmal gar nicht unbedingt auf. Man bekommt zwar die Meldung, dass noch TĂ€tigkeiten zur VervollstĂ€ndigung des DHCP-Dienstes anstehen, aber der Dienst steht bereits zur VerfĂŒgung.

Die Abschließenden TĂ€tigkeiten beinhalten die folgenden 2 Punkte:

  • HinzufĂŒgen der Gruppen „DHCP-Administratoren“ sowie „DHCP-Benutzer“ zur lokalen Installation
  • Authorisation des Servers in der DomĂ€ne

Wenn man dieses nun nachtrĂ€glich durchfĂŒhren möchte ist dieses möglich und es kann auch ein Haken gesetzt werden, der die Authorisation ĂŒberspringt. Des Weiteren wird fĂŒr die kurze Zeit der Anlage der Benutzergruppen der DHCP-Dienst neugestartet.

Dieses kann auch manuell durchgefĂŒhrt werden:

netsh DHCP add securitygroups

Anschließend ist auch ein Restart des DHCP-Dienstes erforderlich.

Wenn diese TĂ€tigkeiten manuell durchgefĂŒhrt werden, behĂ€lt der Server allerdings immer noch die Meldung, da ein Registry-Wert nicht gesetzt ist:

Pfad: HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\ServerManager\Roles\12

Objekt: ConfigurationState

Typ: REG_DWORD

Wert: 2

Weitere Informationen: hier

Server, Windows Server 2012

Computer-Spiele – Zocken oder Zeitverschwendung?

Posted on By Daniel Lensing Keine Kommentare zu Computer-Spiele – Zocken oder Zeitverschwendung?

Die BlogĂŒberschrift stammt heute aus dem „Webmaster Friday“ und auch ich selber spiele gerne auch mal ein paar Minuten oder Stunden ein digitales Machwerk.

Manchmal lieber

  • ein Actiongame, wobei es dann nicht unbedingt um sinnloses schießen geht, sondern auch mal lautlos und ohne viel Munition zum Ziel zu gelangen (Ja das geht meistens)
  • ein Rennspiel, wo man sich auch an der Grafik der Vegetation erfreuen kann
  • ein Strategiespiel, wo man etwas aufbaut oder entwickelt und beim Erfolg des Entstehens zu schauen kann.

Ich habe allerdings fĂŒr mich festgestellt, dass es Spiele sein sollten, wo man an beliebigen Stellen speichern kann. Ich muss in der Lage sein, das ganze auch schnell wieder zu schließen. Mal sitze ich wirklich nur 5 Minuten vor einem Spiel, aber ich kann es auch mal gut eine Stunde aushalten. Es ist halt der Unterschied, wieviel Zeit man hat. Es gibt auch Momente, wo ich sage „Jetzt hast du mal wieder Lust zu zocken“ und wenn ich dann davor sitze, kann meine Laune schon wieder umgeschlagen haben.

Mir ist es in frĂŒheren Jahren auch einmal so gegangen, dass ich ein MMORPG (Massen-Mehrspieler-Online-Rollenspiel) begonnen habe und abends nicht zu meinen ĂŒblichen Zeiten ins Bett gegangen bin. Ich habe einfach noch „ein paar Runden“ weitergespielt. Morgens war ich dann auch gerne mal wie erschlagen. Ich habe es allerdings nach 3 Wochen festgestellt und direkt meinen entsprechenden Account gesperrt und Tage spĂ€ter auch gelöscht. Ich spiele gerne auch mal mit mehreren Mitspielern, aber dieser „Spieltrieb“ immer mehr und immer weiter, liegt mir einfach gar nicht.

FĂŒr mich haben Spiele zweierlei: eine Faszination und ein Suchtpotenzial.

Ich finde es ganz wichtig, dass man Kinder und auch sich selber beim Konsumieren beobachtet. Dieses möchte ich nicht nur auf den Bereich der Spiele, sondern auf das gesamte Konsumieren, egal ob von BĂŒchern, Fernsehsendungen, Lebensmittel oder Umgangsformen, erweitern. Bewusst mit Dingen umgehen ist fĂŒr unsere Gesellschaft sehr wichtig.

…und mal sollte auch eine Zeitverschwendung drin sein.

Spiele

Listen schnell formatieren per Makro in Excel

Posted on By Daniel Lensing Keine Kommentare zu Listen schnell formatieren per Makro in Excel

HĂ€ufiger muss ich Auswertung, Listen oder Planungen in Excel lesen. Manche importiere ich auch aus CSV, Text-Dateien oder gar per ODBC-Verbindung. Bei entsprechenden Datenmengen und aufgrund der Übersichtlichkeit formatiere ich mir diese Tabellen gerne. Ich wurde nun gefragt, wie ich dieses entsprechend schnell durchfĂŒhre und gerne hinterlege ich hier die vba-Zeilen.

Autofilter auf Zeile 1 setzen:

Range("A1").Select
Selection.AutoFilter
Application.ScreenUpdating =&nbsp;True

Zeile 1 fixieren:

    With ActiveWindow
        .FreezePanes = False
        .SplitColumn = 0
        .SplitRow = 1
        .FreezePanes = True
    End With

Zeilen farblich trennen:

Dim z As Integer
    Dim sp As Integer
    Dim s As Integer
 
    sp = Range("IV1").End(xlToLeft).Column + 1
    z = Range("A65536").End(xlUp).Row + 1
 
    With Range("A1", Chr(63 + sp) & 1)
        .Font.Bold = True
        .EntireColumn.AutoFit
        .Interior.ColorIndex = 15
        .Interior.Pattern = xlSolid
    End With
 
    For s = 3 To z - 1 Step 2
    With Range("A" & s, Chr(63 + sp) & s)
     .Interior.ColorIndex = 37
     .Interior.Pattern = xlSolid                                               '
    End With
    Next s

Diese Funktionen nutze ich in einem Makro gemeinsam und entsprechend habe ich mit einem Klick eine schnell formatierte Tabelle.

Office, VBA