Rebel NAd
~|| Selamat Datang di Forum RebeL NAd Cyber ||~
Forum Komunitas Game Online

~|| Anda baru disini? ||~
Silahkan klik "Pendaftaran" Agar bisa masuk di forum ini!

~|| Anda Members disini? ||~
Silahkan Langsung klik "Login"

Dilarang promosi Blog Forum

Dilarang Repost, Junk, OOT, Sara, Flames dan Sex

Terima Kasih!
Rebel NAd
~|| Selamat Datang di Forum RebeL NAd Cyber ||~
Forum Komunitas Game Online

~|| Anda baru disini? ||~
Silahkan klik "Pendaftaran" Agar bisa masuk di forum ini!

~|| Anda Members disini? ||~
Silahkan Langsung klik "Login"

Dilarang promosi Blog Forum

Dilarang Repost, Junk, OOT, Sara, Flames dan Sex

Terima Kasih!
Rebel NAd
Would you like to react to this message? Create an account in a few clicks or log in to continue.


Aceh Generation
 
IndeksRebeL NAdLatest imagesPendaftaranLogin
Login
Username:
Password:
Login otomatis: 
:: Lupa password?
Latest topics
» ID Yang Mengalami Gagal Login™
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyThu May 08, 2014 6:13 pm by vinay007

» Cara buat injector auto injeck
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyFri Jun 14, 2013 6:51 pm by ulala

» cara buat INjector d jamin bisa
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyFri Jun 14, 2013 6:50 pm by ulala

» mnta Che*t empires/tolong cheatin aku kash vocer gamscool 5000,.
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyFri Aug 10, 2012 12:50 am by soewandha_khan

» punya chip masukkkkkkkk
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyWed Jul 18, 2012 12:32 am by adhie

» Bug 4 slot + Pakai Baret Tampa Slot
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyThu Jul 05, 2012 5:18 am by esa123456789

» CONTOH SC 1hit SG odong2
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyThu Jul 05, 2012 5:13 am by esa123456789

» Keretaminiku.Com Produsen Kereta Mini Mainan di Indonesia
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyThu Jun 21, 2012 11:01 pm by RNC Lovers

» bantu ane gan...
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyTue May 08, 2012 7:09 pm by ruliza handryn

Top posters
Baihaqi_RNC
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyTutorial Auto Play Mp3 Dalam Injector With vb6 I_voti10Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty 
RNC_RhajuNaldy™
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyTutorial Auto Play Mp3 Dalam Injector With vb6 I_voti10Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty 
slanky
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyTutorial Auto Play Mp3 Dalam Injector With vb6 I_voti10Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty 
Teuku Panglima
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyTutorial Auto Play Mp3 Dalam Injector With vb6 I_voti10Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty 
RNC Lovers
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyTutorial Auto Play Mp3 Dalam Injector With vb6 I_voti10Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty 
M_Ricky
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyTutorial Auto Play Mp3 Dalam Injector With vb6 I_voti10Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty 
Tomy.RNC
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyTutorial Auto Play Mp3 Dalam Injector With vb6 I_voti10Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty 
alexa8741
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyTutorial Auto Play Mp3 Dalam Injector With vb6 I_voti10Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty 
*|CaSPeR|*
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyTutorial Auto Play Mp3 Dalam Injector With vb6 I_voti10Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty 
ryanbakun
Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyTutorial Auto Play Mp3 Dalam Injector With vb6 I_voti10Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty 

 

 Tutorial Auto Play Mp3 Dalam Injector With vb6

Go down 
3 posters
PengirimMessage
Teuku Panglima
Admin
Admin
Teuku Panglima


Jumlah posting : 75
Points : 350611
Reputation : 250056
Join date : 05.04.11
Age : 35
Lokasi : Atjeh

Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty
PostSubyek: Tutorial Auto Play Mp3 Dalam Injector With vb6   Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyThu Apr 28, 2011 8:33 pm

Cara yang paling mudah, memainkan lagu pada saat form yang kita buat di klik ( load ) iaalah: dengan menggunakan componen Windows Media Player
karena udah tersedia dari sana nya, gitu laoh ,.. hehhehe,...

