login banyak id yahoo mesengger versi2
Kalau
sebelumnya
saya pernah
posting
" Login
Banyak ID
Yahoo Messenger". Dari pada
repot-repot merubah registry,
saya sudah membuat code
script menggunakan VBScript,
sobat bisa mengcopy sendiri
codenya atau mendownload
sendiri pada link yang saya
sertakan di bawah.
Kode VBScript Login Banyak
ID Yahoo Messenger.
---------------------------------------------------------------------------------
dim klikbebas
masuk()
sub masuk()
set klikbebas =
wscript.CreateObject
("wscript.shell")
keterangan = "Baca aturan
pakai :" & vbcrlf &_
"[0].Nonaktifkan banyak id
YM." & vbcrlf &_
"[1].Aktifkan banyak id YM." &
vbcrlf & vbcrlf & vbcrlf &_
"[Ilmu Komputer]" & vbcrlf &_
"visit to my web : http://
klikbebas.blogspot.com"
tanya = inputbox
(keterangan,"banyak id
YM",0)
klikbebas.RegWrite"HKEY_CURRENT_USER
\Software\yahoo\pager\test
\PLURAL",tanya,"REG_DWORD"
if tanya=1 then
msgbox "Banyak id YM telah
diaktifkan, Silahkan restart
atau log off komputer anda,
untuk melihat
hasilnya",vbInformation,"banyak
id YM"
else
if tanya=0 then
msgbox "Banyak id YM telah
di non aktifkan, Silahkan
restart atau log off komputer
anda, untuk melihat
hasilnya",vbInformation,"banyak
id YM"
klikbebas.RegDelete"HKEY_CURRENT_USER
\Software\yahoo\pager\test
\PLURAL"
else
msgbox "Angka yang anda
masukkan belum
benar",vbInformation,"banyak
id YM"
masuk()
end if
end if
end sub
---------------------------------------------------------------------------------
copy code diatas di NotePad
kemudian simpan dengan
nama "sembarang.vbs" (tanpa
tanda petik)
Jika sobat tidak mau repot-
repot membuatnya, silahkan
mendownload file nya yang
sudah jadi DISINI
Cara aturan pakainya silahkan
dibaca pada programnya
(mudah penggunaannya gak
pake ribet).
sebelumnya
saya pernah
posting
" Login
Banyak ID
Yahoo Messenger". Dari pada
repot-repot merubah registry,
saya sudah membuat code
script menggunakan VBScript,
sobat bisa mengcopy sendiri
codenya atau mendownload
sendiri pada link yang saya
sertakan di bawah.
Kode VBScript Login Banyak
ID Yahoo Messenger.
---------------------------------------------------------------------------------
dim klikbebas
masuk()
sub masuk()
set klikbebas =
wscript.CreateObject
("wscript.shell")
keterangan = "Baca aturan
pakai :" & vbcrlf &_
"[0].Nonaktifkan banyak id
YM." & vbcrlf &_
"[1].Aktifkan banyak id YM." &
vbcrlf & vbcrlf & vbcrlf &_
"[Ilmu Komputer]" & vbcrlf &_
"visit to my web : http://
klikbebas.blogspot.com"
tanya = inputbox
(keterangan,"banyak id
YM",0)
klikbebas.RegWrite"HKEY_CURRENT_USER
\Software\yahoo\pager\test
\PLURAL",tanya,"REG_DWORD"
if tanya=1 then
msgbox "Banyak id YM telah
diaktifkan, Silahkan restart
atau log off komputer anda,
untuk melihat
hasilnya",vbInformation,"banyak
id YM"
else
if tanya=0 then
msgbox "Banyak id YM telah
di non aktifkan, Silahkan
restart atau log off komputer
anda, untuk melihat
hasilnya",vbInformation,"banyak
id YM"
klikbebas.RegDelete"HKEY_CURRENT_USER
\Software\yahoo\pager\test
\PLURAL"
else
msgbox "Angka yang anda
masukkan belum
benar",vbInformation,"banyak
id YM"
masuk()
end if
end if
end sub
---------------------------------------------------------------------------------
copy code diatas di NotePad
kemudian simpan dengan
nama "sembarang.vbs" (tanpa
tanda petik)
Jika sobat tidak mau repot-
repot membuatnya, silahkan
mendownload file nya yang
sudah jadi DISINI
Cara aturan pakainya silahkan
dibaca pada programnya
(mudah penggunaannya gak
pake ribet).
Komentar
Posting Komentar