Merhaba,
Komut satırında
SET komutu ile alabileceğiniz bilgileri LibreOffice Basic'de
ENVIRON komutu ile alabilirsiniz.
Bunun için aşağıdaki fonksiyonu tanımlarsanız işinizi görecektir.
- Kod: Tümünü seç
Function BILGIAL(Soru As String) As String
Dim Cevap As String
Cevap = Environ(UCase(Soru))
BILGIAL = Cevap
End Function
SET komutunda alınabilecek bilgilerin bazıları aşağıdaki gibidir;
COMPUTERNAME
HOMEDRIVE
LOGONSERVER
NUMBER_OF_PROCESSORS
OS
PROCESSOR_ARCHITECTURE
PROCESSOR_IDENTIFIER
PROCESSOR_LEVEL
PROCESSOR_REVISION
SYSTEMDRIVE
SYSTEMROOT
TEMP
TMP
SESSIONNAME
USERDNSDOMAIN
USERDOMAIN
USERDOMAIN_ROAMINGPROFILE
USERNAME
USERPROFILE
WINDIR
PUBLIC
PROMPT
PATHTEXT
PATH
HOMEPATH
Örnek tablomuz aşağıdaki gibi olsun;

- environ2
- Environ2.png (23.66 KiB) 1893 defa görüntülendi
BILGIAL fonksiyonunu tanımladığımızda sonuç şöyle olacaktır;

- environ1
- Environ.png (26.55 KiB) 1893 defa görüntülendi
İyi çalışmalar.