sistemde ses kartı yüklü mü değil mi...
Sn Çoşkun Çakal paylaşım için teşekkürler. Saygılar...
Paylaşım için teşekkürler.
Paylaşım için teşekkürler
Merhaba;
Konuyla ilgili ben de bir kod paylaşayım. Aşağıdaki kod ile ses kartınızın ve pc nize takılı ses cihazlarının markasıyla, üreticisinin ismini alabilirsiniz.
Kod:
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery( _
"SELECT * FROM Win32_SoundDevice", , 48)
For Each objItem In colItems
MsgBox "Ürün ismi: " & objItem.ProductName & vbCrLf & _
"Ürün Firması: " & objItem.Manufacturer
Next
Dostlar merhabalar;
Sayın beab05'in kodunu sanırım eksik yazdım ve hata iletisi alıyorum..
Yardımınızı bekliyorum.
Sevgiler ve serinlikler..