Cara Cepat Mengeluarkan Program yang Not Responding

Assalamualaikkum Wr. Wb

Kali ini MasEdi akan membagikan sedikit tips dasar Komputer. 

Mungkin Sahabat pernah merasakan masalah komputer, dimana suatu program Sahabat 'Not Responding' dan susah untuk di keluarkan.

Cara mengeluarkannya sangatlah simple, yaitu dengan menekan tombol 'Ctrl + Shift + Esc' secara bersamaan Pada Keyboard. Dan akan muncul Jendela Task Manager seperti dibawah ini.

Kemudian Klik salah satu program yang "Not Responding" dan Klik End Task.

Maka Program/Softwere yang Not Responding itu akan Keluar.

Demikian Tips dari MasEdi.

Membuat Daftar Isi Artikel Berdasarkan Label

Assalamualaikkum Warohmatullahi Wabarokaatuh

'Ketika hidup ini harus menyusun materi agar tetap bertahan, maka blog inipun harus menusun artikel agar mudah di mengerti'

Kali ini MasEdi akan membagikan tips dasar lagi, dimana tipsnya adalah membuat daftar isi artikel berdasarkan label. Agar mudah diakses suatu blog, maka harus pula kalian susun baik-baik blog tersebut.

Langsung ke TKP....

1. Login di blog Sahabat, www.blogger.com

2. Seperti pada gambar dibawah ini, klik tanda panah kecil dan pilih Tata Letak.

2. Maka akan muncul halaman baru seperti di bawah ini, klik Tambahkan Gadget.

3. Akan muncul jendela baru, pilih HTML/JavaScript dengan mengeklik tanda +

4. Copy dan pastekan kode dibawah ini pada lembar konten.

  

<div style="overflow:auto; width:auto; height:150px; padding:5px;border:0px solid #000000; font-family:julee; font-size:15px; font-color:#0000FF;">                                          <ol>                                                                                                                        <script style="text/javascript">                                                                                       var numposts = 100;                                                                                                      var standardstyling = true;                                                                                       </script><script type='text/javascript' src='http://tateluproject.googlecode.com/files/postlabel%281%29.js'></script><ol>      <script src="http://www.edisukarman.com/feeds/posts/default/-/Tutorial%20Dasar%20Blogspot?orderby=published&alt=json-in-script&callback=showrecentposts&max-results=999"></script>                                     </ol>                                                                                                                   </ol></div>

Catatan : 

• width:auto :  menunjukkan bahwa  lebar scroll box akan menyesuaikan dengan lebar sidebar.
• height:100px : tinggi scroll box. Silahkan sahabatt ganti sesuai keinginan.
• border:1px solid #e6e4e3 :  adalah ukuran, jenis dan warna dari border. 1px adalah tebal border, solid adalah jenis border, dan #e6e4e3 adalah warna border. 
• font-size : adalah ukuran huruf.
• <ol> : adalah Numbered LIst , sobat bisa menggantinya menjadi bullet list dengan kode <ul>
• Ganti http://www.edisukarman.com dengan Url blog sahabat.
• Ganti Tutorial%20Dasar%20Blogspot dengan label yang sahabat inginkan. Perhatikan penulisan labelnya. sesuaikan dengan yang terterah, jika satu huruf saja salah penulisannya, makan daftar isinya tak akan muncul. %20 adalah Spasi jadi ganti spasi dengan kode %20.

5. Jika Sahabat selesai mengaturnya, Klik Simpan dan Lihat Hasilnya.

Demikian tips kali ini, semoga dapat bermanfaat.

Terima Kasih

Membuat Daftar Isi Artikel di Blog

Assalamualaikkum Warohmatullahi Wabarokaatuh

"Setiap orang ingin hidup teratur, dan rumah tangganya tertata rapi, sehingga keluarganya harmonis dan indah dilihat. Begitupun suatu artikel di sebuah blog, jika tertata rapi maka pengunjung akan mudah dan sering untuk mengaksesnya".

Kali ini MasEdi akan membagikan tips dasar Blogspot. seperti kata-kata mutiara diatas, tipsnya adalah membuat daftar isi artikel di blog. 

Apa itu daftar isi ?

Daftar isi dalam blog dapat di katakan kumpulan artikel di dalam blog kita. Jadi fungsi dari daftar isi ini adalah untuk mempermudah seseorang mengakses artikel yang kita posting.

Langsung saja Ke TKP......

1. Login Ke Blog Sahabat, www.blogger.com

2. Seperti gambar dibawah, klik tanda panah kecil dan pilih tata letak.

3. Maka akan muncul halaman baru seperti gambar dibawah. Klik 'Tambahkan Gadget' 

4. Setelah itu, akan muncul jendela baru, Pilih 'HTML/JavaScript' dengan mengeklik tanda +

