vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Schützen Sie Ihre Software vor Software-Piraterie - mit sevLock 1.0 DLL!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück
Rubrik: Verschiedenes / Sonstiges   |   VB-Versionen: VB2005, VB2008, VB201015.06.11
Wurde das Programm zum ERSTEN mal gestartet?

Mit diesen Tipp können Sie feststellen, ob das Programm zum ersten Mal auf dem Rechner gestartet worden ist.

Autor:   Grek KochBewertung:     [ Jetzt bewerten ]Views:  10.879 
www.vb-future.netSystem:  Win2k, WinXP, Win7, Win8, Win10, Win11 Beispielprojekt auf CD 

Durch einen Eintrag in die Windows Registrierdatenbank kann man feststellen, ob das Programm zum ersten Mal gestartet wurde.

Public Class Form1
 
  Private Sub Form1_Load(ByVal sender As System.Object, _
    ByVal e As System.EventArgs) Handles MyBase.Load
 
    ' Registry-Eintrag // Programm zum ERSTEN mal gestartet?
    Dim KeyPath As String = "HKEY_CURRENT_USER\Software\PROGRAMM\"
    If My.Computer.Registry.GetValue(KeyPath, "FirstRun", 0) = 0 Then
      My.Computer.Registry.SetValue(KeyPath, "FirstRun", 1)
      MsgBox("Erster Start!")
    End If
 
  End Sub
 
End Class