3 replies to this topic

[Hawk3]

Wie kann ich mittels eines Dialoges einen Computer Namen abfragen?
Gibt es dafür einen IS Dialog oder muss ich da einen selber machen?
Wenn ich denn einen selber machen muss, wie rufe ich denn diesen Dialog für Computernamen auf, mittels einer API Funktion, welche wäre das???
Wie müsste ich diese dann deklarieren?
Vielen Dank für eure Hilfe im Voraus.
Burhan Yakisir.

[Jan Becker]

du kannst die IS dialoge nutzen. zum beispiel AskText("Geben Sie den
Namen des 1. Rechners ein", "empty", szMachineName);

szMachineName uebergibst du dann dem DCOM objekt.
mehr ist da nicht notwendig, denke ich.

[Thomas Wendt]

Ermittelt den Computernamen

prototype LONG KERNEL.GetComputerNameA ( BYREF STRING, BYREF LONG );

function ErmittelComputernamen()
   NUMBER  nResult, nValue;
   STRING  szString;
begin

szString = "";
nValue = 255;
   
nResult = GetComputerNameA(szString, nValue);
SprintfBox(INFORMATION, "Computer Name", "Computer Name: %s", szString);
 
end;

hth Thomas