Status baterai untuk WSR Macros

          Hay semua, para pembaca yang budiman, kita ketemu lagi walaupun hanya dengan tulisanku ini. Akhirnya aku nemu juga cara menanyaka status baterai menggunakan WSR Macros  setelah sekian lama mencari, pasti para pembaca dah bisa nebak kan yang akan Dhiar Blog's share? (ya iyalah dah ada judulnya gitu). Oke kali ini aku akan berbagai tentang status baterai di WSR Macros. Check this out,

<speechMacros>

<command>

<listenFor>Battery status</listenFor>

<script language='VBScript'>

<![CDATA[

strComputer = "."

Set objWMIService = GetObject("winmgmts:\\" &strComputer & "\root\CIMV2")

Set colItems = objWMIService.ExecQuery(_

"SELECT * FROM Win32_Battery",,48)

For Each objItem in colItems

Application.Speak ("Batteries at " & objItem.EstimatedChargeRemaining & " percent.")

Next

]]>

</script>

</command>

</speechMacros>

Nah, sekarang coba katakan "Battery status", pasti si Laptop akan mengatakan % baterai, jika ada pertanyaan , tinggalkan komentar. Thanks, semoga bermanfaat.