Đăng nhập yahoo bằng 1 cú click
Trước tiên mở Notepad lên, copy đoạn code phía dưới vào và lưu thành file loginyahoo.VBS (tên khác cũng được nhưng có đuôi là .VBS)
Mỗi lần muốn đăng nhập chỉ cần kích vào file này là xong.
Dim WshShell
Set WshShell=CreateObject("WScript.Shell")
WshShell.Run"""C:\Program Files\Yahoo!\Messenger\YahooMessenger.exe"""
WScript.Sleep 1500
WshShell.AppActivate"Sign In"
WScript.Sleep 200
WshShell.SendKeys"nick yahoo của bạn"
WScript.Sleep 200
WshShell.SendKeys"{TAB}"
WshShell.SendKeys"password của bạn"
WScript.Sleep 200
WshShell.Sendkeys"{Enter}"
Set WshShell=CreateObject("WScript.Shell")
WshShell.Run"""C:\Program Files\Yahoo!\Messenger\YahooMessenger.exe"""
WScript.Sleep 1500
WshShell.AppActivate"Sign In"
WScript.Sleep 200
WshShell.SendKeys"nick yahoo của bạn"
WScript.Sleep 200
WshShell.SendKeys"{TAB}"
WshShell.SendKeys"password của bạn"
WScript.Sleep 200
WshShell.Sendkeys"{Enter}"
Lợi ích của việc dùng code này là bạn không đánh pass vào từ bàn phím nên trojan, keylogger sẽ không chôm được password của bạn
Không có nhận xét nào:
Đăng nhận xét