Tips Membuka Situs Yang Di Blokir Oleh Nawala, Telkom, AHA

Sobat blogger yang demen online dan browsing pasti udah nggak asing lagi dong dengan yang namanya Nawala?? Banyak sobat blogger yang bertanya ke saya "Bang, cara buka situs yang di blokir oleh Nawala gimana sih??" Mau tau, silahkan baca tips berikut ini,,

Oiya, sebelum saya menjelaskan caranya, ada baiknya kita mengenal apa itu Nawala yang saya ambil langsung dari nawala.org.

Nawala (DNS) adalah salah satu layanan sistem penyaring berdasarkan nama Domain Name System yang didukung oleh berbagai pihak, yaitu pelaku bisnis warnet, Kemkominfo, dan PT. Telkom sebagai BUMN penyedia jasa layanan internet di Indonesia.

DNS Nawala secara spesifik menyaring segala jenis konten negatif, seperti Pornografi, Judi, situs Phising (penyesatan) serta situs yang mengandung Malware (software berbahaya).

Efek pemblokiran :

Efek menghindari pemblokiran :

Nah, bagaimana untuk menghindari pemblokiran tersebut?? Intinya sih kita
harus mengganti DNS nawala dengan DNS lain. Bisa menggunakan layanan OpenDNS dan sebagainya. Disini saya akan share dengan menggunakan tool yang bernama DNS Jumper karena simple dan mudah untuk digunakan.

Cara menggunakan DNS Jumper :

1. Download DNS Jumper
2. Ekstrak (keluarkan file dari zip) ke desktop atau kemana aja.
3. Jalankan DNS Jumper
4. Pilih Network card (sesuaikan dengan komputer anda)
5. Pilih DNS Service yang akan kita gunakan di menu dropdown.
6. Klik apply DNS.
7. Done.

Selain itu, dengan menggunakan DNS Jumper sobat blogger juga bisa menggunakan mengecek DNS yang cepat untuk komputer/internet sobat blogger, dengan klik menu Fastest DNS.

DISCLAIMER : Artikel ini saya share hanya untuk pengetahuan semata. Resiko dan penyalahgunakan informasi ini merupakan tanggung jawab individu masing-masing.


Password : www.remo-xp.com
Download DNS Jumper 1.04 Free || Facebook Bagi2 Software Dan Ipad Gratis Loh! Download Disini

• 
  

Whatsapp - Aplikasi Chat Seperti BBM Untuk Hp Yang Bukan BB

Siapa bilang Blackberry doang yang bisa selalu terhubung satu sama lain dengan fitur BBM nya?? Sekarang pengguna smartphone selain blackberry, khususnya Syambian juga bisa loh, disini kita memerlukan aplikasi yang bernama Whatsapp. Penasaran kan??? Cek aja langsung,

Whatsapp merupakan aplikasi yang memiliki konsep seperti BBM empunya Blackberry. Dengan menggunakan Whatsapp ini, kita bisa selalu terhubung, entah itu chating, file sharing, dll dengan pengguna Whatsapp atau pun pengguna blackberry. Awalnya Whatsapp ini dibuat untuk pengguna iPhone, namun sering perkembangan nya, aplikasi Whatsapp ini sudah tersedia untuk versi Blackberry, Android, dan Symbian.

Bila di BB kita mengenal pin untuk berinteraksi dengan sesama pengguna BB, namun kalau di Whatsapp ini kita menggunakan no tlp/hp yang kita gunakan untuk berinteraksi dengan sesama pengguna Whatsapp. Buat sobat blogger yang sudah atau akan mencoba aplikasi ini, jika ingin terhubung dengan saya, bisa di add pin saya "removed".

Oiya, aplikasi Whatsapp ini TRIAL selama 1 tahun, utuk satu tahun berikutnya, kita di haruskan mengeluarkan kurang lebih sekitar $ 1.9 per tahun. Mmm, kira-kira murah apa mahal ya?? Hehehehe

Untuk informasi lebih banyak tentang WhatsApp:
WhatsApp Indonesia dan WhatsApp on Kaskus

Password : www.remo-xp.com
Download Whatsapp Free

Tips Membuat Komputer Kita Berbicara

Penasaran nggak sob dengan judul Tips Membuat Komputer Kita Berbicara?? pasti penasaran kan?? Emang komputer bisa berbicara?? Dibilang nggak ya nggak dibilang bisa ya bisa, aduhhh, gimana sih?? jadi bingung ni. Oke, kalau binGung mendingan kita coba praktikan aja, biar lebih mudeng. Talk Less Do More,,, Hehehe

