Public Declare Function GetComputerName
12.10.2003 16:42:57
heinz
Ich spiele gerade mit dem API Text Viewer (VB6) herum und würde so gerne die eine oder andere Funktion ausprobieren - leider find ich da keine Hilfe dazu.
Hier z.B. würde ich gerne (so zum Spaß) den Namen meines Computers erfahren,
ich weiß aber gar nicht was ich für die Variablen eingeben muss bzw. könnte.
Also bei:
name = GetComputerName("", 1)
müsste ich scheints in der Klammer einen String und ne Ganzzahl (as Long) eingeben
das Ganze...
Option Explicit
Public Declare
Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Sub compiname()
Dim name
name = GetComputerName("", 1)
MsgBox name
End Sub
...endet mit ner 0 in der Message Box - so heißt mein Compi aber nicht.
Bitte um Hilfe im konkreten Fall,
wäre begeistert für Hinweis auf allgemeine Hilfe bzgl. API, DLL und so.
Danke im Voraus,
heinz