5. Copy dan pastekan kode di bawah ini pada lelbar konten seperti gambar dibawah ini.

 <script src="http://vikrymadz.googlecode.com/files/datar%20isiq.js"></script><script src="http://www.edisukarman.com/feeds/posts/default?max-results=9999&amp;alt=json-in-script&amp;callback=loadtoc"></script>

Catatan : Untuk http://www.edisukarman.com pada kode, Ganti dengan URL Blog Sahabat.

6. Klik Simpan, jika sudah selesai dan Lihat Blog Sobat.

Demikian Tips dasar dari MasEdi, semoga dapat berguna untuk Sahabat yang membutuhkan Tips ini.

Sampai jumpa di artikel lainnya.

Contoh Program array satu dimensi C++

Contoh Program array dua dimensi C++ ~ C++ merupakan bahasa pemrograman tingkat rendah dan merupakan bahasa pemrograman dasar untuk menuju bahasa pemrograman lainnya.
C++ merupakan perkembangan dari bahasa C yang sebelumnya masih mempunyai fitur yang masih kurang dan sekarang sudah mempunyai fitur yang lebih dan jauh lebih baik dari sebelumnya.C++ ini mempunyai tampilan yang biasa-biasa saja,namu kelebihan dari pemrograman C++
ini adalah prosesnya yang cepat,karena tampilannya tidak grafik.
Berikut saya berikan sedikit contoh sederhanan menggunakan bahasa pemrograman C++,semoga dapat membantu teman-teman untuk membuat program yang lebih bagus.

Kode :

#include <stdio.h>

#include <conio.h>

#include <iostream.h>

#include <iomanip.h>

main ()

{

int i;

   char nama[5][20];

   float nilai1[5];

   float nilai2 [5];

   float hasil[5];

for (i=1;i<=2;i++)

{

   cout<<"Data Ke - "<<i<<endl;

   cout<<"Nama Siswa : ";gets(nama[i]);

   cout<<"Nilai MidTest : "; cin>>nilai1[i];

   cout<<"Nilai Final : "; cin>>nilai2[i];

   hasil[i] = (nilai1[i]*0.40)+(nilai2[i]*0.60);

   cout<<endl;

}

cout<<"---------------------------------------";

cout<<"------"<<endl;

cout<<"No Nama Siswa Nilai Nilai ";

cout<<"Hasil"<<endl;

cout<<" MidTest Final ";

cout<<"Ujian"<<endl;

cout<<"--------------------------------------";

cout<<"-------"<<endl;

for (i=1;i<=2;i++)

{

cout<<setiosflags (ios::left)<<setw(4)<<i;

   cout<<setiosflags (ios::left)<<setw(20)<<nama[i];

   cout<<setprecision(2)<<" "<<nilai1[i];

   cout<<setprecision(2)<<" "<<nilai2[i];

   cout<<setprecision(2)<<" "<<hasil[i]<<endl;

}

cout<<"--------------------------------------";

cout<<"------"<<endl;

getch ();

}

Setelah menuliskan listing diatas,maka akan keluar tampilan seperti dibawah ini :

Nach semoga Contoh Program array satu dimensi C++ dapat membantu..
Salam berbagi...

Contoh Program array dua dimensi C++

Contoh Program array dua dimensi C++ ~ C++ merupakan bahasa pemrograman tingkat rendah dan merupakan bahasa pemrograman dasar untuk menuju bahasa pemrograman lainnya.
C++ merupakan perkembangan dari bahasa C yang sebelumnya masih mempunyai fitur yang masih kurang dan sekarang sudah mempunyai fitur yang lebih dan jauh lebih baik dari sebelumnya.C++ ini mempunyai tampilan yang biasa-biasa saja,namu kelebihan dari pemrograman C++
ini adalah prosesnya yang cepat,karena tampilannya tidak grafik.
Berikut saya berikan sedikit contoh sederhanan menggunakan bahasa pemrograman C++,semoga dapat membantu teman-teman untuk membuat program yang lebih bagus.

Kode :
#include <stdio.h>
#include <conio.h>
#include <iostream.h>
#include <iomanip.h>
main()
{
int i,j;
int data_jual[4][4];
clrscr();

for(i=1;i<=3;i++)
 {
   for(j=1;j<=3;j++)
    {
      cout<<"Data Ke- "<<i<<"."<<j<<endl;
      cout<<"Jumlah Penjualan   :";
      cin>>data_jual[i][j];endl;
      }
   }
cout<<endl;
cout<<"\nData Penjuala Pertahun"<<endl;
cout<<"------------------------------"<<endl;
cout<<"No   2001   2002   2003"<<endl;
cout<<"------------------------------"<<endl;

for(i=1;i<=3;i++)
 {
   cout<<setiosflags(ios::left)<<setw(5)<<i;
   for(j=1;j<=3;j++)
    {
    cout<<setiosflags(ios::right)<<setw(4);
    cout<<data_jual[i][j];
    cout<<"  ";
    }
   cout<<endl;
 }
cout<<"------------------------------"<<endl;
getch();
}