1. Pertama, buka notepad.
2. Copy-Paste script berikut :

Dim msg, sapi
msg = InputBox ( "Apa yang Anda ingin saya katakan?", "Masukan kata-kata")
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg


3. Save as, kemudian pilih all files lalu kasih nama mypc.vbs

4. Selesai

Coba sekarang anda klik 2x.. Gimana?? keren kan?? hehe

Atau kalau yang nggak mau menggunakan InputBox (Jadi pas di klik 2x langsung berbicara tanpa perlu memasukan kata-kata). Scriptnya seperti ini :

Dim msg, sapi
msg = "Ganti dengan kata-kata anda"
Set sapi = CreateObject ( "sapi.spvoice")
sapi.Speak msg

Tips ini sudah saya coba dan hasilnya : 100% Tested n Worked..!!

Selamat Mencoba

Jawaban Soal No. 2 Shandi

jawaba no .2 shandi

Top of Form

Bottom of Form

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
bersih()
RancangTabel()

End Sub
Sub bersih()
NPM.Text = “”
Nama.Text = “”
Jenjang.Text = “”
Jurusan.Text = “”
tahun.Text = “”
nilai_angka.Text = “”
Nilai_Huruf.Text = “”

End Sub

Sub RancangTabel()
With LV
.Columns.Add(“NPM”, 70, HorizontalAlignment.Center)
.Columns.Add(“Nama”, 120, HorizontalAlignment.Left)
.Columns.Add(“Jurusan”, 100, HorizontalAlignment.Left)
.Columns.Add(“Jenjang”, 100, HorizontalAlignment.Left)
.Columns.Add(“Tahun Masuk”, 100, HorizontalAlignment.Left)
.Columns.Add(“Nilai Angka”, 90, HorizontalAlignment.Center)
.Columns.Add(“Nilai Huruf”, 90, HorizontalAlignment.Center)
.GridLines = True
.FullRowSelect = True
.View = View.Details

End With
End Sub
Sub IsiTabel()
Dim ist As New ListViewItem
With ist
.Text = npm.Text
.SubItems.Add(nama.Text)
.SubItems.Add(jurusan.Text)
.SubItems.Add(jenjang.Text)
.SubItems.Add(tahun.Text)
.SubItems.Add(nilai_angka.Text)
.SubItems.Add(nilai_huruf.Text)
lv.Items.Add(ist)

End With
End Sub

Private Sub npm_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles npm.TextChanged
Dim x As String

tahun.Text = “20″ & Microsoft.VisualBasic.Left(npm.Text, 2)

x = Microsoft.VisualBasic.Mid(npm.Text, 3, 2)
If x = “11″ Then
jurusan.Text = “Teknik Informatika”
ElseIf x = “21″ Then
jurusan.Text = “Sistem Informasi”
ElseIf x = “31″ Then
jurusan.Text = “Manajemen Informatika”
End If

x = Microsoft.VisualBasic.Mid(npm.Text, 4, 1)
If x = “1″ Then
jenjang.Text = “Strata I”
ElseIf x = “2″ Then
jenjang.Text = “Diploma III”
ElseIf x = “3″ Then
jenjang.Text = “Diploma I”
End If
End Sub

Private Sub nilai_angka_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles nilai_angka.TextChanged
Select Case nilai_angka.Text
Case Is >= 80
nilai_huruf.Text = “A”
Case 70 To 79
nilai_huruf.Text = “B”
Case 60 To 69
nilai_huruf.Text = “C”
Case 50 To 59
nilai_huruf.Text = “D”
Case Is <= 49
nilai_huruf.Text = "E"
End Select
End Sub

Private Sub btnproses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnproses.Click
IsiTabel()
bersih()
End Sub

Private Sub btnhapus_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnhapus.Click
npm.Text = ""
nama.Text = ""
jenjang.Text = ""
jurusan.Text = ""
tahun.Text = ""
nilai_angka.Text = ""
nilai_huruf.Text = ""
End Sub

Private Sub btnbersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnbersih.Click
bersih()
End Sub

Private Sub btnhapusdata_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnhapusdata.Click
lv.Items.Remove(lv.SelectedItems(0))
End Sub

Private Sub btnkeluar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnkeluar.Click
End
End Sub
End Class