
Tampilkan postingan dengan label vb60. Tampilkan semua postingan
Tampilkan postingan dengan label vb60. Tampilkan semua postingan
Jumat, 20 Juli 2012
Kamis, 19 Juli 2012
Kamis, 05 Juli 2012
[SC VB6.0] membuat pointBlank Launcher Sendiri
Pengen Source Codenya??
Download Source CodeNya Di Paling Bawah Posting
Pertama-Tama..
-:>Buka VB 6.0
-:>Tekan Existing
-:>Dibagian Look in Cari Nama Folder Launcher
-:>Doubble Clik Project1.vbp
-:>Doubble Click Main (Main.frm)
-:>Lalu Doubble Click Lagi Di Dalam Form Tersebut..
-:>Cari Code Shell ("D:\Program Files\PointBlank\PBLauncher.exe")
-:>D:\Program Files\PointBlank\PBLauncher.exe Ubah Menjadi Alamat Tempat Folder Point Blank Diletakkan..
Masih Belum mengerti Lihat Gambar:
-:>Ganti Tulisan http://angelz-hackedz.blogspot.com Menjadi Alamat website/Blog Anda
Downlaod SourceCode:
--:> Click Hare
By:AlexCucuMbahGoogle

Rabu, 04 Juli 2012
Source Code Remote PC Hendle-X
Anhe Dapat Dari Blog Sebelah Nhe Mass...
Mungkin Bisa Membantu Agan²..
Digunakan Untuk Jaringan Administrasi, Sistem Pengendalian dan hacking
1 - Multi Koneksi Mnager Channle.
2 - Buku Alamat Bersih.
3 - MsgBox Remote / Teks Matrix & Normal Chat / Half Duplex Voise Chat / Board Putih / Minesweeper Game Mendeteksi.
4 - Fungsi Lengkap Remote File Browser & Manager (Download & Upload File).
5 - Multi-threaded Remote Download Manager.
6 - Lengkap Fungsi Remote Proses dan Aplikasi Mnager Jauh lebih kuat daripada The Normal Windows Task Mnager.
7 - Remote Registry Manager [regedit.exe] tersebut.
8 - Beberapa fungsi Interbet termasuk seperti mengambil sejarah sistem remoted.
9 - Controller Clipboard Remoted.
10 - Device manager Massa termasuk monitor Strong mengendalikan.
11 - Dari cource OS windows fungsi kontrol termasuk seperti shutdown, restart ... dll.
12 - Editor Server Wikipedia.
13 - Firewall diembed.
14 - Banyak Jaringan alat-alat seperti "X-Ping, X-Router, X-Whois, X-Port Scanner ,....).
15 - X-Editor masih dalam pembangunan.
16 - Bantuan & Dokumentasi juga tidak selesai. ]
[Catatan]
1 - Menangani-X dibangun pada protokol aplikasi-layer baru bernama BBP (Byte Berbasis Protokol).
2 - Transmisi Data tidak dienkripsi dan tidak dikompresi sampai sekarang.
3 - Juga saya sedang mencari sekarang untuk mendukung LAN Hacking
Download Source Code
Mungkin Bisa Membantu Agan²..
Digunakan Untuk Jaringan Administrasi, Sistem Pengendalian dan hacking
1 - Multi Koneksi Mnager Channle.
2 - Buku Alamat Bersih.
3 - MsgBox Remote / Teks Matrix & Normal Chat / Half Duplex Voise Chat / Board Putih / Minesweeper Game Mendeteksi.
4 - Fungsi Lengkap Remote File Browser & Manager (Download & Upload File).
5 - Multi-threaded Remote Download Manager.
6 - Lengkap Fungsi Remote Proses dan Aplikasi Mnager Jauh lebih kuat daripada The Normal Windows Task Mnager.
7 - Remote Registry Manager [regedit.exe] tersebut.
8 - Beberapa fungsi Interbet termasuk seperti mengambil sejarah sistem remoted.
9 - Controller Clipboard Remoted.
10 - Device manager Massa termasuk monitor Strong mengendalikan.
11 - Dari cource OS windows fungsi kontrol termasuk seperti shutdown, restart ... dll.
12 - Editor Server Wikipedia.
13 - Firewall diembed.
14 - Banyak Jaringan alat-alat seperti "X-Ping, X-Router, X-Whois, X-Port Scanner ,....).
15 - X-Editor masih dalam pembangunan.
16 - Bantuan & Dokumentasi juga tidak selesai. ]
[Catatan]
1 - Menangani-X dibangun pada protokol aplikasi-layer baru bernama BBP (Byte Berbasis Protokol).
2 - Transmisi Data tidak dienkripsi dan tidak dikompresi sampai sekarang.
3 - Juga saya sedang mencari sekarang untuk mendukung LAN Hacking
Download Source Code