Setelah menuliskan listing diatas,maka akan keluar tampilan seperti dibawah ini :

Nach semoga Contoh Program array dua dimensi C++ dapat membantu..
Salam berbagi...

Cek IP Address dengan VB 6.0

Berikut ini saya bagikan sebuah source code yang cukup berguna yaitu untuk mengetahui IP Address komputer kita. Terutama bagi Anda yang membuat aplikasi client server menggunakan cloud database / database online. Ok, langsung saja ke TKP.

Berikut ini contoh pembuatannya.

1. Buka VB 6.0 Anda dan buat Project baru.
2. Pada Form yang aktif tambahkan 1 Label dan 1 Textbox.
3. Atur Properties Label dengan Caption=IP Address:.
4. Atur Properties Textbox dengan Name=txtIP.
5. Tambahkan 1 Module dengan cara pilih menu Project --> Add Module dan pada module tersebut copy paste kode di bawah ini.

Option Explicit

Public Const MAX_WSADescription = 256
Public Const MAX_WSASYSStatus = 128
Public Const ERROR_SUCCESS       As Long = 0
Public Const WS_VERSION_REQD     As Long = &H101
Public Const WS_VERSION_MAJOR    As Long = WS_VERSION_REQD \ &H100 And &HFF&
Public Const WS_VERSION_MINOR    As Long = WS_VERSION_REQD And &HFF&
Public Const MIN_SOCKETS_REQD    As Long = 1
Public Const SOCKET_ERROR        As Long = -1

Public Type HOSTENT
   hName      As Long
   hAliases   As Long
   hAddrType  As Integer
   hLen       As Integer
   hAddrList  As Long
End Type

Public Type WSADATA
   wVersion      As Integer
   wHighVersion  As Integer
   szDescription(0 To MAX_WSADescription)   As Byte
   szSystemStatus(0 To MAX_WSASYSStatus)    As Byte
   wMaxSockets   As Integer
   wMaxUDPDG     As Integer
   dwVendorInfo  As Long
End Type


Public Declare Function WSAGetLastError Lib "WSOCK32.DLL" () As Long
Public Declare Function WSAStartup Lib "WSOCK32.DLL" _
   (ByVal wVersionRequired As Long, lpWSADATA As WSADATA) As Long
Public Declare Function WSACleanup Lib "WSOCK32.DLL" () As Long
Public Declare Function gethostname Lib "WSOCK32.DLL" _
   (ByVal szHost As String, ByVal dwHostLen As Long) As Long
Public Declare Function gethostbyname Lib "WSOCK32.DLL" _
   (ByVal szHost As String) As Long
Public Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" _
   (hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long)

' ---------
' Code
' ---------
Public Function GetIPAddress() As String
   Dim sHostName    As String * 256
   Dim lpHost    As Long
   Dim HOST      As HOSTENT
   Dim dwIPAddr  As Long
   Dim tmpIPAddr() As Byte
   Dim i         As Integer
   Dim sIPAddr  As String

   If Not SocketsInitialize() Then
      GetIPAddress = ""
      Exit Function
   End If
   If gethostname(sHostName, 256) = SOCKET_ERROR Then
      GetIPAddress = ""
      MsgBox "Windows Sockets error " & Str$(WSAGetLastError()) & _
              " has occurred. Unable to successfully get Host Name."
      SocketsCleanup
      Exit Function
   End If
   sHostName = Trim$(sHostName)
   lpHost = gethostbyname(sHostName)

   If lpHost = 0 Then
      GetIPAddress = ""
      MsgBox "Windows Sockets are not responding. " & _
              "Unable to successfully get Host Name."
      SocketsCleanup
      Exit Function
   End If

   CopyMemory HOST, lpHost, Len(HOST)
   CopyMemory dwIPAddr, HOST.hAddrList, 4
   ReDim tmpIPAddr(1 To HOST.hLen)
   CopyMemory tmpIPAddr(1), dwIPAddr, HOST.hLen
   For i = 1 To HOST.hLen
      sIPAddr = sIPAddr & tmpIPAddr(i) & "."
   Next

   GetIPAddress = Mid$(sIPAddr, 1, Len(sIPAddr) - 1)

   SocketsCleanup
End Function

' ==================================================================== '

Public Function HiByte(ByVal wParam As Integer)
    HiByte = wParam \ &H100 And &HFF&
End Function

' ==================================================================== '

Public Function LoByte(ByVal wParam As Integer)
    LoByte = wParam And &HFF&
End Function

' ==================================================================== '

Public Sub SocketsCleanup()
    If WSACleanup() <> ERROR_SUCCESS Then
        MsgBox "Socket error occurred in Cleanup."
    End If
End Sub

' ==================================================================== '

