Startmodus bestimmen
Manchesmal ist es ganz gut zu wissen, wie Windows gestartet wurde...
Da gibts Abgesicherten Modus mit seinen Farb- und Netzwerkbeschränkungen, einen mit Netzwerkunterstützung und natürlich den ganz normalen (hoffentlich üblichen) Modus, der eigentlich immer da sein sollte.
Falls man jetzt an einer Anwendung schreibt, die vorwiegend mit Grafik zu tun hat, sollte sich diese besser nicht im Abgesicherten Modus starten lassen.
Eigentlich sollte sich gar keine Anwendung starten lassen,....denn im Prinzip ist dieser Modus nicht dafür gedacht auch noch allen Mögliche Müll aussenrum zu versorgen....aber das ist nur eine Theorie...
Deklaration:Public Declare Function GetSystemMetrics Lib "user32" Alias "GetSystemMetrics" (ByVal nIndex As Long) As Long
Private Const SM_CLEANBOOT = &H43
und ausgewertet wird´s so.
Dim tmp As String, iil As ITEMIDLIST
Select Case GetSystemMetrics(SM_CLEANBOOT)
Case 0 MsgBox "Ganz normal"
Case 1 MsgBox "Abgesicherter Modus"
Case 2 MsgBox "Abgesicherter Modus (Netzwerk)"
Case Else MsgBox "Keine Ahnung ??!!"
End Select
Info 
Zusatz 
Printfreundliche Ansicht