Source Code Stock Monitoring
gx Nyangka Bisa Jumpa Nhe SourceCode...
AwalNya Cmn Jalan² Doang eh TerNyata Jumpa Nhe Source Code..
Source Code Yang Saya Bicarakan Hari INi..
STOCK MONITORING
Anda bisa Langsung MencobaNya..
kembangkan Suatu Aplikasi Hingga Dapat Dikasi jempol...
Download:-->Click Hare
TerimaKasih Atas Kunjungannya..
AwalNya Cmn Jalan² Doang eh TerNyata Jumpa Nhe Source Code..
Source Code Yang Saya Bicarakan Hari INi..
STOCK MONITORING
Anda bisa Langsung MencobaNya..
kembangkan Suatu Aplikasi Hingga Dapat Dikasi jempol...
Download:-->Click Hare
TerimaKasih Atas Kunjungannya..

SourceCode FileDestroyer
Aduhh Dah Lama Nhe Gx Post..
Sekarang Aye Post FileDestroyer..
Tidak tau Gunanya??
nah Saya jelaskan..
File/Folder Yang Kita Hapus Belum Tentu hilang Dari Hard Disk Kita...
Kemungkinan Besar Dapat Dibalikkan Lagi..
Tidak Percaya?
Ingin mencobanya??
Nah Langsung Ajha ea, Capek Nie Tangan Saya Ngetik..
-=-=-=-=-=-=-=-=-
Visual basic 6.0
-=-=-=-=-=-=-=-=-
Jika Ada File .ocx Yang Kurang Anda Bisa MendownloadNya Kok Di Google..
Nih Source CodeNya:
--:>Download Mas Broo
Sekarang Aye Post FileDestroyer..
Tidak tau Gunanya??
nah Saya jelaskan..
File/Folder Yang Kita Hapus Belum Tentu hilang Dari Hard Disk Kita...
Kemungkinan Besar Dapat Dibalikkan Lagi..
Tidak Percaya?
Ingin mencobanya??
Nah Langsung Ajha ea, Capek Nie Tangan Saya Ngetik..
-=-=-=-=-=-=-=-=-
Visual basic 6.0
-=-=-=-=-=-=-=-=-
Jika Ada File .ocx Yang Kurang Anda Bisa MendownloadNya Kok Di Google..
Nih Source CodeNya:
--:>Download Mas Broo