Public Function SocketsInitialize() As Boolean
   Dim WSAD As WSADATA
   Dim sLoByte As String
   Dim sHiByte As String

   If WSAStartup(WS_VERSION_REQD, WSAD) <> ERROR_SUCCESS Then
      MsgBox "The 32-bit Windows Socket is not responding."
      SocketsInitialize = False
      Exit Function
   End If

   If WSAD.wMaxSockets < MIN_SOCKETS_REQD Then
        MsgBox "This application requires a minimum of " & _
                CStr(MIN_SOCKETS_REQD) & " supported sockets."

        SocketsInitialize = False
        Exit Function
   End If

   If LoByte(WSAD.wVersion) < WS_VERSION_MAJOR Or _
     (LoByte(WSAD.wVersion) = WS_VERSION_MAJOR And _
      HiByte(WSAD.wVersion) < WS_VERSION_MINOR) Then

      sHiByte = CStr(HiByte(WSAD.wVersion))
      sLoByte = CStr(LoByte(WSAD.wVersion))

      MsgBox "Sockets version " & sLoByte & "." & sHiByte & _
             " is not supported by 32-bit Windows Sockets."

      SocketsInitialize = False
      Exit Function

   End If
    SocketsInitialize = True
End Function

6. Kembali ke Form dan klik 2x (double click) pada area form dan pada Form_Load() copy paste kode di bawah ini.

Me.txtIP.Text = GetIPAddress()

If txtIP.Text = "127.0.0.1" Then
    Me.Caption = "You are offline"
Else
    Me.Caption = "You are online"
End If

7. Sekarang coba jalankan program dengan menekan tombol F5 pada keyboard dan lihat hasilnya.
8. Jika berhasil terkoneksi, maka akan ditampilkan seperti gambar di bawah ini.

9. Akan tetepi jika tidak terkoneksi akan ditampilkan seperti gambar di bawah ini.

10. Selesai.

Bagi Anda yang menginginkan contoh programnya silakan download melalui tombol di bawah ini.

Daftar SMTP ISP Indonesia

SMTP atau Simple Mail Transfer Protokol adalah salah satu protokol yang digunakan untuk pengirimankan email dari komputer ke server email Internet. Setingan SMTP inilah yang digunakan untuk terhubung ke Email Server seperti Yahoo Mail, gmail, atau pun di mail domain sendiri dengan memanfaatkan Microsoft Office Outlook (windows), evolution (linux) Thunderbird, dan juga setingan email pada handphone. Setingan ini di pakai juga jika kita internetan memakai modem GSM dengan salah satu provider kartu tertera di bawah ini. 

Berikut ini adalah beberapa daftar layanan SMTP di Indonesia,
Speedy Telkom (pilih salah satu):
smtp.telkom.net
smtp.telkomnet.com

Telkomsel (Halo/Simpati/Kartu As)
mail.telkomsel.com

Indosat (pilih salah satu)
smtp.indosat-m3.net
mail.indosat-m3.net
jktmail2.indosat-m3.net
hedwig.satelindogprs.com
smtp.indosat.net.id

XL
xlsmtp.xl.net.id

3 (three)
coba salah satu :
smtp.three.co.id
mail.three.co.id

INDOSAT IM2 :
POP : pop.indosat.net.id
SMTP : smtp.indosat.net.id
setting lengkap :
http://www.indosatm2.com/index.php/support/settings

netZAP
pop : pop.net-zap.com
smtp : smtp.net-zap.com
untuk lebih detail setting email-client :
http://www.net-zap.com/downloads/email_client_setting.pdf

Indonet
pop : pop.indo.net.id
smtp : smtp.indo.net.id
http://www.indo.net.id/

biznet
SMTP: smtp.biz.net.id
POP3: pop.biz.net.id
http://www.biz.net.id

radnet
SMTP Server : smtp.rad.net.id (Port : 25)
POP3 Server : pop.rad.net.id (Port : 110)
Primary DNS : 202.154.1.2
Secondary DNS : 202.154.3.2
Proxy Server : proxy.rad.net.id Port : 8080
http://www.rad.net.id

Terima kasih dan semoga bermanfaat.

Enkripsi Text pada VB .NET 2010

Bagi Anda yang sedang membuat program menggunakan VB .NET 2010 apalagi yang menyangkut koneksi ke database entah itu database lokal ataupun database server. Tentu saja Anda akan membuat tabel user untuk login ke dalam aplikasi yang Anda buat, oleh karena itu diperlukan password yang terenkripsi agar lebih aman.

Jika Anda tidak melakukan enkripsi bisa saja orang yang tidak bertanggung jawab membuka database dan menggunakan password user yang tidak terenkripsi untuk login maka secara otomatis akan dapat masuk ke dalam aplikasi Anda. Namun, jika password yang user yang sudah terenkripsi digunakan secara otomatis tidak akan dapat login ke dalam aplikasi.

OK, langsung saja ke contoh penggunaannya.

1. Jalankan aplikasi Visual Studio 2010 Anda.
2. Buat Project baru dengan cara klik menu File --> New Project.
3. Setelah itu pilih Visual Basic --> .NET Framework 2.0 --> Windows Forms Application --> Klik OK. Lihat gambar.

