Langkah-langkah membuat Database Acces

  1. Pertama buka vb 6.0, trus klik add ins, pilih visual data manager 
  2. Pilih new database, Microsoft acces--> version 7.0 mdb
  3. di tunjukkan gambar berikut.....
 5. Kemudian simpan di folder yang anda kehendaki
 6. Setelah di beri nama kemudian klik kanan properties-->pilih new Table.....
 7. kemudian pada tabel name dikasih nama mahasiswa...alesanya karena kita membuat tabel mahasiswa.....setelah itu klik Add Field........
 8. masukkan Field2nya seperti yang tertera di gambar...........-->pilih salah satu untuk menjadi Primary key nya.......sebagai contoh saya pilih NIK tetapi di namenya saya kasih nama cari.....(ini boleh terserah agan....NIKdex juga boleh)
9. Setelah itu build the table sehingga tampilanya sebagai berikut......
10. Setelah di build table jadinya ada tampilan tabel mahasiswa
11. Demikian cara sederhananya......semoga bermanfaat

membuat Input data Sederhana dengan VB 6.0

  • Langkah2nya sebagai berikut......cekibrooot.......
  1. Buatlah database yang diberinama dbmhs.mdb
  2. Bualah Recordnya sesuai dengan yang ada pada form tersebut
  3. Buatlah formnya sebagai berikut:
 
4. kemudian koneksikan data1 dengan database yg telah dibuat atao klik data1 kemudian pilih properties databasename, trus browse database tersebut, 
cara mengkoneksikan seperti Gambarnya berikut:

  • koneksikan juga dbgridnya dengan memilih datasource: pilih data1
  • Kemudian masukkan listingnya sebagai berikut:
  • Private Sub Command1_Click()
    With Data1.Recordset
        .AddNew
        !kode = Text1
        !nama = Text2
        !alamat = Text3
        !npm = Text4
        !jurusan = Text5
        .Update
        Call bersih
    End With
    End Sub
    Private Sub bersih()
    Text1 = ""
    Text2 = ""
    Text3 = ""
    Text4 = ""
    Text5 = ""
    End Sub

    Private Sub Command2_Click()
    With Data1.Recordset
        .Edit
        !kode = Text1
        !nama = Text2
        !alamat = Text3
        !npm = Text4
        !jurusan = Text5
        .Update
        Call bersih
    End With
    End Sub

    Private Sub Command3_Click()
    Data1.Recordset.Delete
    End Sub

    Private Sub Command4_Click()
    keluar = MsgBox("Apakah Anda Ingin Keluar.?", vbOKCancel + vbQuestion, "Pertanyaan")
    If keluar = vbYes Then
    Unload Me
    End If


    End Sub

    Private Sub Text1_Change()
    With Data1.Recordset
        .Index = "kodex"
        .Seek "=", Text1
    If .NoMatch Then
        Command1.Enabled = True
        Command2.Enabled = False
        Command3.Enabled = False
        Command4.Enabled = True
    Text2 = ""
    Text3 = ""
    Text4 = ""
    Text5 = ""
    ElseIf Not .NoMatch Then
        Text1 = !kode
        Text2 = !nama
        Text3 = !alamat
        Text4 = !npm
        Text5 = !jurusan
            Command1.Enabled = False
            Command2.Enabled = True
            Command3.Enabled = True
            Command4.Enabled = False
    End If
    End With
    End Sub
    • sekian dulu semoga bermanfaat

