vb@rchiv · Tipps & Tricks · Windows-Startmodus ermitteln

Rubrik: System/Windows · Sonstiges | VB-Versionen: VB5, VB6

24.10.07

Windows-Startmodus ermitteln Dieser Tipp zeigt, wie sich mit Hilfe des Windows API der Startmodus von Windows ermitteln lässt.
Autor: Dieter Otter	Bewertung:	Views: 8.081
www.tools4vb.de	System: Win9x, WinNT, Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Nachfolgend zeigen wir Ihnen, wie Sie mit Hilfe der GetSystemMetrics API-Funktion feststellen können, ob Windows "normal", im "abgesicherten Modus" oder im "abgesicherten Modus mit Netzwerkunterstützung" gestartet wurde.

Option Explicit
 
' benötigte API-Deklaration
Private Declare Function GetSystemMetrics Lib "user32" ( _
  ByVal nIndex As Long) As Long
 
Private Const SM_CLEANBOOT = &H43
 
' Aufzählung "Startmodus"
Private Enum StartMode
  ModeNormal = 0
  ModeSafe = 1
  ModeSafeNetwork = 2
End Enum

Aufrufbeispiel

' Windows-Startmodus ermitteln
Dim nResult As StartMode
 
nResult = GetSystemMetrics(SM_CLEANBOOT)
Select Case nResult
  Case StartMode.ModeNormal
    ' Windows wurde normal gestartet
 
  Case StartMode.ModeSafe
    ' Windows wurde im abgesicherten Modus gestartet
 
  Case StartMode.ModeSafeNetwork
    ' Windows wurde im abgesicherten Modus mit 
    ' Netzwerkunterstützung gestartet
 
End Select

Diesen und auch alle anderen Tipps & Tricks finden Sie auch auf unserer aktuellen vb@rchiv

Vol.6
(einschl. Beispielprojekt!)

Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
- nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten
- Symbol-Galerie mit mehr als 3.200 Icons im modernen Look
Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m.