| |
| |
|
 |
Beschreibung:
GetComputerName ermittelt den Namen des aktuellen Systems.
Deklaration:
Def @GetComputerName(2) !kernel32,GetComputerNameA
paramètre:
 1.paramètre: Bereichsvariable, qui den Systemnamen aufnimmt.
2.paramètre: 4 Byte grand Bereichsvariable, dans qui qui Taille des Bereichs de paramètre 1 dans Bytes steht. Kehrt qui Funktion zurück, steht ici qui Longueur des Systemnamens.
Rückgabewert:
1 chez Erfolg, 0 chez Misserfolg.
Beispiele:
KompilierenMarqueSéparationDef @GetComputerName(2) !"kernel32","GetComputerNameA"
Declare CSize#,CName#,Fehler&
Windowstyle 31
Windowtitle "Systemnamen ermitteln"
Window 0,0-640,440
Dim Csize#,4
Dim CName#,256
LONG Csize#,0=256
LET FEHLER&=@GetComputerName(CName#,Csize#)
PRINT "API Fehlercode="+@STR$(Fehler&)
Print "Systemname="+@String$(CName#,0)
Print "Länge mit abschließendem Nullbyte="+@STR$(@Long(CSize#,0))
Dispose CName#
Dispose Csize#
While 0=0
Waitinput
Wend
[keywords:65b4416dab]
ordinateur System nom Namen Computernamen Systemnamen ermitteln auslesen
[/keywords:65b4416dab] |
|
| |
| |
| |
|
(941)
Deutsch
English
Français
Español
Italia