Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
384to388
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
384to388
384to388
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

WIn2000 oder NT4???

WIn2000 oder NT4???
20.02.2004 15:15:10
Claus Ohlendorf
Möglicherweise ist es ja ein alter Hut, aber dennoch:
Gibt es eine Moeglichkeit ueber VBA festzustellen, welches Betriebssystem laeuft? Im konkreten Fall moechte ich abfragen, ob es sich um Windows200 oder Windows NT4 handelt...
Danke fuer jede Hilfe
Claus

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: WIn2000 oder NT4???
20.02.2004 15:18:07
soendi
ja, hab deine frage schon richtig gelesen (vba)
hier aber die non-vba-lösung
=INFO("sysversion")
kannst du sicherlich irgendwie ins vba übertragen
gruss
soendi
AW: WIn2000 oder NT4???
20.02.2004 15:21:14
AndreasS
Hi, aus dem Archiv:
Declare

Function api_GetWindowsDirectory Lib "kernel32" _
Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal _
nSize As Long) As Long

Function GetWinDir() As String
Dim lpBuffer As String * 255
Dim length As Long
length = api_GetWindowsDirectory(lpBuffer, Len(lpBuffer))
GetWinDir = Left(lpBuffer, length)
End Function


Sub WindowsVerzeichnis()
Antwort = MsgBox("Auf diesem System wurde" & vbCrLf & _
"Windowsim im Verzeichnis " & vbCrLf & vbCrLf & _
Space(8) & GetWinDir & vbCrLf & vbCrLf & _
"installiert.", vbInformation, "Windows-Verzeichnis")
End Sub


mit call WindowsVerzeichnis
dann aufrufen
auch mal im Archiv nachsehen ;-)
Gruß Andreas
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige