Download BBM For PC (Windows 7/8/XP)

BBM for PC (BBM) is usually an amazing Internet-based immediate messenger along with video telephony program. It had been developed by the manufacturer on the BBM, BBM for PC Confined (formerly generally known as Exploration Throughout Motion Confined (RIM)). It had been produced in order to Operating system a short time in the past. Adhere to your article to install BBM for PC.

BBM application is now for Android mobile phone as well as iOS systems. In line with the Canadian organization, tend to be about half a dozen million people.Not like different messaging support, BBM for PC, takes a several methods to become applied. Approach accustomed to handle effectively the device that will promotes this mobile application. An effective line for a best launch method is executed.

Requirements:-

• 1. Android SDK

• 2. Download and extract Android SDK bundle from this link.

• 3. BBM APK

• 4. Download and extract BBM Apk from here.

How To Install Or Use  BBM For PC

1. Go to the extracted adt-bundle folder. Available SDK Manager.exe

2. Within the opened screen choose tools -> Manange AVD.

3. Make a new Android mobile phone Exclusive System together with RAM more than 512 MB after which it start this created Exclusive System.

4. Backup this saved BBM.apk document to help course [Extracted Folder]/sdk/platform-tools/

in ways that this document ought to be /sdk/platform-tools/BBM.apk

5. Currently go on to this folder /sdk/platform-tools/ applying document explorer.

6. Select File->Open Command Prompt within the platform-tools folder(for windows 8).

or

Press and hold support the shift key and right-click the platform-tools folder and simply click Wide open Command Window Here(for windows 7).

7. Right now get into command within the command prompt.

8. Await some a few minutes. Right now BBM will be set up with your Exclusive System. Wide open this BBM for PC app in the app launcher.

Read More

Membuat Injector sendiri

[Tutorial] Cara Membuat Injector sendiri

1.Buka Visual Basic 6. Klik Disini Untuk Visual Basic 6 Enterprise Edition [FULL]
2.buat 1 form dengan nama form1 , kemudian Isi Form1 dengan 6 Timer, simpan dimana saja.
buat 6 command button, masing2 beri nama :
- Command1
- Command2
- Command3
- cmdInjector
- cmdExecute
- cmdTerminate

3. - Untuk cmdInjector beri nama pada menu Caption "Select DLL For Inject"
- Untuk cmdExecute beri nama pada menu Caption "Resume"
- Untuk cmdTerminate beri nama pada menu Caption "Terminate"

4. Klik kanan pada Form1 -> View Code , lalu masukan Code berikut :

'N2 Injector Revisi 5 November 2010 by Sapta_Agunk, Multi Injector (WhItE_Injector) by Sapta_Agunk from nstars.net [N2]

Private noc As Integer
Private str1 As String
Private str2 As String
Private str3 As String
Private strmessage As String

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

Option Explicit
Private Declare Function ExtCreateRegion Lib "gdi32" (lpXform As Any, ByVal nCount As Long, lpRgnData As Any) As Long
Private Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long, ByVal hRgn As Long, ByVal bRedraw As Boolean) As Long

Dim bytRegion(31) As Byte
Dim nBytes As Long
'Win 2k, ME, XP
Private Const GWL_EXSTYLE As Long = (-20)
Private Const WS_EX_LAYERED As Long = &H80000
Private Const LWA_ALPHA As Long = &H2
Private NamaDll As String
Private Declare Function GetWindowLongA Lib "user32" (ByVal hWnd As Long, _
ByVal nIndex As Long) As Long
Private Declare Function SetWindowLongA Lib "user32" (ByVal hWnd As Long, _
ByVal nIndex As Long, _
ByVal dwNewLong As Long) As Long
Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hWnd As Long, _
ByVal crey As Byte, _
ByVal bAlpha As Byte, _
ByVal dwFlags As Long) As Long


Private Sub cmdExecute_Click()
resmue = "yes"
Unload Me
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 "Succsses.! Jika ada masalah hubungi nstars.net !!", _
vbExclamation, "Succsses Terminate N2 Injector"
Else
Unload Me
End If
End If
End If
End Sub

Private Sub Command1_Click()
InjectExecute App.Path & "\Exm1.dll"
End Sub

Private Sub Command2_Click()
InjectExecute App.Path & "\Exm2.dll"
End Sub

Private Sub Command3_Click()
InjectExecute App.Path & "\Exm3.dll"
End Sub

Private Sub File1_Click()

End Sub

'fungsi transparent form
Private Sub Opacity(Value As Byte, _
Frm As Form)


Dim MaxVal As Byte
Dim MinVal As Byte

On Error GoTo ErrorHandler
MinVal = 20
MaxVal = 255
If Value > MaxVal Then
Value = MaxVal
End If
If Value < MinVal Then
Value = MinVal
End If
SetWindowLongA Frm.hWnd, GWL_EXSTYLE, GetWindowLongA(Frm.hWnd, GWL_EXSTYLE) Or WS_EX_LAYERED
SetLayeredWindowAttributes Frm.hWnd, 0, Value, LWA_ALPHA
ErrorHandler:

Exit Sub

End Sub


Private Sub form_load()
Dim Welcome As String
Welcome = MsgBox("Jangan Lupa Ucapkan terimakasih to Sapta_Agunk !! ^_^V Peace !! ", vbInformation, "N2 Injector")
Welcome = MsgBox(" oea ada yg kelupaan !! Selamat Bergabung di nstars.net !! xixixixi", vbInformation, "Jangan Lupa Koment ya !!")
bSuspend = False
Timer2.Interval = 20
Timer2.Enabled = True
FileTargetOne = "PointBlank.exe" 'target nya sob
FileTargetTwo = "HSUpdate.exe" 'target nya juga xixixixi
str1 = "Sapta_Agunk" 'contoh text yg akan Kedap Kedip
str2 = "Special Thanks to Credit" 'contoh text yg akan Kedap Kedip
str3 = "http://www.nstars.net _copyright@2010 " 'contoh text yg akan berjalan sob
Opacity 200, Me 'pengaturan transparent form MinVal = 20: MaxVal = 255
WindowsMediaPlayer1.URL = App.Path & "\Exm.mp3" 'nih audio nya sob
Dim rgnMain As Long

nBytes = 100

LoadBytes

rgnMain = ExtCreateRegion(ByVal 0&, nBytes, bytRegion(0))
SetWindowRgn Me.hWnd, rgnMain, True



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 "http://nstars.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
'pengaturan tombol jadi aktif
Command1.Enabled = True
Command2.Enabled = True
Command3.Enabled = True
bSuspend = True
Vibrate Me, 100, 50
Timer1.Enabled = False
Else
cmdTerminate.Enabled = False
cmdExecute.Enabled = False
cmdInjector.Enabled = False
'-------------------------
'pengaturan tombol jadi tidak aktif
Command1.Enabled = False
Command2.Enabled = False
Command3.Enabled = False

Timer1.Enabled = True
bSuspend = 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
Private Sub Timer3_Timer()

If Label1.Visible = True Then
Label1.Visible = False
Else
Label1.Visible = True
End If

End Sub
Private Sub Timer4_Timer()

If Label3.Visible = True Then
Label3.Visible = False
Else
Label3.Visible = True
End If

End Sub
Private Sub timer5_Timer()

Timer5.Interval = 300
Label4.Caption = Mid(Label4.Caption, 2, Len(Label4.Caption) - 1) + Mid(Label4.Caption, 1, 1)


End Sub
Private Sub Timer6_Timer()

WindowsMediaPlayer1.Controls.play

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

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


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 = 0 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
Private Sub LoadBytes()
bytRegion(0) = 100
bytRegion(4) = 10
End Sub

5. Jika sudah lalu buat 4 Module, dengan memilih Project -> Add Module (ALT+P+M), lalu beri Nama :
- ModCDialog
- ModInjector
- ModBrowser
- ModProcess

6. Kemudian pada ModCDialog Isi kan Code berikut :

Option Explicit

'Common Dialog
Private Type OPENFILENAME
lStructSize As Long
hWndOwner As Long
hInstance As Long
lpstrFilter As String
lpstrCustomFilter As String
nMaxCustFilter As Long
nFilterIndex As Long
lpstrFile As String
nMaxFile As Long
lpstrFileTitle As String
nMaxFileTitle As Long
lpstrInitialDir As String
lpstrTitle As String
Flags As Long
nFileOffset As Integer
nFileExtension As Integer
lpstrDefExt As String
lCustData As Long
lpfnHook As Long
lpTemplateName As String
End Type

Public Const OFN_READONLY = &H1
Public Const OFN_OVERWRITEPROMPT = &H2
Public Const OFN_HIDEREADONLY = &H4
Public Const OFN_NOCHANGEDIR = &H8
Public Const OFN_SHOWHELP = &H10
Public Const OFN_ENABLEHOOK = &H20
Public Const OFN_ENABLETEMPLATE = &H40
Public Const OFN_ENABLETEMPLATEHANDLE = &H80
Public Const OFN_NOVALIDATE = &H100
Public Const OFN_ALLOWMULTISELECT = &H200
Public Const OFN_EXTENSIONDIFFERENT = &H400
Public Const OFN_PATHMUSTEXIST = &H800
Public Const OFN_FILEMUSTEXIST = &H1000
Public Const OFN_CREATEPROMPT = &H2000
Public Const OFN_SHAREAWARE = &H4000
Public Const OFN_NOREADONLYRETURN = &H8000
Public Const OFN_NOTESTFILECREATE = &H10000
Public Const OFN_NONETWORKBUTTON = &H20000
Public Const OFN_NOLONGNAMES = &H40000 ' force no long names for 4.x modules
Public Const OFN_EXPLORER = &H80000 ' new look commdlg
Public Const OFN_NODEREFERENCELINKS = &H100000
Public Const OFN_LONGNAMES = &H200000 ' force long names for 3.x modules
Public Const OFN_SHAREFALLTHROUGH = 2
Public Const OFN_SHARENOWARN = 1
Public Const OFN_SHAREWARN = 0

Private Declare Function GetOpenFileName Lib "COMDLG32.DLL" Alias "GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long
Private Declare Function GetSaveFileName Lib "COMDLG32.DLL" Alias "GetSaveFileNameA" (pOpenfilename As OPENFILENAME) As Long

'Browse Folder Declarations
Private Type BrowseInfo
hWndOwner As Long
pIDLRoot As Long
pszDisplayName As Long
lpszTitle As Long
ulFlags As Long
lpfnCallback As Long
lParam As Long
iImage As Long
End Type
Private Const BIF_RETURNONLYFSDIRS = 1
Private Const MAX_PATH = 260
Public Const BIF_STATUSTEXT = &H4&
Public Const BIF_DONTGOBELOWDOMAIN = 2
Public Const WM_USER = &H400
Public Const BFFM_INITIALIZED = 1
Public Const BFFM_SELCHANGED = 2
Public Const BFFM_SETSTATUSTEXT = (WM_USER + 100)
Public Const BFFM_SETSELECTION = (WM_USER + 102)

Private Declare Sub CoTaskMemFree Lib "ole32.dll" (ByVal hMem As Long)
Private Declare Function lstrcat Lib "kernel32" Alias "lstrcatA" (ByVal lpString1 As String, ByVal lpString2 As String) As Long
Private Declare Function SHBrowseForFolder Lib "shell32" (lpbi As BrowseInfo) As Long
Private Declare Function SHGetPathFromIDList Lib "shell32" (ByVal pidList As Long, ByVal lpBuffer As String) As Long

Function OpenDialog(Form1 As Form, Filter As String, Title As String, InitDir As String) As String
Dim ofn As OPENFILENAME
Dim A As Long
Dim theTemp As String

ofn.lStructSize = Len(ofn)
ofn.hWndOwner = Form1.hwnd
ofn.hInstance = App.hInstance
If Right$(Filter, 1) <> "|" Then Filter = Filter + "|"
For A = 1 To Len(Filter)
If Mid$(Filter, A, 1) = "|" Then Mid$(Filter, A, 1) = Chr$(0)
Next
ofn.lpstrFilter = Filter
ofn.lpstrFile = Space$(254)
ofn.nMaxFile = 255
ofn.lpstrFileTitle = Space$(254)
ofn.nMaxFileTitle = 255
ofn.lpstrInitialDir = InitDir
ofn.lpstrTitle = Title
ofn.Flags = OFN_HIDEREADONLY Or OFN_FILEMUSTEXIST
A = GetOpenFileName(ofn)

If (A) Then
theTemp = Trim$(ofn.lpstrFile)
If Asc(Right$(theTemp, 1)) = 0 Then theTemp = Left$(theTemp, Len(theTemp) - 1)
OpenDialog = theTemp
Else
OpenDialog = ""
End If
End Function

Public Function BrowseForFolder(hWndOwner As Long, sPrompt As String) As String
'**************************************
' Name: Win95DirectoryPrompt
' Description:Prompting the User for a D
' irectory in Win95. Windows' common dialo
' gs are great if you want the user to sel
' ect a file, but what if you want them to
' select a directory? Call the following f
' unction, which relies on Win32's new SHB
' rowseForFolder function:
' By: Found on the World Wide Web
Dim iNull As Integer
Dim lpIDList As Long
Dim lResult As Long
Dim sPath As String
Dim udtBI As BrowseInfo


With udtBI
.hWndOwner = hWndOwner
.lpszTitle = lstrcat(sPrompt, "")
.ulFlags = BIF_RETURNONLYFSDIRS
End With
lpIDList = SHBrowseForFolder(udtBI)


If lpIDList Then
sPath = String$(MAX_PATH, 0)
lResult = SHGetPathFromIDList(lpIDList, sPath)
Call CoTaskMemFree(lpIDList)
iNull = InStr(sPath, vbNullChar)


If iNull Then
sPath = Left$(sPath, iNull - 1)
End If
End If
If InStr(LCase$(sPath), "\nethood") > 0 Then
MsgBox "The item that you selected is a folder shortcut, not a folder.", vbCritical, "Browse Folders"
BrowseForFolder = ""
Else
BrowseForFolder = sPath
End If
End Function

7. Isikan Code Berikut Pada ModInjector :

Option Explicit

Private Declare Function GetProcAddress Lib "kernel32" (ByVal hModule As Long, ByVal lpProcName As String) As Long
Private Declare Function GetModuleHandle Lib "kernel32" Alias "GetModuleHandleA" (ByVal lpModuleName As String) As Long
Private Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As Long
Private Declare Function VirtualAllocEx Lib "kernel32" (ByVal hProcess As Long, lpAddress As Any, ByVal dwSize As Long, ByVal fAllocType As Long, flProtect As Long) As Long
Public Declare Function WriteProcessMemory Lib "kernel32" (ByVal hProcess As Long, ByVal lpBaseAddress As Any, lpBuffer As Any, ByVal nSize As Long, lpNumberOfBytesWritten As Long) As Long
Private Declare Function CreateRemoteThread Lib "kernel32" (ByVal ProcessHandle As Long, lpThreadAttributes As Long, ByVal dwStackSize As Long, ByVal lpStartAddress As Any, ByVal lpParameter As Any, ByVal dwCreationFlags As Long, lpThreadID As Long) As Long
Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)


Public Function InjectDll(DllPath As String, ProsH As Long)
Dim DLLVirtLoc As Long, DllLength, Inject As Long, LibAddress As Long
Dim CreateThread As Long, ThreadID As Long
Dim Bla As VbMsgBoxResult

g_loadlibary:
LibAddress = GetProcAddress(GetModuleHandle("kernel32.dll"), "LoadLibraryA")
If LibAddress = 0 Then
Bla = MsgBox("Can't find LoadLibrary API from kernel32.dll", vbYesNo, "ERROR")
If Bla = vbYes Then
GoTo g_loadlibary
Else
Exit Function
End If
End If

g_virutalallocex:
DllLength = Len(DllPath)
DLLVirtLoc = VirtualAllocEx(ProsH, 0, DllLength, &H1000, ByVal &H4)
If DLLVirtLoc = 0 Then
Bla = MsgBox("VirtualAllocEx API failed! - try again?", vbYesNo, "ERROR")
If Bla = vbYes Then
GoTo g_virutalallocex
Else
Exit Function
End If
End If

g_writepmemory:
Inject = WriteProcessMemory(ProsH, ByVal DLLVirtLoc, ByVal DllPath, DllLength, vbNull)
If Inject = 0 Then
Bla = MsgBox("Failed to Write DLL to Process! - try again?", vbYesNo, "ERROR")
If Bla = vbYes Then
GoTo g_writepmemory
Else
Exit Function
End If
End If

g_creatthread:
CreateThread = CreateRemoteThread(ProsH, ByVal 0, 0, ByVal LibAddress, ByVal DLLVirtLoc, 0, ThreadID)
If CreateThread = 0 Then
Bla = MsgBox("Failed to Create Thead! - try again?", vbYesNo, "ERROR")
If Bla = vbYes Then
GoTo g_creatthread
Else
Exit Function
End If
End If

MsgBox "Seep.. prosses inject telah succsses. Happy CHeating", 64, "White Injector succsses"

End Function

Public Sub InjectExecute(ByVal sFlDLL As String)
Dim lProcInject As Long
lProcInject = OpenProcess(PROCESS_ALL_ACCESS, 0, IdTargetOne)
If lProcInject > "0" Then
Call InjectDll(sFlDLL, lProcInject)
End If
Call CloseHandle(lProcInject)
End Sub

9. Isikan ModBrowser dengan Code Berikut

'modul buka browser
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
(ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long

Public Sub OpenURL(situs As String, sourceHWND As Long)
Call ShellExecute(sourceHWND, vbNullString, situs, vbNullString, vbNullString, 1)
End Sub

10.Isikan ModProcess dengan Code berikut

Option Explicit

Public Declare Function FindWindow Lib "USER32" Alias "FindWindowA" (ByVal Classname As String, ByVal WindowName As String) As Long
Public Declare Function PostMessage Lib "USER32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Public Declare Function Process32First Lib _
"kernel32" (ByVal hSnapShot As Long, _
uProcess As PROCESSENTRY32) As Long
Public Declare Function Process32Next Lib _
"kernel32" (ByVal hSnapShot As Long, _
uProcess As PROCESSENTRY32) As Long
Public Declare Function CloseHandle Lib _
"kernel32" (ByVal hObject As Long) As Long

Public FileTargetOne As String
Public FileTargetTwo As String
Public sFlDLL As String

Public IdTargetOne As Long
Private IdTargetTwo As Long

Private Const TH32CS_SNAPHEAPLIST = &H1
Private Const TH32CS_SNAPPROCESS = &H2
Private Const TH32CS_SNAPTHREAD = &H4
Private Const TH32CS_SNAPMODULE = &H8
Private Const TH32CS_SNAPALL = (TH32CS_SNAPHEAPLIST Or _
TH32CS_SNAPPROCESS Or TH32CS_SNAPTHREAD Or TH32CS_SNAPMODULE)
Private Const MAX_PATH = 260
Public Const PROCESS_ALL_ACCESS = &H1F0FFF

Private Type PROCESSENTRY32
dwSize As Long
cntUsage As Long
th32ProcessID As Long
th32DefaultHeapID As Long
th32ModuleID As Long
cntThreads As Long
th32ParentProcessID As Long
pcPriClassBase As Long
dwFlags As Long
szExeFile As String * MAX_PATH
End Type

Private Type MODULEENTRY32
dwSize As Long
th32ModuleID As Long
th32ProcessID As Long
GlblcntUsage As Long
ProccntUsage As Long
modBaseAddr As Long
modBaseSize As Long
hModule As Long
szModule As String * 256
szExePath As String * 260
End Type

Private Type THREADENTRY32
dwSize As Long
cntUsage As Long
th32ThreadID As Long
th32OwnerProcessID As Long
tpBasePri As Long
tpDeltaPri As Long
dwFlags As Long
End Type

Private Const THREAD_SUSPEND_RESUME = &H2
Private Declare Function OpenThread Lib _
"kernel32.dll" (ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Boolean, _
ByVal dwThreadId As Long) As Long
Private Declare Function ResumeThread Lib _
"kernel32.dll" (ByVal hThread As Long) As Long
Private Declare Function SuspendThread Lib _
"kernel32.dll" (ByVal hThread As Long) As Long
Private hThread As Long

Private Declare Function CreateToolhelp32Snapshot Lib _
"kernel32" (ByVal lFlags As Long, _
ByVal lProcessID As Long) As Long

Private Declare Function Module32First Lib _
"kernel32" (ByVal hSnapShot As Long, _
uProcess As MODULEENTRY32) As Long
Private Declare Function lstrlen Lib _
"kernel32" Alias "lstrlenA" ( _
ByVal lpString As String) As Long
Private Declare Function GetFileTitle Lib _
"COMDLG32.DLL" Alias "GetFileTitleA" ( _
ByVal lpszFile As String, _
ByVal lpszTitle As String, _
ByVal cbBuf As Integer) As Integer

Private Declare Function Thread32First Lib _
"kernel32.dll" (ByVal hSnapShot As Long, _
ByRef lpte As THREADENTRY32) As Boolean
Private Declare Function Thread32Next Lib _
"kernel32.dll" (ByVal hSnapShot As Long, _
ByRef lpte As THREADENTRY32) As Boolean

Public Declare Function OpenProcess Lib _
"kernel32" (ByVal dwDesiredAccess As Long, _
ByVal bInheritHandle As Long, _
ByVal dwProcessId As Long) As Long

Private Declare Function TerminateProcess Lib _
"kernel32" (ByVal hProcess As Long, _
ByVal uExitCode As Long) As Long

Public Function NTProcessList() As Long
On Error Resume Next
Dim FileName As String, ExePath As String
Dim hProcSnap As Long, hModuleSnap As Long, _
lProc As Long
Dim uProcess As PROCESSENTRY32, _
uModule As MODULEENTRY32
Dim intLVW As Integer
hProcSnap = CreateToolhelp32Snapshot(TH32CS_SNAPALL, 0&)
uProcess.dwSize = Len(uProcess)
lProc = Process32First(hProcSnap, uProcess)
Do While lProc
If uProcess.th32ProcessID <> 0 Then
hModuleSnap = CreateToolhelp32Snapshot(TH32CS_SNAPALL, uProcess.th32ProcessID)
uModule.dwSize = Len(uModule)
Module32First hModuleSnap, uModule
If hModuleSnap > 0 Then
ExePath = StripNulls(uModule.szExePath)
FileName = GetFName(ExePath)
If FileTargetOne = FileName Then IdTargetOne = uProcess.th32ProcessID
If FileTargetTwo = FileName Then IdTargetTwo = uProcess.th32ProcessID
End If
End If
lProc = Process32Next(hProcSnap, uProcess)
Loop
Call CloseHandle(hProcSnap)
Call CloseHandle(lProc)
End Function

Function StripNulls(ByVal sStr As String) As String
StripNulls = Left$(sStr, lstrlen(sStr))
End Function

Public Function GetFName(fn) As String
Dim f%, n%
GetFName = fn
f% = InStr(fn, "\")
Do While f%
n% = f%
f% = InStr(n% + 1, fn, "\")
Loop
If n% > 0 Then GetFName = Mid$(fn, n% + 1)
End Function


Private Function Thread32Enum(ByRef Thread() As THREADENTRY32, _
ByVal lProcessID As Long) As Long
On Error Resume Next
ReDim Thread(0)
Dim THREADENTRY32 As THREADENTRY32
Dim hThreadSnap As Long
Dim lThread As Long
hThreadSnap = CreateToolhelp32Snapshot(TH32CS_SNAPTHREAD, lProcessID)
THREADENTRY32.dwSize = Len(THREADENTRY32)
If Thread32First(hThreadSnap, THREADENTRY32) = False Then
Thread32Enum = -1
Exit Function
Else
ReDim Thread(lThread)
Thread(lThread) = THREADENTRY32
End If
Do
If Thread32Next(hThreadSnap, THREADENTRY32) = False Then
Exit Do
Else
lThread = lThread + 1
ReDim Preserve Thread(lThread)
Thread(lThread) = THREADENTRY32
End If
Loop
Thread32Enum = lThread
Call CloseHandle(hThreadSnap)
End Function

Public Function SetSuspendResumeThread(SuspendNow As Boolean) As Long
Dim Thread() As THREADENTRY32, hPID As Long, hThread As Long, i As Long
hPID = IdTargetOne
Thread32Enum Thread(), hPID
For i = 0 To UBound(Thread)
If Thread(i).th32OwnerProcessID = hPID Then
hThread = OpenThread(THREAD_SUSPEND_RESUME, False, (Thread(i).th32ThreadID))
If SuspendNow = True Then
SetSuspendResumeThread = SuspendThread(hThread)
Else
SetSuspendResumeThread = ResumeThread(hThread)
End If
End If
Next i
Call CloseHandle(hThread)
End Function

Public Function TerminateTargetOne() As Long
Dim hPID As Long
hPID = OpenProcess(PROCESS_ALL_ACCESS, 0, IdTargetOne)
TerminateTargetOne = TerminateProcess(hPID, 0)
Call CloseHandle(hPID)
End Function

Public Function TerminateTargetTwo() As Long
Dim hPID As Long
hPID = OpenProcess(PROCESS_ALL_ACCESS, 0, IdTargetTwo)
TerminateTargetTwo = TerminateProcess(hPID, 0)
Call CloseHandle(hPID)
End Function

11. Ingat : perhatikan kode command1 dan command2 pada listing code pada form1


Private Sub Command1_Click()
InjectExecute App.Path & "\Exm1.dll"
End Sub


- Ganti "Exm1.dll" dengan Nama dll yg pengen di masukin, Tapi Saat Inject Harus 1 Folder dengan Injector !


Semoga Bermanfaat...!!

Read More

cara Membuat tool internet gratis (Inject/suntik All Operator) dengan delphi

cara Membuat tool internet gratis (Inject/suntik All Operator) dengan delphi

 

wahai para pemakai tool gretongan...capek ya...nunggu - nunggu update tool gretongan dari orang laen?gak pengen bikin sendiri sih???atau dah mau bikin ndiri???, sebelum lanjut saya sangat menganjurankan sebelumnya, anda harus mempelajari sedikit tentang delphi, minimal basicnya..oke?! lanjut

         postingan kali ini saya akan share lagi tentang cara membuat inject all operator, dan kali ini menggunakan delphi, jadi harus instal delphi dong?, yah, trus downlod delphi dmna?, tanya sma mbah google aj yah, udah bnyak yang share. dan tutorialnya saya sudah bungkus rapih beserta source dan demo yang siap di oprek-oprek..:v

Download Borland Delphi 7

Langsung download tutorial dan source  disini

Read More

Injek Maker , Aplikasi pembuat Injek / Patch Internet Gratis

Injek Maker , Aplikasi pembuat Injek / Patch Internet Gratis

Ingin nyoba "Trik Internet Gratis" ? tetapi injek / patch sering CO.ID ?
Sekarang anda semua tidak perlu khawatir lagi, karena baru - baru ini saya telah membuat sebuah aplikasi yg bernama SOLO-IT Injek Maker.

Dengan adanya aplikasi ini ,
anda dapat membuat injek sendiri dengan mudah dan cepat tanpa harus mengerti coding.
Akan tetapi , untuk versi FREE anda hanya dapat membuat Injek khusus operator XL .
Jika anda ingin mencoba injek untuk operator lain , silahkan ORDER versi PRO.

Cara penggunaanya cukup mudah ,
Anda tinggal memasukkan Nama Injek, Bug Host , Proxy , Port , Gambar
dan Selamat ! Injek buatan anda sudah jadi

Berikut screenshotnya :

Untuk mendownload versi FREE , silahkan klik DISINI
Untuk versi PRO , maaf belum jadi ... :-p

Read More

Internet gratis menggunakan ssh

Met Sore mas bro dan mbak bro sekalian. Mumpung ane lagi ada waktu, ane mau bikinin sedikit totorial tentang internet gratis menggunakan tunneling ssh. Kalau kemarin masih pada bingung semoga setelah ini makin bingung, hahaha...

Persiapan alat perang :

1. Modem
2. Kartu cellular
3. Inject
4. Bitvise
5. Proxifier
6. Doa (ini paling penting bro :D)

Untuk tutorial kali ini ane menggunakan SC Luna.

Berikut Step By Step nya:
1. Pengaturan Modem.

• Beli kartu luna dolo bro yang harganya 4 ribu klo dimari

Kartu yang ane pake

• Kartu boleh di regristrasi atau tidak di regristratis (ane gak register bro :D)
• Untuk APN bisa pake "internet" atau "xlgprs" (ane pake apn "internet")
• Pastikan pilihan network ke wcdma only biar ngebut ya bro.
• Ini khusus bagi yang koneksinya sering DC (bagi yang gak sering DC lewati step ini. Lansung menuju bagian inject)

Saya anggap semua sudah bisa membikin koneksi dialup sendiri ya, klo gak bisa ngikut yang di bikin barengan waktu instalasi modem aje, secara otomatis sudah di buatin diap-up konection

• Masuk control panel lalu ke bagian network connection
• Klik doble profile dial-up anda.
• Setting seperti gambar di bawah:

Keterangan :

1. Klik kanan profile dial-up anda trus pilih properties
2. Klik Internet Protocol (win xp) kalau di win 7 Ipv4 Protocol
3. Klik proerties
4. Klik advance
5. Hilangin tanda centang di Use Default Gateway on Remote Network
6 - 8 . Klik OK

• Sekarang silahkan conect kan dial up anda boleh memakai software bawaan modem atau langsung lewat dialup profile.
• Setelah modem konek sekarang kita route, silahkan download route nya disini (khusus XL)
• klik doble aja bro file addroute.bat

Setelah modem anda konek dan sudah di route masuk ke tahap berikutnya.
2. Inject

• Download inject tere by TG disini.
• Pilih inject yang mau di gunakan sesuai kartu anda. (saya memakai inject Luna By TG ya bro, soalna inject luna ane kena densus ame yg punya operator :(( )
• Port sengaja gak ane utak atik bro ngikut bawaan inject aje.
• Klik start

3. Pengaturan Bitvise

• Download Bitvise terbaru disini
• Install bitvise sampe selesai
• Berikut cara setting bitvise nya:

Proxy Setting Bitvise

1. Klik Proxy settings
2. Centang pada Use proxy
3. Bagian server isi dengan : 127.0.0.1
4. Port isi dengan port yang tertera di inject, dalam contoh ini inject saya pake port 8089
5. Proxy type pilih HTTP
6. Klik OK

services setting bitvise

1. Masuk ke bagian Services
2. Centang bagian Enable
3. Listen Interface isi dengan 127.0.0.1
4. Listen Port isi sesuai selera anda, untuk contoh ini saya memilih port 123

Login setting bitvise

1. Masuk ke bagian Login
2. Host isi dengan ip ssh anda, contoh saya menggunakan ssh update tgl 25 kemarin ssh hongkong: 103.246.160.38
3. Port isi dengan port ssh anda contoh : 22
4. Username isi dengan user ssh anda, contoh admin
5. Initial Metdo pilih password
6. Password isi dengan password ssh anda, contoh password
7. Centang bagian store encrypted password in profile
8. Klik login.

catatan:

kalau anda menggunakan ssh dari situs sshgratis.com anda tidak perlu lagi memasukkan username dan password. Anda tinggal klik doble aja file berextensi .bscp maka secara otomatis host, port, username dan password akan terisi secara otomatis

sukses konek bitvise

4. Pengaturan Proxyfier

• Download proxyfier disini
• Install sampai selesai
• Berikut cara settingnya:

proxy setting Proxifier

1. Klik proxy server
2. Klik Add
3. server isi dengan : 127.0.0.1 Port isi sesuai settingan servise bitvise anda, contoh bitvise saya tadi service nya pake port 123 maka port na saya isi 123
4. Pilih protocolna HTTPS
5. Klik OK dan akan keluar dialog seperti dibawah

Langsung pilih yes aja

Setting rules proxyfier

1. Sekarang klik Proxifican Rules
2. Klik add
3. Pada aplikation pilih aplikasi yang tidak mau di lewatkan ke proxifier, contoh saya masukan TG.exe, supaya ketika klik inejct gak akan lewat jalur proxyfier. Anda bisa menambahkan file exe lain untuk ini.
4. Action pilih direct (artinya gak lewat proxyfier).
5. Klik OK

Rules proxifier

Sukses buat broswing

Nah semua udah beres bro, seharusnya anda sudah bisa menikmati internet gratis tanpa perlu bayar sepeserpun. Untuk memastikan kalau sudah sukses silahkan di pakai browsing.

Ip nya sesuai dengan ip ssh yang dipakai

Demikian tutorial singkat mengenai internet gratis menggunakan ssh, terimakasih untuk kritik dan saran anda selama ini. Mudah-mudahan indonesia semakin maju jika kita bisa saling berbagi ilmu pengetahuan walaupun sebatas yang kita tahu

Read More

cara membobol password WiFi/Hotspot yang menggunakan halaman Login (Login Page) Dengan Software TMAC v5 R3

SObat pasti ingin bisa internetan gratis. Berikut akan Saya berikan tips untuk hacking koneksi Wi-Fi untuk Sobat yang ingin mencobanya. Sebenarnya fungsi dari Software Technitium MAC Address Changer adalah untuk mengubah Media Access Control (MAC) Address perangkat Wireless di komputer atau laptop Sobat. Tapi sebelumnya Saya ingin mengingatkan, bila Sobat berhasil berarti Sobat telah melakukan pencurian koneksi Wi-Fi Laptop/komputer orang lain. Dosa dan resikonya ditanggung sendiri.


Trik ini hanya untuk mengingatkan Kita bahwa  sistem keamanan Wi-Fi yang menggunakan halaman login (login page) bisa di hack!!!  Saya tidak ada niat untuk mengajarkan berbuat jahat, oke? Jika Sobat tidak paham tentang trik ini. segala pertanyaan Sobat tidak akan Saya jawab!!! silahkan berexperimen sendiri.

Oke, langsung saja, Sebelumnya mencobanya, dibutuhkan seperangkat komputer atau laptop yang dilengkapi dengan Wireless Lan/Wi-Fi. 

Langkah-langkahnya sebagai berikut :

• Download software untuk hack koneksi Wi-Fi (TMACv5 R3) disini. 

• Kemudian Download juga tool untuk Scan IP disini. 

• Instal kedua software yang telah Sobat download tadi.
• Cari lokasi hotspot atau lokasi yang sinyal Wi-Fi nya bisa terdeteksi oleh Sobat.
• Hidupkan laptop atau komputer Sobat dan buka Wireless Network dan lihat di sistem tray icon wireless network, lalu klik kanan pilih view Available Wireless Network kemudian Sobat connect ke sinyal Wi-Fi yang terdeteksi oleh Sobat.

• Setelah berhasil connect, buka browser di laptop Sobat dan akan muncul halaman login (login page), contoh gambar di bawah ini :

• Kemudian Sobat klik kanan sistem tray dan pilih status pada langkah ini Sobat akan mendapatkan alamat IP yang diberikan kepada Wireless koneksi Sobat. Catat IP nya. Lihat gambar dibawah :

• Berikutnya buka software IP Scanner yang Sobat download tadi, masukan no Ip yang Sobat catat tadi misalnya 192.168.0.31 pada kolom IP Range pertama, tetapi pada angka terakhir IP yang Anda dapatkan tadi di ganti dengan angka 1, misalnya 192.168.0.31 menjadi 192.168.0.1  
• Lalu pada kolom IP Range kedua masukkan juga IP yang sama tetapi ganti angka 1 menjadi angka 254, maka pada kolom IP Range kedua IP nya menjadi 192.168.0.254 lalu klik tombol start untuk memulai scanning IP (Tombol Merah ). Lihat contoh gambar di bawah

• Setelah melakukan scanning maka Kita akan mendapatkan data IP Address yang hidup dan terkoneksi dengan hotspot tersebut. Kemudian lihat IP yang hidup (alive host) yang warna biru. 

• Lalu klik kanan pada IP yang hidup tadi warna biru hasilnya –> Show–> Mac Address jika berhasil maka akan muncul kode Mac Address ( Catatan : Terkadang Tidak Muncul Kode Mac Addressnya coba lagi IP lainnya ) Jika anda berhasil mendapatkan kode Mac Address . Catat Kodenya. Lihat gambar di bawah :

• Buka Software TMAC v5 R3 yang Sobat download dan instal ke laptop Sobat. Cari tombol Change MAC maka akan muncul kolom tempat Sobat memasukkan kode Mac Adrress yang Sobat catat tadi. Kemudian tekan Change Now. Tunggu beberapa saat untuk proses penggantian kode Mac Adrressnya dan koneksi akan terputus sementara dan akan terkoneksi lagi secara otomatis.

• Langkah terakhir buka browser/mozilla firefox , selamat halaman login (login page) sudah tidak muncul lagi. Sobat bisa internetan gratis.

Catatan : Trik ini hanya bisa digunakan untuk WiFi/Hotspot yang menggunakan halaman Login (Login Page)

Tujuan Saya menulis artikel ini adalah untuk pembelajaran dan agar Sobat dapat mengetahui bahwa MAC Adrdess dari perangkat Wireless Lan bisa Kita ganti dengan menggunakan Software TMAC v5 R3 ini. Untuk lebih jelasnya silahkan Sobat kunjungi situsnya disini

Selamat mencoba, dan ingat ini semata-mata hanya untuk tambahan ilmu pengetahuan Kita di bidang IT

Read More

Cara Mempercepat Koneksi Internet Di semua Modem

Kumpulan Artikel kali ini akan membahas tentang cara mempercepat koneksi internet modem..untuk Anda yang menggunakan modem. Menggunakan internet dengan modem kadangkala menjengkelkan apalagi koneksinya sangat lelet atau lemot pasti serasa ingin membanting apa aja yang didepan kita, Tapi disebagian daerah akses internet dengan modem ada yang cepat namun itu biasanya terjadi hanya didaerah perkotaan, dan belum sampai kepelosok pedesaan. Dipikir-pikir memang kayak pen Diskriminasian yaach, hehe! Tapi tak usah kwatir apabila kalian bingung cara mempercepat koneksi internet modem sekarang sudah banyak para operator yang memproduksi modem, jadi mungkin semakin banyaknya persaingan menjadikan servis mereka semakin baik demi mendapatkan member untuk menggunakan produk modem mereka.

Bagi yang merasakan koneksi dengan modem namun masih tetap lemot coba tips Bikin Betah dibawah ini yaitu dengan menggunakan software untuk memaksimalkan kinerja modem menjadi lebih cepat, siapa tahu bisa membuat koneksi lebih lancar dari sebelumnya. Tips cara mempercepat koneksi internet Modem dibawah ini menggunakan sofware Boster yang kalian juga bisa unduh dibawah ini:

Cara Mempercepat Koneksi Internet Modem dengan modem boster ini bisa dipakai dari berbagai macam modem seperti type modem ADSL, DSL, ataupun Dial-UP. Namun setahu saya modem ini sering banyak digunakan oleh para modem Dial-Up. Mempunyai tampilan yang simple dan cara settingnya yang sangat mudah mungkin itu alasan mengapa Sofware Modem Boster ini banyak disukai untuk digunakan cara mempercepat internet.

Kelebihan lain software ini yaitu adanya fasilitas auto tune, yaitu suatu fasilitas yang dapat melakukan setting secara otomatis berdasarkan setandar yang dipunyai oleh software peningkat kecepatan koneksi modem ini. Biar lebih cepat silahkan kalian unduh file diatas, setelah selesai kemudian langsung install seperti biasa.

Dan tampilan dari Modem Boster setelah diinstal seperti gambar dibawah ini.

Langkah cara menjalankan Aplikasi ini

1. Conect kan modem kalian, Saya ambil contoh Modem nya Smartfren

2. Lalu setelah modemnya sudah terkoneksi dengan internet, langkah selanjutnya tinggal menjalan aplikasi modem boster.

3. Klik Begin pada modem boster

4. Tunggu hingga beberapa saat setelah proses selesai,

5. Dan hasil akhirnya bedakan dengan sebelum menggunakan aplikasi software modem ini, pasti berbeda dengan sebelumnya.

Itu adalah tips cara mempercepat koneksi internet modem dengan menggunakan software tambahan yaitu software Bosster.

Tips tambahan untuk mempercepat koneksi internet

1. Merubah settingan bandwith yang ada di Windows
OS pada windows untuk normalnya bandwitnya sudah dibatasi 20 Persen dri total Bandwit. Yang sharusnya dapat maximal, Apabila kalian ingin mempercepat koneksi dan tidak membatasi bandwitnya bisa kalian lakukan langkah-langkah dibawah ini.

Ikuti langkah-langkah dibawah ini :

1. Klik Start 2. Klik Run 3. Ketik gpedit.msc 4. Kemudian klik Ok 5. Lalu masuk klik Administrative Templates 6. Kemudian Klik Network 7. Setelah terbuka klik QoS Packet scheduler 8. Kemudian klik Limit Reservable Bandwidth 9. Lalu merubah setting menjadi Enable 10. Ubah Bandwidt Limitnya menjadi 0 11. Klik Apply, lalu OK 12. Langkah terakhir keluar dan Restart komputer, selesai dah

Demikian beberapa tips dan trick mengenai internet khususnya tentang Cara Mempercepat Koneksi Internet Di semua Modem

Read More

Cara paling cepat membuat hotspot di Laptop tanpa rempong

Cara paling cepat membuat hotspot di Laptop tanpa rempong

Kali ini saya akan membagi tips paling cepat untuk membuat jaringan hotspot di laptop.
+ Ga perlu install aplikasi supaya ga rempong(kalau aplikasi conectivy-me kan rempong pakai instal2 segala)
+ Ga pakai lama
+ Ga perlu bingung
Syarat :
- Windows 7 keatas (XP ga tahu bisa atau ngga)
- Wireless Adapter (soalnya hotspot, kalau pakai kabel bukan hotspot namanya zzz)
- Internet Connection (mau via kabel, mau via modem, yang penting ga pakai wirelessnya)
- Aplikasi ajaib ini (ga perlu install cukup download dan dobel klik aja)
Penggunaan :
- Jalankan aplikasi diatas
- Isi hotspot name dan passwordnya sesuka muh..
- Share from nya pilih adapter yang sedang digunakan untuk konueksi internet (contoh Wired Internet Connection )
- Isi Max client sesuka muh..
- Klik start hotspot, tunggu 1 detik, finish

Read More

blokir situs porno (situs asusila)

Internet bagaikan pisau bermata dua. Padanya terdapat berjuta-juta website yang bermanfaat sehingga internet seringkali disebut sebagai perpustakaan paling lengkap di dunia. Namun, internet juga mengandung isi-isi yang merugikan dan berbahaya bagi Anda dan keluarga Anda.

Menurut data depkominfo, saat ini di internet terdapat lebih dari 103,4 juta website yang aktif. ”Yang terkait dengan Indonesia, baik yang didaftarkan di Indonesia maupun situs-situs dengan domain dot co dot id ada 8 juta situs. Dari jumlah 103,4 juta situs di internet itu 4,2 juta diantaranya situs-situs porno,”.Selain itu, pendapatan dari bisnis pornografi di 4,2 juta situs ini mencapai 97 miliar dollar AS. “Ini artinya, pendapatan atau income dari bisnis pornografi ini lebih besar dari income lima perusahaan IT terbesar di dunia yakni Microsoft, Apple, Google, Yahoo, dan Earth Link,”.

Anda dapat mengatur keamanan berselancar di dunia internet dengan menggunakansoftware untuk memblokir situs porno atau software penyaring situs-situs yang tidak bermanfaat, termasuk situs asusila. Kami merekomendasikan untuk menggunakan perangkat lunak di bawah ini:



1. Untuk Single User (pada PC):

* Naomi Family Safe Internet
* K9 Web Protection

2. Anda dapat mengatur keamanan berselancar di dunia internet dengan menggunakan software penyaring situs-situs yang tidak bermanfaat, termasuk situs asusila. Kami merekomendasikan untuk menggunakan perangkat lunak di bawah ini:

1. Untuk Single User (pada PC):

* Naomi Family Safe Internet
* K9 Web Protection

Anda bisa mendownload perangkat lunak tersebut pada homepagenya di alamat http://www1.k9webprotection.com/getk9/index.php untuk K9 Web Protection dan http://www.naomifilter.org/index.html untuk Naomi Family Safe Internet. paket download dua perangkat lunak tersebut dilengkapi dengan panduannya, bisa didownload disini:

• Paket Filter Asusila
• Panduan Perangkat Lunak Filter Asusila

2. Untuk Institusi ( pada Proxy ) :

* Squid

Anda bisa mendownload perangkat lunak tersebut beserta user guidenya lewat link di bawah ini:

http://www.squid-cache.org/Download/binaries.dyn

Software di atas bisa mejadi alternatif buat orang tua yang mempunyai anak kecil agar anak-anak tidak bisa membuka situs-situs porno yang telah terdaftar di dalam software tsb. Tentu saja ada kelemahan software tersebut tidak dapat memblokir situs yang belum terdaftar di dalam database software pemblokir situs porno. Namun denan software tersebut bisa mengurangi tampilnya situs-situs asusila.

Untuk informasi lebih lengkap tentang software pemblokir situs porno (filter situs asusila) tersebut bisa langsung ke situs software blokir situs porno depkominfo

Read More

Cara Internetan Gratis dengan PD Proxy

Cara Internetan Gratis dengan PD Proxy

Jika sobat juga tertarik mencoba tips ini, silahkan download PD Proxy di situs aslinya:

Cara Menggunakan PD Proxy:

1. Buka PD Proxy yang sudah kaliandownload tadi

2. Pilihlah server dan Protocol yang ingin kalian tuju

3. Lalu masukan User name dan password kalian, tapi jika anda belum terdaftar dalam pd proxy ini kalian bisa mendaftarkan diri terlebih dahulu DISINI Jika User name dan password kalian sudah dimasukan, dan sobat pun sudah menentukan server dan protocolnya. Silahkan Klik Connect

4.Lalu akan Tampil Dial-Up Connection, jika anda memakai modem silahkan pilih modem kalian lalu klik Connect.

5.Lalu sudah deh, jika sudah terconnect ada bisa internetan sepuasnya. Walaupun pulsa modem anda tidak ada.

Read More