Çözüldü Bilgisayar Özellikleri gösteren vba kodu hk.

[talebeyim]

Bilgisayara ait Marka, İşletim sistemi, Office versiyonu, Bit, Memory, İşemci, Hdd, Bilgisayar Adı, Kullanıcı Adı, Etki Alanı, Çalışma Grubu, İp Adresi gibi bilgilerin tamamını Kodu çalıştırdığımız Zaman Sayfa1'de gösterecek VBA Koduna ihtiyacım var.

 

[hakki83]

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[hakki83]

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[hakki83]

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[hakki83]

Bilgisayar adı ve kullanıcı adı


HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[halily]

alternatif olarak
Sayfa yoksa ekler varsa temizler
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[halily]

tüm Win32_* ile başlayan tabloların listelendiği ana bir tablo yok mu acaba?
for each diyerek hepsini dolanabilecek bir fonksiyon yazardık)

 

[halily]

bulabildiğim tüm Win32_ classları (bu konuda yer alanlar dahil 16 kadar) için sayfa ekleyip bilgileri getiriyor
sayfa1 de class listesi var. o listedeki tüm sınıflara ait bilgileri ilgili sayfaya ekliyor
oraya eklenecek Win32_ ile başlayan başka sınıflar için de otomatik olarak alabilir
sayfa1'deki listede yer alan sınıfları ilgili yordama gönderir
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

ilgili sınıftaki bilgiyi alır ve ilgili sayfaya ekler
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

"Sayfa var mı?" kontrolü ilgili sayfa yoksa ekler
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

Sayfa1 dışındaki tüm sayfaları siler
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

"winmgmts:root/CIMV2" içindeki tüm alt sınıfları listeler
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[talebeyim]

bulabildiğim tüm Win32_ classları (bu konuda yer alanlar dahil 16 kadar) için sayfa ekleyip bilgileri getiriyor
sayfa1 de class listesi var. o listedeki tüm sınıflara ait bilgileri ilgili sayfaya ekliyor
oraya eklenecek Win32_ ile başlayan başka sınıflar için de otomatik olarak alabilir
sayfa1'deki listede yer alan sınıfları ilgili yordama gönderir
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

ilgili sınıftaki bilgiyi alır ve ilgili sayfaya ekler
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

"Sayfa var mı?" kontrolü ilgili sayfa yoksa ekler
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

Sayfa1 dışındaki tüm sayfaları siler
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

"winmgmts:root/CIMV2" içindeki tüm alt sınıfları listeler
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

Hocam maşallah bilgisayarda ne varsa getirrmiş.

Hocam bana birde bunlara ek olarak kullandığı office programının versiyon bilgisi lazım gelen bilgiler arasında ona rastlayamadım.

Office ve bilgisayara başka yüklenmiş programlarında bir listesini getirebilir mi ?

Emekleriniz için ayrıca teşekkür ederim.

 

[halily]

Office ve bilgisayara başka yüklenmiş programlarında bir listesini getirebilir mi ?

o bilgiler zaten Product sayfasına alınıyor

 

[halily]

ama yine de isterseniz aşağıdaki kod da işe yarayabilir aslında Product ile aynı ama burada seçmeli alanlar alınmış
excel dosyanızda KuruluYazılımlar adında sayfa olmalı
HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[talebeyim]

Halily hocam başta olmak üzere emeği geçen herkese teşekkür ederim.
Konuyu kapatabiliriz

 

[halily]

rica ederim
iyi çalışmalar