Minggu, 01 Juli 2012
Source Code Check HWID Dari VB 6.0
Kalian Pernah Lihat Check HWID Milik RCD???
Nah itu Yang Akan Kita Bahas Hari INI...
Serial Checker ini membaca Serial drive C pada Hardisk kompi target
Langsung Aja Ke Topik...
Cara Buat:
-:>Buat New Project di VB6
-:>Pilih Standar Exe
-:>Buat satu Form
-:>Buat TextBox di form1 tsb
-:>Copy Paste Code dibawah
Private Declare Function GetVolumeInformation Lib _
"kernel32.dll" Alias "GetVolumeInformationA" (ByVal _
lpRootPathName As String, ByVal lpVolumeNameBuffer As _
String, ByVal nVolumeNameSize As Integer, _
lpVolumeSerialNumber As Long, lpMaximumComponentLength _
As Long, lpFileSystemFlags As Long, ByVal _
lpFileSystemNameBuffer As String, ByVal _
nFileSystemNameSize As Long) As Long
Function GetSerialNumber(strDrive As String) As Long
Dim SerialNum As Long
Dim Res As Long
Dim Temp1 As String
Dim Temp2 As String
Temp1 = String$(255, Chr$(0))
Temp2 = String$(255, Chr$(0))
Res = GetVolumeInformation(strDrive, Temp1, _
Len(Temp1), SerialNum, 0, 0, Temp2, Len(Temp2))
GetSerialNumber = SerialNum
End Function
Private Sub Form_Load()
Text1.Text = GetSerialNumber("C:\")
End Sub
Selesai Deh...
Nah itu Yang Akan Kita Bahas Hari INI...
Serial Checker ini membaca Serial drive C pada Hardisk kompi target
Langsung Aja Ke Topik...
Cara Buat:
-:>Buat New Project di VB6
-:>Pilih Standar Exe
-:>Buat satu Form
-:>Buat TextBox di form1 tsb
-:>Copy Paste Code dibawah
Private Declare Function GetVolumeInformation Lib _
"kernel32.dll" Alias "GetVolumeInformationA" (ByVal _
lpRootPathName As String, ByVal lpVolumeNameBuffer As _
String, ByVal nVolumeNameSize As Integer, _
lpVolumeSerialNumber As Long, lpMaximumComponentLength _
As Long, lpFileSystemFlags As Long, ByVal _
lpFileSystemNameBuffer As String, ByVal _
nFileSystemNameSize As Long) As Long
Function GetSerialNumber(strDrive As String) As Long
Dim SerialNum As Long
Dim Res As Long
Dim Temp1 As String
Dim Temp2 As String
Temp1 = String$(255, Chr$(0))
Temp2 = String$(255, Chr$(0))
Res = GetVolumeInformation(strDrive, Temp1, _
Len(Temp1), SerialNum, 0, 0, Temp2, Len(Temp2))
GetSerialNumber = SerialNum
End Function
Private Sub Form_Load()
Text1.Text = GetSerialNumber("C:\")
End Sub
Selesai Deh...

Sabtu, 30 Juni 2012
SourceCode Bobo RegEdit
SourceCode Proggram Koprasi
yang Mau Download bIsa Langsung.,.,.,
Kali Ini Saya Tidak Mau Basa-Basi...
Karna Juga Saya Lagi Bnyak Urusan Ya .,.,
saya Minta Maaf.,.,
-=-=-=-=-=-=-=-=-
visual Basic 6
-=-=-=-=-=-=-=-=-
Download--:> Click Hare
Kali Ini Saya Tidak Mau Basa-Basi...
Karna Juga Saya Lagi Bnyak Urusan Ya .,.,
saya Minta Maaf.,.,
-=-=-=-=-=-=-=-=-
visual Basic 6
-=-=-=-=-=-=-=-=-
Download--:> Click Hare

Jumat, 29 Juni 2012
mengganti Gambar Command Button Saat Di CLICK
-:> Buka VisualBasic
-:> Buat Form Dengan 1 Command Button
Properti
Name : command1
Caption : Input
Picture : silakan abil dari computer anda sendiri
Style : 1 – Graphical
-:> Doubble Clik Command Button
Masukkan Code Berikut:
Private Sub Command1_Click()
Command1.Picture = LoadPicture("D:\Buku VB\Buku 4\icons
Computer\004.ico")
Command1.Caption = "Simpan"
End Sub
-:> RUN Project
-:> Click Command 1
Dan Lihat Perubahannya.,.,.,
-:> Buat Form Dengan 1 Command Button
Properti
Name : command1
Caption : Input
Picture : silakan abil dari computer anda sendiri
Style : 1 – Graphical
-:> Doubble Clik Command Button
Masukkan Code Berikut:
Private Sub Command1_Click()
Command1.Picture = LoadPicture("D:\Buku VB\Buku 4\icons
Computer\004.ico")
Command1.Caption = "Simpan"
End Sub
-:> RUN Project
-:> Click Command 1
Dan Lihat Perubahannya.,.,.,

Source Code SMS Manager
Memindahkan Kontrol saat RunTime
Hanya Sebuah Code Anda Bisa Memindahkan Kontrol Dengan Drag-Drop Saat Aplikasi RunTime..
Ikuti Langkah-langkahNya
-:>buatlah sebuah Form dengan sebuah Button / tombol didalamnya
Di bagian 'Command1_MouseMove' ketikkan :
Static l As Integer, t As Integer
If Button = 1 Then
Command1.Left = (Command1.Left + X) - l
Command1.Top = (Command1.Top + Y) - t
Else
l = X
t = Y
End If

Langganan:
Postingan (Atom)