4. Pada Form yang aktif tambahkan 2 Textbox dan 3 Button.
5. Atur Properties masing-masing Textboxt dengan Name=txtSource dan Name=txtHasil.
6. Atur Properties masing-masing Button dengan Name=btMD5 dan Caption=MD5, Name=btSHA1 dan Caption=SHA1, serta Name=btSHA384 dan Caption=SHA384.
7. Atur posisi Component seperti gambar di paling atas.
8. Klik 2x (Double click) Form yang aktif dan di atas Public Class Form1 (Form1 = nama form) copy paste kode di bawah ini.

Imports Microsoft.VisualBasic
Imports System.Text
Imports System.Security.Cryptography
Imports System.IO

9. Kemudian di bawah Public Class Form1 (Form1 = nama form) copy paste kode di bawah ini.

Enum HashMethod
     MD5
     SHA1
     SHA384
End Enum

Function EnkripsiText(ByVal source As String, ByVal algorithm As HashMethod) As String
        Dim hashAlgorithm As HashAlgorithm = Nothing
        Select Case algorithm
            Case HashMethod.MD5
                hashAlgorithm = New MD5CryptoServiceProvider
            Case HashMethod.SHA1
                hashAlgorithm = New SHA1CryptoServiceProvider
            Case HashMethod.SHA384
                hashAlgorithm = New SHA384Managed
            Case Else
                MsgBox("Error Algorithm", vbCritical, "Error")
        End Select

        Dim byteValue() As Byte = Encoding.UTF8.GetBytes(source)
        Dim hashValue() As Byte = hashAlgorithm.ComputeHash(byteValue)
        Return Convert.ToBase64String(hashValue)
End Function

10. Setelah itu klik Button MD5 dan pada Private Sub btMD5_Click(...) copy paste kode di bawah ini.

If txtSource.Text <> "" Then txtHasil.Text = EnkripsiText(txtSource.Text, HashMethod.MD5)

11. Setelah itu klik Button MD5 dan pada Private Sub btSHA1_Click(...) copy paste kode di bawah ini.

If txtSource.Text <> "" Then txtHasil.Text = EnkripsiText(txtSource.Text, HashMethod.SHA1)

12. Setelah itu klik Button MD5 dan pada Private Sub btSHA384_Click(...) copy paste kode di bawah ini.

If txtSource.Text <> "" Then txtHasil.Text = EnkripsiText(txtSource.Text, HashMethod.SHA384)

13. Sekarang jalankan programnya dengan menekan F5 pada keyboard dan lihat hasilnya.

Enkripsi dengan MD5

Enkripsi dengan SHA1

Enkripsi dengan SHA384

Silakan yang ingin mendownload contohnya dapat melalui tombol download di bawah ini.
Selesai, selamat mencoba dan terima kasih.

Membuat Burung Terbang di Blog

Assalamualaikkum Warohmatullahi Wabarokaatuh

Tak bosan MasEdi menulis Tips dasar untuk NewBlogger dan Calon Blogger sejati.

Kali ini MasEdi akan membagikan sedikit tips mempercantik Blog Sahabat.

Triknya adalah Cara membuat burung terbang di Blog.

Apa tujuannya ?

Nah, dengan adanya burung ini, jika seseorang mengeklik burung tersebut, maka seseorang akan mengakses twitter kita. Dan juga blog kita lebih meriah karena adanya burung beterbangan.

Langsung saja ke-TKP ...

1. Login ke Blog sobat www.blogger.com

2. Pada menu Home, Klik tanda panah kecil dan Pilih Tata Letak seperti pada gambar dibawah.

3. Maka akan muncul halaman baru seperti pada gambar dibawah ini. Selanjutnya Klik Tambahkan Gadget. Ada banyak gadget, terserah kalian pilih yang mana. 

4. Setelah kalian klik Tambahkan Gadget, maka akan muncul Jendela baru seperti pada gambar dibawah ini. Pilih HTML/JavaScript dengan mengeklik tanda +.

5. Setelah itu akan muncul seperti gambar dibawah ini. 

Pada Judul, kosongkan saja. Sedangkan pada Konten Copy dan Pastekan Kode dibawah ini.

 <!-- floating twitter Bird -->                                                                                               <script type="text/javascript" src="http://bloggerpeer.googlecode.com/files/tripleflap.js"></script><script type="text/javascript">var birdSprite="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhcwbSNM55ru8bo5j1j_lob3hyphenhyphenErww5ovrteSc8URA5iCxjhqUikyueW3FCulo0uAg3CRnvuPDK9dhk90Sda5D4qMseGimL0IFsIgohyphenhyphenG3p-n2Zxw1puaMkXtFBs5E_R7tGfMOIX1yNmwE/s1600/burung+twitter+terbang.png";var targetElems=new Array("img","hr","table","td","div","input","textarea","button","select","ul","ol","li","h1","h2","h3","h4","p","code","object","a","b","strong","span");var twitterAccount = "http://twitter.com/Edi_Sukarman";var tweetThisText = "Twitter - UserID http://www.edisukarman.com/";tripleflapInit();</script>

