Buat form login di vb6.0

• ·         Buat frmUtama seperti
   

• ·         Buat frmkey melalui Add form
  
  
  
  
  
  
  
    
  
  
  • klik pada Project lalu Project Properties..Untuk Startup Objec pilih frmkey 
  • 
    
  • 
    
  
  
  
  
• 
  
  
  
  • Berikan code seperti berikut

Private Sub cmdCancel_Click()
    'set the global var to false
    'to denote a failed login
    LoginSucceeded = False
    Me.Hide
End Sub

Private Sub cmdOK_Click()
    'check for correct password
    If txtUser = "admin" Then
        txtPassword = "password"
        'place code to here to pass the
        'success to the calling sub
        'setting a global var is the easiest
        LoginSucceeded = True
        Me.Hide
        frmUtama.Show
    Else
        MsgBox "Login gagal, Coba Kembali!", , "Login"
        txtPassword.SetFocus
       
    End If
End Sub 

• Jalankan...(F5)

Koneksi VB ke Access 2007

Koneksi VB ke Access 2007

Langkah pertama yang harus kita lakukan yaitu menyediakan database. Buka program MsAccess 2007 ....

• Pilih Blank Database 

 

• Buat folder database kita 
• Tulis nama database

• Create 

• Buat nama Tablenya cth: program 

• Isi.. 

 

Langkah kedua kita buka VB kita...

• Pilih Standard EXE
• Klick Project lalu Components ( control T )
• Ceklist pada Microsoft ADO Data Control 6.0 (OLEDB) & Microsoft DataGrid Control 6.0 (OLEDB) 

• Masukkan data control & datagrid ke dalam form, drag kedalam form hingga seperti berikut ini ;
• Klik kanan ADO Data lalu pilih ADODC properties 

• cek use connection string lalu klik Build. Providernya "Microsoft Office 12.0 Access Database Engine OLE DB" lalu next setelah itu akan berindah ke TAB connection
  
• untuk data source pilih tempat database yg telah kita buat cth : database saya ada di C:\Users\SILBI\VB ke Access.accdb 

• setelah itu klik test connection... jika berhasil maka ok. atur record source pada property page seperti :

• atur property grid.. utk data source buat adodc1

• Jalankan....