Cara Membuat FormLogin sederhana dengan VB 6.0

  1. Yang harus dibuat adalah bentuk form sebagai berikut:
  1.  
  2. Form yang terdiri dari:
          •  2 label: caption yang 1 di ganti dengan user name, caption yang ke 2 diisi Password
          •  1 combobox
          • 1 textboxt
          • 2 commandbutton captionya diisi bantuan dan keluar
  3. Dengan listing sebagai berikut: 
  4. Option Explicit
    Dim x As Integer
    Private Sub combo1_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
    Text1.SetFocus
    End If
    End Sub
    Private Sub Command1_Click()
    MsgBox ("Passwordnya tergantung dari username")
    MsgBox ("Jika usernamenya : Administrator, maka password : admin")
    MsgBox ("Jika usernamenya : gatot, maka passwordnya : gatot")
    MsgBox ("Terimakasih")
    Combo1.SetFocus
    End Sub
    Private Sub Command2_Click()
    Unload Me
    End Sub
    Private Sub Form_Activate()
    Combo1.SetFocus
    End Sub
    Private Sub Form_Load()
    Combo1.AddItem "Administrator"
    Combo1.AddItem "gatot"
    End Sub
    Private Sub Text2_KeyPress(KeyAscii As Integer)
    If KeyAscii = 13 Then
    Select Case Combo1.Text
    Case "Administrator"
    If Text2 <> "admin" Then
    x = x + 1
    Text2 = ""
    Text2.SetFocus
    Else
    x = 0
    Unload Me
    MENUUTAMA.Show
    End If
    Case "gatot"
    If Text2 <> "gatot" Then
    x = x + 1
    Text2 = ""
    Text2.SetFocus
    Else
    x = 0
    Unload Me
    MENUUTAMA.Show
    End If
        End Select
        Select Case x
            Case 1
            MsgBox "Password salah masih ada 2 kali kesempatan"
            Case 2
            MsgBox "Password salah masih ada 1 kali kesempatan"
            Case 3
            MsgBox "Maaf, kesempatan hanya 3 kali, anda harus mengulang dari awal."
            Unload Me
        End Select
    End If
    End Sub

Pengertian Hub, Switch, Router dan Bridge


HUB
Hub Alat penghubung atar komputer, semua jenis komunikasi hanya dilewatkan oleh hub. hub digunakan untuk sebuah bentuk jaringan yang sederhana (misal hanya untuk menyambungkan beberapa komputer di satu group IP lokal) ketika ada satu paket yang masuk ke satu port di hub, maka akan tersalin ke port lainnya di hub yg sama dan semua komputer yg tersambung di hub yang sama dapat membaca paket tersebut. Saat ini hub sudah banyak ditinggalkan dan diganti dengan switch. Alasan penggantian ini biasanya adalah karena hub mempunyai kecepatan transfer data yang lebih lambat daripada switch. Hub dan switch mempunyai kecepatan transfer data sampai dengan 100 Mbps bahkan switch sudah dikembangkan sampai kecepatan 1 Gbps.


Switch
Switch Sebuah alat yang menyaring/filter dan melewatkan(mengijinkan lewat) paket yang ada di sebuah LAN. switcher bekerja pada layer data link (layer 2) dan terkadang di Network Layer (layer 3) berdasarkan referensi OSI Layer Model. sehingga dapat bekerja untuk paket protokol apapun. LAN yang menggunakan Switch untuk berkomunikasi di jaringan maka disebut dengan Switched LAN atau dalam fisik ethernet jaringan disebut dengan Switched Ethernet LANs.
Router
Router Alat yang bertugas untuk mengantarkan paket data dalam jaringan. router dapat digunakan jika tersambung paling tidak dengan dua jaringan yang berbeda sehingga pengaturan tersebut membutuhkan sebuah router.Router berada di sisi gateway sebuah tempat dimana dua jaringan LAN atau lebih untuk disambungkan. Router menggunakan HEADERS dan daftar tabel pengantar (Forwarding Table) untuk menentukan posisi yang terbaik untuk mengantarkan sebuah paket jaringan dan juga menggunakan protokol seperti ICMP,HTTP untuk berkomunikasi dengan LAN lainnya dengan konfigurasi terbaik untuk jalur antar dua host manapun.


