Sprache: VB
Passwort-Generator
Generiert ein Passwort.
MD5-Hash einer Datei
Sprache: VB Public Function MD5FromFile(ByVal sFile As String) As String Dim MD5 As New MD5CryptoServiceProvider Dim Hash As Byte() Dim Result As String = "" Dim Tmp As String = "" Dim FN As New FileStream(sFile, FileMode.Open, FileAccess.Read, FileShare.Read, 8192) MD5.ComputeHash(FN) FN.Close() Hash = MD5.Hash For i As Integer = 0 To Hash.Length – 1 […]
Prüfung auf 64-Bit für eigene Applikation / Betriebssystem
Sprache: VB MsgBox(Environment.Is64BitProcess) MsgBox(Environment.Is64BitOperatingSystem)
IP Bann mit php
Dies ist eine simple Lösung um einen IP bann mit Hilfe von php zu erstellen
Screensize berechnen
Berechnen der Screensize in cm durch Angabe der Bildschirmdiagonalen und des Seitenverhältnisses.
Antivirenprogramm ermitteln
Sprache: VB Function GetAV() Dim objSecurityCenter As Object, colAntiVirus As Object, objFileSystem As Object, CountAV As Integer, info As String = "" objSecurityCenter = GetObject("winmgmts:\localhostrootSecurityCenter2") colAntiVirus = objSecurityCenter.ExecQuery("SELECT * FROM AntiVirusProduct", "WQL", 0) objFileSystem = CreateObject("Scripting.fileSystemObject") CountAV = 0 For Each objAntiVirus In colAntiVirus CountAV = CountAV + 1 If CountAV > 1 Then info […]
ImageList dynamisch aus dem ResourceManager erstellen
Ich brauchte eine ImageList und alle Bilder waren in den Resources vorhanden. Demnach wäre es doch sinnvoll alle Images per Reflection der Resource zu entlocken und sie in die Iamg…
Prüfen, ob eine Datei überschrieben werden kann
Mit diesem Snippet kann für eine beliebige Datei überprüft werden, ob diese z.B. durch eine neue Version ersetzt werden kann. Spezielle Anwendung wäre z.B. das Prüfen einer DLL-Dat…
Nachkommastellen einer Dezimalzahl extrahieren
Dieses Snippet liefert die Nachkommastellen einer Double-Dezimalzahl. Damit keinesfalls durch mathematische Berechnungen Verfälschungen entstehen können, werden zur Auswertung Stri…