Hi,
Can anyone show me how to implement the GetComputerName Windows API in Aurora?
Thanks,
Haim
Hi Haim!
I've found this Ebasic routine from the program "Artificial inteligence" by Piet Defoe
'******************** Find Computer name skanked from help
Sub FindComputerName
Def pSize:Pointer
Def nSize:Int
Declare "Kernel32",GetComputerNameA(buffer:String,size:Pointer),Int
nSize = 255
pSize = nSize
GetComputerNameA(ComputerNameB,pSize)
ComputerName = LCase$( ComputerNameB )
return
endsub
Hope this can help.
Thanks,
i'll try to convert it1
Haim