Pengertian Bridge
Pengertian dari sebuah bridge adalah bekarja pada data link layer pada OSI. bridge adal alat yang digunakan pada suatu jaringan yang berfungsi untuk memisahkan sebuah jaringan yang luas menjadi segment yang lebih kecil. bridge membaca alamat MAC (media access control0 dari setiap paket data yang diterima yang kemudian akan mempelajari dridging table untuk memutuskan apa yang akan dikerjakan bridge selanjutnya pada paket data tersebut, apakah diteruskan atau di abaikan. jika switch menpunyai domein collision sendiri-sendiri disetiap portnya, begitu juga dengan bridge memiliki domain collision ttetepi ia juga dapat membaginya dari sebuah domain collision yang besar menjadi yang lebih kecil, dah bridge hanya akan melewatkan paket data antar segment - segment jika hanya segment itu sangat diperlukan
Terdapat tiga jenis bridge jaringan yang umum dijumpai:
  • Bridge Lokal : sebuah bridge yang dapat menghubungkan segmen-segmen jaringan lokal.
  • Bridge Remote : dapat digunakan untuk membuat sebuah sambungan (link) antara LAN untuk membuat sebuah Wide Area Network.
  • Bridge Nirkabel : sebuah bridge yang dapat menggabungkan jaringan LAN berkabel dan jaringan LAN nirkabel.

Jadwal MotoGP 2011

Jadwal MotoGP 2011 super lengkap. Bagi teman-teman pecinta olah raga motor dengan kekuataan mesin seibarat jet darat alias MotoGp, tentunya akan senang sekali karena sebentar lagi MotoGP 2011 akan digelar, seperti tahun-tahun sebelumnya sirkuit Losail Qatar dijadikan pembukaan untuk musim kompetisi 2011 ini.



 SELAMAT MENYAKSIKAN DI TV KESAYANGAN ANDA

Perkembangan Microsoft SQL Server

Perkembangan Microsoft SQL Server
 
      Microsoft SQL Server diperkenalkan pada tahun 1990 untuk platform Microsoft OS/2 dalam kerjasamanya dengan Sybase. Produk ini berasal dari Sybase SQL Server 4.x untuk platform Unix. Dengan adanya Windows NT, muncul inisiatif untuk membangun SQL Server versi Windows NT sehingga dihasilkan Microsoft SQL Server versi 4.2 untuk platform Windows NT. Kerjasama dengan Sybase masih berlanjut dan diluncurkan SQL Server 6.0 pada tahun 1995 dan setahun kemudian SQL Server versi 6.5 diluncurkan.
SQL Server 6.5 memperbarui kemampuan transaksi dan menjadi produk database client/server yang banyak dipakai pada platform Windows NT. 
      Untuk memenuhi kebutuhan pengguna yang makin meningkat, maka SQL Server perlu didisain ulang dan kerjasama dengan Sybase dihentikan. Kemudian Microsoft mengembangkan SQL Server 7.0 yang difokuskan pada tiga area yaitu : easy to use, scalability dan data warehousing. Pada tahun 2000, kemudian Microsoft meluncurkan SQL Server 2000. Di tahun 2005 ini, Microsoft mengeluarkan produk SQL Server versi terbarunya yaitu Microsoft SQL Server 2005 seiring dengan dilauncingnya Microsoft Visual Studio 2005 beta 2.
       Pada makalah ini akan difokuskan ke masalah SQL Server 2000. SQL Server 2000 mempunyai beberapa edisi. Setiap edisi memberikan performansi dan harga yang berbeda pula, sehingga pemakaiannya dapat disesuaikan dengan kebutuhan si pengguna. 
Adapun edisi yang dimaksud adalah :
  1. Enterprise : Merupakan edisi terlengkap yang mendukung hingga 32 CPU dan RAM hingga 64 GB, cocok di gunakan untuk perusahaan yang membutuhkan performa maksimal.
  2. Standard : Merupakan edisi terlenkap yang mendukung 4 CPU dan RAM hingga 2 GB, cocok digunakan untuk perusahaan kecil, menengah.
  3. Personal : Edisi ini berisi alat bantu manajemen lengkap dan fungsi-fungsi umum dari edisi Standard serta cocok digunakan untuk keperluan individu. Edisi ini dijalankan pada sistem operasi yang bukan server, seperti Windows NT Workstation 4.0, Windows 9x, Windows 2000 Professional dan Windows XP. Edisi ini mendukung 2 processor dan performansinya dioptimalkan untuk pemakai tunggal dan workgroup kecil serta mampu menangani lima user yang konkuren
  4. Developer : Diluncurkan bersama-sama Microsoft Visual Studio dan hanya disarankan untuk pengembangan aplikasi yang memakai visual studio
  5. Windows CE : Merupakan versi Sql 2000 untuk alat-alat yang menjalankan Windows CE, Versi ini biasa digunakan pada PDA dan Pocket PC
  6. MSDE (Dekstop Engine) : Edisi ini mempunyai fasilitas mesin database dasar dari SQL server 2000, edisi ini mempunyai interface,alat bantu manajemen, online book.Edisi ini membatasi ukuran database dan beban user.

Cats Icons

Cats Icons

Menambah Tanda Tangan Di Bawah Postingan

(Ada yang seru Bro :) jika kita nulis sesuatu yang kita tulis sendiri, baik itu surat atau buku harian kadang kita mencantumkan tnda tangan kita di bawahnya. Sebagai bukti bahwa itu adalah tanda tangan kita, berati kita yang menulis.

Dan yang ingin buat blog kita menjadi benar-benar milik kita, untuk membuat itu menjadi terlihat nyata, kini kita bisa menambahkan tanda tangan di setiap postingan kita secara otomatis. Cantumkan di bawah postingan blog kita. Bagaimana caranya?


Cara Menambah Tanda Tangan Di Bawah Postingan
1. Siapkan gambar tangan kita. Kita bisa membuat tanda tangan secara online di sini
2. Login ke Blogger.
3. Di halaman Dasbor, kita pilih Tata Letak.
4. Kemudian pilih Edit HTML
5. Beri tanda centang pada Expand Template Widget
6. Cari kode berikut ini


<data:post.body/>

7. Taruh kode erikut ini dibawahnya

<img src='http://3.bp.blogspot.com/_a378mcmEc38/S67fyl2TsEI/AAAAAAAACWs/EQXQxFcrSAU/s320/tanda+tangan.png' style='border:0px;'/>

8. Ganti http://3.bp.blogspot.com/_a378mcmEc38/S67fyl2TsEI/AAAAAAAACWs/EQXQxFcrSAU/s320/tanda+tangan.png dengan URL gambar tanda tanganmu sendiri ya :) Dan simpan kalu sudah selesai.

Merubah Tampilan GOOGLE Dengan Nama Sendiri

Merubah Tampilan GOOGLE Dengan Nama Sendiri

Merubah Tampilan Google Dengan Nama Kita Sendiri, Mungkin bagi yang belum tahu ini hal yang sangat diluar pikiran mereka. Tapi sebenarnya ini adalah tips paling mudah dan paling cepat untuk merubah tampilan raksasa mesin pencari yaitu om google.
Sebelum ke tahap pembahasan kalian bisa melihat tampilan google yang sudah saya rubah dengan nama blog saya. Lihat gambar dibawah :
Gimana...??? bagus kan..???

Untuk merubah tampilan google, kalian ikuti tahap-tahapnya dibawah ini :

1. Buka www.007google.com
2. Isi kolom Step 1 dengan Nama yang kalian inginkan
3. Pada Step 2 kalian pilih tampilan yang sesuai selera kalian
4. KLIK "Create My Search Engine" kalau sudah OK

Tambahan :

Jika kalian menginginkan halaman Search Engine ini menjadi halaman utaman browser kalian saat dibuka silahkan ikuti tahapnya berikut ini :

^^ Untuk Mozilla Firefox

1. Pilih Menu Tools
2. Pilih Option
3. Pada Kolom "homepage" silahkan kalian isi dengan URL Google Buatan Kalian
4. KLIK OK

^^ Untuk Internet Explorer

1. Pilih Menu Tools
2. Pilih Internet Option
3. Silahkan Isi Kolom "homepage" dengan URL google Buatan kalian
4. KLIK OK


Membuat Program Menghitung Luas Persegi Panjang dengan Visual Basic 6.0

 Membuat Program Menghitung Luas Persegi Panjang dengan Visual Basic 6.0
1.                      1.  Buat Project baru, Kemudian tambahkan 2 label, 3 text box, dan 2 buah commandButton seperti berikut ini: 
1.                     2.  Kemudian rubahlah property gambar di atas, seperti tabel dibawah ini:

kontrol
Properti
Setting
Project
Name
PersegiPanjang( tidak boleh ada spasi)
Form
Caption
Menghitung Luas persegi Panjang
Label1
Caption
Panjang
Label2
Caption
Lebar
Text1
Caption
-
Text2
Caption
-
Text3
Caption
-
Command1
Caption
&Luas
Command2
Caption
&Hapus

2.                3. Setelah Semuanya di rubah maka tampilannya sebagai berikut :

3.                    4.  Kemudian Masukkan code(Listingnya) sebagai berikut :
Private Sub Command1_Click()
Text3.Text = Val(Text1.Text) * Val(Text2.Text)
End Sub

Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
abcs