Beranda > Ajax, Apache, Asp.net, Batch, Blog, C++, CSS, Delphi, Hack, Hacking, Html, JQuery, MySQL, PHP, Programming, Tips Trick, Vb.Net, VbScript > Cara Membuat Kata Sapaan Dengan Menggunakan VbScript

Cara Membuat Kata Sapaan Dengan Menggunakan VbScript

28/12/2010

Buka Notepad
Copy Paste Code Di Bawah Ini …………

DIm obj
Set obj = CreateObject(“WScript.NetWork”)
Dim sInfo
sInfo = “Hey Lagi Apa Sire …. ? Kite Kih : ” & vbCRLF & _
“User Name : ” & obj.UserName & vbCRLF & _
“Nama Computer : ” obj.ComputerName & vbCRLF

MsgBox sInfo
Set obj = Nothing

Lalu Save Dengan Format Vbs
Contoh : Sapaanku.vbs

%d blogger menyukai ini: