Welcome Back begitulah Windows akan menyapa kita saat start up

Oke langsung saja kali ini penulis akan menulis sedikit code agar komputer kita dapat mnyapa kita saat komputer dihidupkan berikut Codenya.


Dim speaks, speech, salam , username

username = CreateObject("WScript.Network").Username

If Hour(Time) < 12 Then
salam = "Selamat pagi"
ElseIf Hour(Time) < 20 Then
salam = "Selamat Siang"
Else
salam = "Selamat Malam"
End If

speaks = salam + " " + Username + "! Welcome back to your computer! Have a nice work!"
Set speech = CreateObject("sapi.spvoice")
speech.Speak speaks

Simpan dengan extensi.vbs kemudian letakkan di folder start upnya windows.

setelah itu restart kompute kita dan lihat hasilnya. Semoga bermanfaat.