Berikut tips yang dapat sobat praktekkan sendiri.
Copy seluruh code dibawah ini dan paste-kan di notepad.
rem periksa jenis Sound Card AndaSimpan dengan nama nama_file.vbs dan jangan lupa untuk pilih save as type-nya All Files.
set wmi = GetObject("winmgmts:")
set scs = wmi.InstancesOf("win32_sounddevice")
teks=space(14)+"Jenis Sound Card Anda : "+vbcrlf
for each sc in scs
set status = sc.Properties_("Status")
wscript.Echo(teks+""""+sc.Properties_("Name") + "/" + status+"""")
if status = "OK" then
wscript.Quit 0
end if
next
wscript.Quit 1
Untuk menjalankan aplikasi ini sobat cukup double klik saja filenya.
Nanti akan muncul seperti gambar dibawah :
Tidak ada komentar:
Posting Komentar
Berikan komentar yang baik dan benar