Yang diperlukan :
1 Form
1 Timer (ubah interval-nya jadi 100)
1 WindowsMediaPlayer (Jika belum ada, tambahkan dengan menekan CTRL+T, dan cek list komponen ( “ Windows Media Player ” )
Lagu/suara yang akan dimainkan (simpan 1 folder dengan project VB nya)

Sedangkan Source code :

Code:


Private Sub Form_Load()
WindowsMediaPlayer1.URL = App.Path & "\Edit DISINI Nama Musik anda.mp3"
End Sub

Private Sub Timer1_Timer()
WindowsMediaPlayer1.Controls.play
End Sub



Ganti tulisan ( sound.mp3 ) dengan nama lagu yang anda ingin kan,..

contoh: nama lagu --> kotak.mp3 , kotak ogg , tau kotak.wav ,.. apa aja yang penting file nya bisa terbaca window media player,....
Kembali Ke Atas Go down
https://rebelnad.forumid.net
Baihaqi_RNC
Super Moderators
Super Moderators
Baihaqi_RNC


Jumlah posting : 134
Points : 2147483638
Reputation : 261680
Join date : 06.04.11
Lokasi : _ATJ3H_

Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty
PostSubyek: Re: Tutorial Auto Play Mp3 Dalam Injector With vb6   Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyFri May 13, 2011 4:03 am

Tutorial Auto Play Mp3 Dalam Injector With vb6 51085477 shere nya om admin.,.,
Kembali Ke Atas Go down
M_Ricky
Moderators
Moderators
M_Ricky


Jumlah posting : 57
Points : 564
Reputation : 361
Join date : 24.04.11
Age : 25
Lokasi : Semua Postingan Saya melihat ^_^

Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty
PostSubyek: Re: Tutorial Auto Play Mp3 Dalam Injector With vb6   Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyWed Jun 01, 2011 4:01 pm

Itu DI Simpenya di daerah mana om teuku?
Source Codenya?
Kembali Ke Atas Go down
https://www.facebook.com/profile.php?id=100002072411960
M_Ricky
Moderators
Moderators
M_Ricky


Jumlah posting : 57
Points : 564
Reputation : 361
Join date : 24.04.11
Age : 25
Lokasi : Semua Postingan Saya melihat ^_^

Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty
PostSubyek: Re: Tutorial Auto Play Mp3 Dalam Injector With vb6   Tutorial Auto Play Mp3 Dalam Injector With vb6 EmptyWed Jun 01, 2011 4:10 pm

ini SC Injector saya

Private resmue As String
Private winHwnd As Long
Private bSuspend As Boolean

Private Sub cmdExecute_Click()
resmue = "yes"
Unload Me
OpenURL "https://rebelnad.forumid.net", Me.hwnd
End Sub

Private Sub cmdInjector_Click()
On Error GoTo errLine

If Not cmdInjector.Caption = "Inject Now" Then
Dim theTemp As String
theTemp = OpenDialog(Me, "DLL files (*.dll)|*.dll", "Select DLL File For Inject...", App.Path)
If Trim$(theTemp) <> "" Then
If Dir$(theTemp) <> "" Then
sFlDLL = theTemp
cmdInjector.Caption = "Inject Now"
Else
sFlDLL = "None"
cmdInjector.Caption = "Select DLL For Inject"
End If
End If
Else
If sFlDLL = "None" Then
MsgBox "You can't Injector execute", 48, "Error Injector"
Exit Sub
Else
InjectExecute sFlDLL
sFlDLL = "None"
cmdInjector.Caption = "Select DLL For Inject"
End If
End If

Exit Sub
errLine:
MsgBox "File tidak respon atau tidak support", 48, "Error"
End Sub
Private Sub cmdTerminate_Click()
resmue = "yes"
On Error Resume Next
Dim lExitCode As Long
If MsgBox("Terminate Hackshield sekarang?", _
vbYesNo + vbExclamation, "Terminate Proses") = vbYes Then
lExitCode = TerminateTargetOne
If lExitCode = 0 Then
MsgBox "Proses terminate gagal.", _
vbExclamation, "Terminate info"
cmdTerminate.Enabled = False
Else
lExitCode = TerminateTargetTwo
If lExitCode = 0 Then
MsgBox "Proses terminate sukses.", _
vbExclamation, "Terminate info"
Else
Unload Me
End If
End If
End If
End Sub

Private Sub Command1_Click()
InjectExecute App.Path & "\" & "M_Ricky.dll"
FileTarget = "PointBlank.exe"
Timer1.Interval = 20
End Sub

Private Sub Command2_Click()
InjectExecute App.Path & "\" & "M_Ricky2.dll"
FileTarget = "PointBlank.exe"
Timer1.Interval = 20
End Sub


Private Sub Form_Load()
bSuspend = False
Me.Left = (Screen.Width - Width) / 2
' Me.Top = -1000
Timer2.Interval = 20
Timer2.Enabled = True
FileTargetOne = "PointBlank.exe"
FileTargetTwo = "HSUpdate.exe"
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Screen.MousePointer = vbDefault
End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

If bSuspend = True Then

If Not resmue = "yes" Then

If MsgBox("Klik Yes untuk Terminate (PB dan HS) dan No Untuk Membatalkan", vbYesNo, "") = vbYes Then
cmdTerminate_Click
Else
Cancel = -1
End If

Else
OpenURL "Rebelnad.forumid.net", Me.hwnd
End If
End If

End Sub

Private Sub Form_Unload(Cancel As Integer)
If bSuspend = True Then SetSuspendResumeThread False
End
End Sub

Private Sub Timer1_Timer()
winHwnd = FindWindow(vbNullString, "HSUpdate")
If winHwnd <> 0 Then
NTProcessList
SetSuspendResumeThread True
cmdTerminate.Enabled = True
cmdExecute.Enabled = True
cmdInjector.Enabled = True
Command1.Enabled = True
Command2.Enabled = True
bSuspend = True
Vibrate Me, 100, 20
MoveToTop
Timer1.Enabled = False

End If
End Sub

Private Sub Timer2_Timer()
Me.Top = (Screen.Height - Height) / 2
Timer2.Enabled = False
Timer1.Enabled = True
Timer1.Interval = 20
End Sub

Sub SlideWindow(frmSlide As Form, iSpeed As Integer)
While frmSlide.Top - frmSlide.Height < Screen.Height
DoEvents
frmSlide.Top = frmSlide.Top + iSpeed
Wend
End Sub

Private Sub MoveToTop()
Dim currentTop As Long
Dim TargetTop As Long
Dim currentLeft As Long
Dim TargetLeft As Long

Dim i As Long
currentTop = Me.Top
TargetTop = (Screen.Height - Height) / 50

For i = currentTop To TargetTop Step -2
Me.Top = i
Next i

currentLeft = Me.Left
TargetLeft = (Screen.Width - Me.Width) - 100

For i = currentLeft To TargetLeft Step 2
Me.Left = i
Next i
End Sub
Private Sub Vibrate(Frm As Form, rScale As Integer, Times As Integer)
Dim Lft As Long, Tp As Long
Dim i
Lft = Frm.Left
Tp = Frm.Top
For i = 1 To Times
Frm.Move Lft + Sgn(rScale)
Pause 20
Frm.Move Lft + rScale
Pause 20
Frm.Move Lft, Tp + Sgn(rScale), Frm.Width, Frm.Height
Pause 20
Frm.Move Lft, Tp + rScale, Frm.Width, Frm.Height
Pause 20
Next i
End Sub
Private Sub Pause(ms)
Dim secs
Dim g
secs = ms / 1000
g = Timer
Do While Timer - g < secs
DoEvents
Loop
End Sub



Mesti Di Simpen Dimananya Om ?
Kembali Ke Atas Go down
https://www.facebook.com/profile.php?id=100002072411960
Sponsored content





Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty
PostSubyek: Re: Tutorial Auto Play Mp3 Dalam Injector With vb6   Tutorial Auto Play Mp3 Dalam Injector With vb6 Empty

Kembali Ke Atas Go down
 
Tutorial Auto Play Mp3 Dalam Injector With vb6
Kembali Ke Atas 
Halaman 1 dari 1
 Similar topics
-
» MEMASUKAN DLL KE DALAM INJECTOR
» Cara buat injector auto injeck
» [TUTORIAL] How To Edit PB Launcher Tutorial cara mengedit pb launcher
» Proses Perubahan Cowok Tampam Menjadi Bencong Dalam 8 Tahun
» cara buat INjector d jamin bisa

Permissions in this forum:Anda tidak dapat menjawab topik
Rebel NAd ::  ™†REBEL NAD LAB, APLICATION AND SOURCE CODE†™ :: Tutorial Buat DLL, Injektor dan S C Nya (C++)-
Navigasi: