[Eine Seite zurück] [Übersicht] [Eine Seite vor]

Benutzung auf eigene Gefahr !
Keine Garantie für garnichts !

Name des Computers

Sprache / Programm: VBA ab Office 97
Beschreibung

API-Funktion, die den Namen des Computers ermittelt.

VBA-Quelltext
Public Declare Function GetComputerName Lib "kernel32" _
    Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Public Function ComputerName()
    Dim TempName As String * 255
    GetComputerName TempName, 255
    ComputerName = Left(TempName, InStr(TempName, vbNullChar) - 1)
End Function
Anwendungsgebiete, Fehler und Warnungen

Bei Verwendung in Klassen-, Berichts- und Formularmodulen müssen die 'Public'-Anweisungen durch 'Private' ersetzt werden.