Ket : 

• Pada Kode Berwana biru, adalah link warna burung. dan Sahabat Bisa Menganti wana burung dibawah ini : 

Warna Kuning

https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjfVEqno94g2-Zub1bxyp24v8KIRZzF3PYoGOjhY1Fa_-XZPYJCUpRCMqpf51Vmy-NRcknchXTZcIVNodHL_LZm43ImiVlDdbJhSy5UYHzpI1os7AayGYvCIlHeZ_q_QaHUNFX7PzT9hIs/s1600/yellow+bird.png

Warna Hitam

https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEjh4L88-LkS_x5fO6IZB4K_IpE0FtYh6JpSOGFV3C7_jbNq75aDAulIHu9qt4iNnDfU3kZDRKqLdCqduB2Ycwn-_TMVn9XxQPCj1CkCVDsqzGocWkTcgGnWFlv5NRICWPq0wAApavSFWwE/s1600/black+bird.png

Warna Biru

https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiHfxlS5E70t5bCLLUp6LQmOnNDiLeyq-oajL2AT2vGsictHwzsXyWynaTisBazO0qOX9AHxyJAPeCddX6KrGMDB7CDsjxLRhFQS9zpX5_ikowWUcvlyxZcJaIHsE-ebbjJS-5KnyKsgqk/s1600/Blue+bird.png

Warna Coklat

https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEg69JmIdOfgB2cfmQKkAFS8kpUhVUcz8QEZhya9wuwAA_TSfp4-uM_cL-TFsN_bNXXs9Lz6qaaBEahL6iBczm_p2lZB3effQMEfZfxb1W_7kIPp41qllRA3iPRWistyaucyXEvO7hQ7LGQ/s1600/brown+bird.png

Warna Hijau

https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgN1VWK5mJb1F2zgUNv5okIBoF9h5bDjk2ZIHNG6X0P47scEHXyGjgeKOmg7Ux0VFfn_Sh_J582n1QEWYeco1ywr8MdAAcBmzcKfbMMHsb5fAV0hO8FvsGNDUmOI6jwfOlgYbi8KvVaemg/s1600/Green+bird.png

Warna Ungu

https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhHIRcE2mjYcYuQiT0edMXgAGkRHUmwYL3QtbIZbtEty_49D4dOJLQkdS7k-03xkFIXXTWisbOIcct_mMkb6e4GgbKC9B5Juw0bM_m3JyNhzYWBLWtkOeHtgdncevC8wVz7jCtbeiO6yz8/s1600/purple+bird.png

Warna Putih

https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEgpLcAEbKigbSvR-ZCniaF28rbT9RENbPmJruuYf3Ct9R1DfFSfKhbxKP8QER_knWu_nGL8eD0vlRzs-7VvEv-H4hzeqetpUzJOgJJRVfDDz6OZxK9b4dlclTWvgo9nT3ZeGLGpJs-L7BA/s1600/white+bird.png

Warna Merah

https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiEZlrPS7V_pj8OAMh07BpX3reouau4pH6Hrv3Iyer58Lz4VxIslCIYhNRJm0RcSLPw1KUPxYaUGrja490_NCeg8pfe_yTjG3zfNHrJ4qPM-wvLTIEUTXxi784T4yvggTaOl8Vv37gn-z8/s1600/red+bird.png

• Sedangkan Kode berwana Merah, adalah akun Twitter Sahabat. Ganti dengan Nama Akun twitter Sahabat.

6. Setelah Selesai, Klik Simpan dan Lihat Blog Sobat. Maka akan Muncul burung terbang di blog sobat.

Demikian Tutorial dasar dari MasEdi, semoga bermanfaat untuk kita semua. Aamiin

Samapai jumpa di tips berikutnya.

Doraemon the Movie 2011: Nobita and the Platoon of Iron Men Sub Indo

Kali ini admin akan membagikan film Doraemon the Movie 2011 dengan judul Nobita and the Platoon of Iron Men, salah satu anime favorite admin. hehehe...
Pada kisah kali ini bermula dari kecemburuan Nobita atas robot mainan baru Suneo, Nobita meminta Doraemon untuk memberikannya robot yang lebih baik dari itu. Doraemon awalnya menolak, sampai Nobita  tidak sengaja menemukan potongan robot misterius yang jatuh dari langit.
Setelah mengumpulkan semua bagian robot dan dirakit mereka bersama-sama, robot raksasa, Zanda Claus, akhirnya selesai. Duo ini segera belajar bahwa robot ini bukan mainan belaka, tapi senjata ampuh dalam memerangi Tentara Robot datang untuk menyerang bumi dan memperbudak manusia bumi. Invasi sudah dekat, muncullah seorang gadis misterius bernama Lilulu untuk mencari robot tersebut. Bagaimana perjuangan Nobita dan kawan-kawan untuk menghentikan robot jahat yang ingin menguasai bumi?
Silakan langsung saja download dari tombol di bawah ini.

