|
Environ
Aug 13,2008 00:00
by
RubeNiS
Bu kodla tanışmayan bir çok programcı arkadaş Windows, System v.s klasörlerinin yerini, bilgisayar ismi, domain adı v.s gibi bilgileri apilerle birden fazla satır kodlarla ulaşır. İşte size Environ komutu. Tek satır kodla çok güzel sonuçlar elde edebilirsiniz. Tabi bu Environ komutundan sonuç elde etmek için bazı parametrelere ihtiyaç duyar bu parametrelerin bazılarını aşağıya yazdım. Kullanımı ; Dim winyol Winyol = Environ(“WinDir”) ‘işte bu satırla Windows klasörünün yolunu buluruz.. Text1.text= winyol İşte bazı parametreler; COMPUTERNAME=RIFAT ‘bilgisayar isminiz ComSpec=C:\WINDOWS\system32\cmd.exe ‘Ms-Dos kontrol paneli yolu HOMEDRIVE=C: ‘Geçerli işletim sisteminin yüklü olduğu sürücü HOMEPATH=\Documents and Settings\Administrator ‘Geçerli kullanıcının kullanıcı klasörü LOGONSERVER=\\RIFAT ‘Pc nin kullandığı server adı OS=Windows_NT ‘İşletim sistemi türü USERDOMAIN=RIFAT ‘Veri alışverişi yaptığı domain ismi USERNAME=Administrator ‘Kullanıcı ismi USERPROFILE=C:\Documents and Settings\Administrator ‘Açık olan kullanıcı profilinin klasörü windir=C:\WINDOWS ‘Windows klasörü Diğer bütün parametreleri görmek için Ms-Dos komutunda set yazıp enter tıklayın. Kolay gele Rifocan |