environ komutunun güzelliği

[mayhemious]

Bu kodla tanısmayan bir çok programcı arkadas Windows, System v.s klasörlerinin yerini, bilgisayar ismi, domain adı v.s gibi bilgileri apilerle birden fazla satır kodlarla ulasır. İste size Environ komutu.
Tek satır kodla çok güzel sonuçlar elde edebilirsiniz.

Environ(”ComputerName”)
Environ(”Os”)
Environ(”ComSpec”)
Environ(”HomeDrive”)
Environ(”WinDir”)
Environ(”UserProfile”)
Environ(”HomePath”)
Environ(”LogonServer”)
Environ(”UserDomain”)
Environ(”UserName")

Kullanımı ;

Dim winyol
Winyol = Environ("WinDir") 'iste bu satırla Windows klasörünün yolunu buluruz..
msgbox winyol