SSH 28 Mei 2013

Met malem rekan2 semua,maaf sudah lama G coret - coret di Blog kesayangan saya ini  !!!
Tanpa panjang lebar,kali ini ane mau share tentang account SSH Server Lokal, yang tidak di ragukan lagi...
Downloads and Streaming. Koq jadi cerita sich, Okeh langsung saja.. Klick Link di bawah
http://www.4shared.com/zip/wRzmZH1M/Singa.html

Sekian postingan kali ini........

Cek Port yang Terpakai dengan VB 2010

Nih saya bagikan lagi satu source code untuk mengecek port yang terpakai dengan menggunakan VB 2010 (Visual Basic .NET).

OK, langsung saja ke contoh penggunaannya.

1. Jalankan aplikasi Visual Studio 2010 Anda.
2. Buat Project baru dengan cara klik menu File --> New Project.
3. Setelah itu pilih Visual Basic --> .NET Framework 2.0 --> Windows Forms Application --> Klik OK. Lihat gambar.

4. Pada Form yang aktif tambahkan 1 Textbox lalu atur Properties Multiline=True, Scrollbars=Vertical dan Name=txtPort.
5. Double click Form dan pada Form_Load(...) copy paste kode di bawah ini.

For Each portName As String In My.Computer.Ports.SerialPortNames
    txtPort.Text = portName & vbCrLf
Next

6. Jalankan program dengan menekan tombol F5 pada keyboard dan lihat hasilnya.

Selesai dan terima kasih.
Untuk Anda yang ingin mendownload contoh programnya bisa melalui tombol di bawah ini.

Cek Koneksi Internet dengan VB 2010

Pada siang hari yang sedikit mendung ini, saya akan bagikan sebuah source code VB 2010 (Visual Basic .NET) untuk mengecek apakah komputer/laptop kita terkoneksi dengan internet.

OK, langsung saja simak contoh penggunaannya.

1. Jalankan aplikasi Visual Studio 2010 Anda.
2. Buat Project baru dengan cara klik menu File --> New Project.
3. Setelah itu pilih Visual Basic --> .NET Framework 2.0 --> Windows Forms Application --> Klik OK. Lihat gambar.

4. Pada Form yang aktif tambahkan 1 Button lalu atur Properties Text=Cek Koneksi Internet dan Name=btCekStatus.
5. Klik 2x (Double click) Button Cek Koneksi Internet dan pada Private Sub btCekStatus_Click(...) copy paste kode di bawah ini.

Dim isAvailable As Boolean
isAvailable = My.Computer.Network.IsAvailable
If isAvailable = False Then
   MsgBox("Tidak terkoneksi.", vbCritical, "Error")
Else
End If

6. Sekarang jalankan program dengan menekan tombol F5 pada keyboard.
7. Selanjutnya tekan tombol Cek Koneksi Internet.

Jika komputer Anda terkoneksi maka akan muncul pesan seperti di bawah ini.

Sedangkan kalau komputer Anda tidak terkoneksi maka akan muncul pesan seperti di bawah ini.

Selesai dan terima kasih. Untuk mendapatkan contoh programnya dapat di download melalui tombol download di bawah ini.

Disable Keyboard dengan VB 6.0

Seperti postingan sebelumnya Disable Mouse dengan VB 6.0, kali ini tidak begitu berbeda. Menonaktifkan (disable) keyboard dengan memanfatkan VB 6.0 (Visual Basic 6.0). Ok, langsung saja ke tahap selanjutnya.

Berikut contoh pembuatannya.

1. Buat Project VB 6.0 baru.
2. Pada Form yang aktif klik 2x (double click) Form tersebuat dan copy paste source code di bawah ini.

shell "rundll32 keyboard, disable" 'disable keyboard
app.previnstance=false 'menyembunyikan aplikasi dari task manager

3. Selesai.

Sangat sederhana bukan?
Efek akan terasa sampai Anda me-restart/mematikan komputer.

Disable Mouse dengan VB 6.0

Admin share ulang untuk postingan menonaktifkan (disable) mouse dengan VB 6.0 (Visual Basic 6.0). Karena IP address komputer yang sebelumnya admin gunakan terkena Malware saat blogging, jadi postingan tentang disable mouse ini tidak dapat diakses alias diblokir oleh Anti Virus.

Terkadang kita sangat jengkel karena ada orang-orang yang tidak bertanggung jawab mengutak atik komputer kita dengan klik sana klik sini tidak karuan, entah itu teman atau adik-adik kita. Untuk itu salah satu cara untuk mencegah hal itu terulang lagi, saya akan balikan cara untuk menonaktifkan mouse dengan

source code VB 6.0. Ok, langsung saja ke TKP.

1. Buatlah Project VB 6.0 baru.
2. Pada Form yang aktif klik 2x (double click) Form tersebut.
3. Pada Form_Load() copy paste kode di bawah ini.

shell "rundll32 mouse, disable" 'untuk disable mouse
app.previnstance=false 'untuk menyembukan form dari task manager

4. Selesai.

Sangat mudah bukan?

Aplikasi Ramalan Cuaca v2 (VB 6.0)

Ini ada lagi saya bagikan Aplikasi Ramalan Cuaca v2 yang dibuat menggunakan VB 6.0 (Visual Basic 6.0) yang memanfaatkan XML dari www.weather.com.

Kali ini aplikasi memanfaatkan style dari Yahoo Weather agar lebih cantik. Aplikasi ini memiliki kelemahan dibandingkan dengan Aplikasi Ramalan Cuaca v1 yang sebelumnya, karena Aplikasi Ramalan Cuaca v2 ini tidak dapat mendeteksi lokasi yang lebih kecil, misalnya ibukota kabupaten yang secara umum tidak ditampilkan dalam daftar kota-kota besar di suatu negara.

Ok, langsung saja di coba...

Perhatian! Aplikasi dengan style ini tidak boleh untuk diperjual belikan karena telah dipatenkan oleh pihak Yahoo Weather.

Aplikasi Ramalan Cuaca v1 (VB 6.0)

Kali ini saya akana bagikan kepada Anda aplikasi Ramalan Cuaca yang di buat menggunakan VB 6.0 (Visual Basic 6.0). Aplikasi Weather ini memanfaatkan (clsXML) yang diambil dari accuweather.com dengan menggunakan informasi cuaca xKiz.

Cara pengguna aplikasi ini sangat gampang dengan hanya memasukkan nama lokasi mana yang ingin Anda ketahui cuacanya, seperti gambar di bawah ini.

Membuat Jam Analog dengan VB 6.0

Berikut ini saya bagikan satu lagi full source code aplikasi Jam Analog yang dibuat menggunakan VB 6.0 (Visual Basic 6.0) dan mungkin cukup berguna bagi Anda. Jam Analog ini memiliki banyak sekali pilihan style, selain itu juga ada fungsi sebagai alarm. Ok, langsung saja dapatkan contoh full source codenya.

Menonaktifkan Tombol Windows

Selanjutnya saya akan bagikan lagi kepada Anda bagaimana caranya untuk menonaktifkan tombol Windows pada keyboard. Tombol yang berbentuk jendela ini sering disebut dengan tombol Windows. Tombol ini mempunyai beberapa kegunaan dengan dikombinasikan dengan tombol-tombol tertentu akan dapat difungsikan sebagai shotcut.

Kali ini saya akan mengajak Anda untuk bagaimana menonaktifkan tombol Windows pada keyboad. Berikut ini langkah langkahnya.

1. Pertama buka Registry Editor dengan cara tekan tombol Windows+R. Pada kotak Run ketik regedit dan klik OK.

2. Akses pada HKEY_LOCAL_MACHINE\CuttentContolSet\Control\KeyboardLayout.
3. Buat Binary Value baru dengan nama Scancode Map.
4. Berikan Value Data dengan "00000000000000030300000000005BE0" tanpa tanda kutip seperti gambar di bawah ini. Dan hapus binary tersebut untuk mengembalikannya seperti semula.

5. Klik OK.
6. Restart atau logoff untuk komputer Anda untuk mendapatkan efeknya.

Mencegah Akses Drive System Windows

Kali ini saya akan membagikan cara hack untuk mencegah akses drive system atau biasanya drive (C:) dengan sangat mudah. Dalam meng-hack drive system ini Anda tidak perlu mengetahui bahasa pemrograman untuk melakukannya. Siapapun yang ingin mengakses drive ini akan dihalangi oleh pesan pembatasan akses dari administrator. Sebenarnya mencegah akses ke drive system (C:) ini dapat dilakukan melalui gpedit.msc, namun yang dapat mengaturnya adalah Administrator. Lalu bagaimana dengan Anda yang bukan Administrator. Ok, langsung saja bagaimana caranya.

Anda dapat melakukan hack ini dengan hanya memanfaatkan Registry Editor, dan tentu saja Registry Editor ini dapat diakses jika Administrator tidak menonaktifkannya.

1. Pertama buka Registry Editor dengan cara tekan tombol Windows+R. Pada kotak Run ketik regedit dan klik OK.

2. Akses HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer.
3. Buat DWORD baru dengan nama NoViewOnDrive jika belum ada.
4. Ubah Value menjadi 4 untuk mencegah aksesnya. Dan 0 untuk mengembalikannya seperti semula.

5. Klik OK.

Untuk melihat hasilnya Logoff atau Restart komputer Anda. Sekarang cobalah untuk membuka drive system (C:) dan Anda akan dicegah untuk mengaksesnya dengan menampilkan pesan seperti gambar di bawah ini.