Tutorial Menciptakan Koneksi Database Access Ke Vb.Net

Halo Semua Dalam Kesempatan Saya ingin mengembangkan bagaimana Cara Membuat Koneksi Database Access Ke VB.NET , sanggup saja banyak sobat - sobat nan belum tahu sebelumnya banyak juga database nan sanggup dijadikan jadi database dari VB.NET Perlu Anda Ketahui database memudahkan kami sebagai menyimpan data dengan gampang , APA ITU DATABASE ?

Database yaitu kumpulan data nan disimpan setutor sistematis di didalem komputer nan sanggup diolah ataupun dimanipulasi memakai perangkat lunak (program aplikasi) sebagai menghasilkan informasi jugaitu yaitu sebagian teladan macam macam aplikasi database ialah : Oracle,MySQL,Ms. Acces,Microsoft SQL server,IBM DB2,dBase,Visual Foxpro,Postgre SQL,Clipper,Firebird juga didalem kaliitu kami mau memakai database access , tersedia maksud aku memakai access karna aplikasiitu memang gampang juga kebanyakan orang itu niscaya memakai Microsoft Office nan dididalemnya rampung tersedia access jadi kesimpulannya orang lain juga sanggup melihat database itu dengan access..

Sekarang kami masuk tutor koneksinya, nan paling utama kalian musti mempunyai aplikasi ini

- Microsoft Visual Studio 2010 (apabila belum tersedia silahkan kalian download dulu di google)

- Microsoft Office (Di didalem Microsoft Office Sudah Terdapat Microsoft Access

Hanya itu saja nan perlu kalian miliki di pc ataupun laptop kalian , naahh sebagai membikin koneksinya terlebih dahulu kalian musti membikin databasenya dulu karna jika belomada databasenya kalian mau nyimpan data apa ? Isilah terlebih dahulu data data kalian di access , sehabis itu kalian siap membikin databaseitu nan musti kalian cermati

Masukkan Database Di Dalam Folder Aplikasi Kamu Nantinya Kamu Masukkan Di BIN/DEBUG , Kenapa kalian musti masukkan kedidalem folder itu ? , karna folder debug itu maksudnya daerah menyimpan data kalian tadi juga sekaligus kalian sanggup buka aplikasi nan rampung kalian buat tadi sanggup di buka didalem folder debug tadi, Jika kalian rampung siap menyimpan database kini kami buka visual studionya...

Jika rampung kalian buat nama programnya ingat database musti sebuah folder dengan aplikasi kalian ...

untuk membikin modul di vbnet cukup gampang kalian klik sajian Project >> Add Module ...Seperti nan tersedia di gambar dibawah ini..

kemudian kalian boleh kasi nama di modulnya sesuai dengan impian kalian sendiri kemudian klik OK

Sampai di halaman source kodenialah rampung aku sediakan kodenya #kodeitu rampung aku uji jadi gak sanggup saja aku menipu anda... silahkan boleh kalian copas Script dibawah ini...

Imports System.Data.OleDb Module Module1     Public conn As OleDbConnection     Public da As OleDbDataAdapter     Public ds As DataSet     Public cmd As OleDbCommand     Public rd As OleDbDataReader     Public str As String     Public Sub koneksi()         str = "Provider=Microsoft.Ace.oledb.12.0;data source=dbbiodata.accdb"         conn = New OleDbConnection(str)         If conn.State = ConnectionState.Closed Then             conn.Open()         End If     End Sub End Module

Ini Termasuk Script Simple juga gak Ribet boleh kalian kreasikan isyarat diatasitu sesuai dengan kebutuhan kalian gan..

str = "Provider=Microsoft.Ace.oledb.12.0;data source=dbbiodata.accdb"

Keterangan nan berwarna merah kalian ganti dengan database kalian masing masing. "accdb" itu  maksudnya yaitu ekstensi dari microsoft access , Nah kini database kalian rampung terhubung ke kegiatan vbnet nan kalian buat tadi kan ... SELESAI... Terima kasih telah mengunjungi blog ini, baca juga artikel nan lain ya kami update setiap hari mohon maaf apabila tersedia kesalahan Sekian dari aku admin JagoanKode Wassalamm..

Membuat Aplikasi Crud Database Access Di Vbnet

Halo , Kaliitu Admin mau memberi tips Membuat Aplikasi Crud Di VBNET , Crud Itu Merupakan Singkatan Dari Create Read Update Delete nan masing masing fituritu mempunyai fungsi nan sangat berfungsi sebagai orang ,itu jadi pola jadwal Cruditu mau kami kaitkan dengan database ,nahh disitu kami mau menggunakan database Microsoft Access , sebagai kalian nan belum mengetahui apa itu database juga bagaimana tutor mengkoneksikan Program Cruditu Kita kaitkan ke Microsoft Access biar nantinya data nan kami input di jadwal kami sanggup kami kanal ataupun Kita lihat dengan mudah, naahh sebagai kalian nan belum mengetahui apa sih itu Crud ? , Disini Kita mau Bahas Satu Persatu , insya allah mau aku ajarkan kalian sebagai sanggup hingga membikin programitu , klarifikasi Crud tersedia dibawah ini.

PENJELASAN CRUD ?

1. Create ialah nan berarti membikin data baru. pola kami sedang mengerjakan pendaftaran disebuah web itu rampung merupakan Create dari CRUD alasannya ialah kami membikin juga menyimpan data masuk pribadi ke database.
2. Read ialah membaca ataupun menampilkan suatu data nan tadinya berada di database MYSQL biar kemudian ditampilkan di web menggunakan bahasa pemrograman php.
3. Update merupakan mengedit sebuah data dari database nan kemudian di edit menggunakan bahasa pemrograman php berupa web.
4. Delete ialah fungsinya hampir sama dengan update mau tetapi prosesitu ialah sebagai mengerjakan abolisi data didatabase melalui bahasa php.

Jika Anda Sudah Paham Betul Maksud diatasitu kami masuk Ke tahap nan ke - dua ,Sebelum Membuat programnya pastinya kami niscaya membikin modulnya terlebih dahulu kan ? naahh aku pimpinitu tutor Mengkoneksikan Database Access Ke VBNET aku rampung menerangkannya rampung aku siapkan Scriptnya Silahkan Copas Script Berikut , Dan Sebelum Itu Anda Masuk Dulu Ke Pembuatan Modul , Caranya Klik sajian Project juga pilih add Module Dan Kasi nmanya juga Pilih Oke Gambarnya tersedia dibawah ini

Jika Anda Sudah Masuk Ke Source Code Add Module Copy Dan Pastekan Script Berikut ... Ingat Script nan warna merah kalian ganti dengan nama database kalian sendiri ,( Masukkan Database Ke Bin > Debug ) mengapa musti Di Bin > Debug ? Karna disitulah Tempat Aplikasi database dijalankan .. Copas Script Berikut..

Atau Jika Anda Bingung 

Baca INI  : CARA MEMBUAT KONEKSI DATABASE ACCESS KE VB.NET 

Saya juga rampung memosting sebelumnya klik saja link diatas.. ataupun apabila kalian mengerti lanjutkan saja di artikelitu dibawah tersedia juga scriptnya

Imports System.Data.OleDb
Module Module1
    Public conn As OleDbConnection
    Public da As OleDbDataAdapter
    Public ds As DataSet
    Public cmd As OleDbCommand
    Public rd As OleDbDataReader
    Public str As String
    Public Sub koneksi()
        str = "Provider=Microsoft.Ace.oledb.12.0;data source=dbbiodata.accdb"
        conn = New OleDbConnection(str)
        If conn.State = ConnectionState.Closed Then
            conn.Open()
        End If
    End Sub
End Module

 Nah Jika Anda Sudah Berhasil Membuat Sekarang Kita masuk Ke Tahap Membuat Form , membikin Formitu Cukup Praktis Mungkin apabila kalian belum tahu bagaimana tutor membikinnya kalian sanggup googling , naahh kalian musti membikin formnya ibarat mirip gambar nan tersedia di bawahitu , Itu alatnya hanya menggunakan Label , Textboxt , Button RadioButton , Button juga data grid , gak susah kok .. Usahakan Jumlah Label , Textboxt , Button RadioButton , Button juga data grid Samakan Dengan nan Ada dibawah ya gan..

Jika Sudah Mirip Betul , Masuk Ke Source Code nya , aku rampung siapkan codenya tersedia dibawah tinggal kalian kreasikan saja ya gan , aba-aba nan tersedia dibawahitu ane gak nipu karna ane juga pernah membikinnya jadi dijamin 100 % ga Penipu Untuk Kodingnya silahkan Copas nan tersedia dibawah ini

Imports System.Data.OleDb
Public Class Form1
Sub bersih()
 TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
TextBox1.Enabled = True
Button2.Enabled = False
Button4.Enabled = False
Button1.Enabled = True
End Sub
Sub TampilGrid()
da = New OleDbDataAdapter("SELECT * From dbbiodata", conn)
ds = New DataSet
ds.Clear()
da.Fill(ds, "dbbiodata")
DataGridView1.DataSource = (ds.Tables("dbbiodata"))
DataGridView1.ReadOnly = True
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Call koneksi()
Call TampilGrid()
Call bersih()
End Sub
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If e.KeyChar = Chr(13) Then
cmd = New OleDbCommand("select * from dbbiodata where Nama='" & TextBox1.Text & "'", conn)
rd = cmd.ExecuteReader
rd.Read()
If rd.HasRows = True Then
MsgBox("Nama Ditemukan", vbInformation + vbOKOnly, "Pesan")
TextBox1.Text = rd.Item("Nama")
TextBox2.Text = rd.Item("Umur")
TextBox3.Text = rd.Item("Alamat")
TextBox4.Text = rd.Item("Keterangan")
TextBox1.Enabled = False
Button1.Enabled = False
Button4.Enabled = True
Button2.Enabled = True
Button3.Focus()
Else
TextBox2.Focus()
End If
End If
End Sub
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
End Sub
Private Sub TextBox2_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress
If e.KeyChar = Chr(13) Then
TextBox3.Focus()
End If
End Sub
Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged
End Sub
Private Sub TextBox3_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox3.KeyPress
If e.KeyChar = Chr(13) Then
TextBox4.Focus()
End If
End Sub
Private Sub TextBox3_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox3.TextChanged
End Sub
Private Sub TextBox4_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox4.KeyPress
If e.KeyChar = Chr(13) Then
If Button1.Enabled = True Then
Button1.Focus()
Else
Button2.Focus()
End If
End If
End Sub
Private Sub TextBox4_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox4.TextChanged
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "" Or TextBox2.Text = "" Or TextBox3.Text = "" Or TextBox4.Text = "" Then
MsgBox("Data Anda Belum Lengkap")
Exit Sub
Else
cmd = New OleDbCommand("Select * from dbbiodata where Nama='" & _
TextBox1.Text & "'", conn)
rd = cmd.ExecuteReader
rd.Read()
If Not rd.HasRows Then
Dim sqltambah As String = "Insert Into dbbiodata(Nama,Umur,Alamat,Keterangan) values " & _
"('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & _
TextBox4.Text & "')"
cmd = New OleDbCommand(sqltambah, conn)
cmd.ExecuteNonQuery()
Call bersih()
Call TampilGrid()
TextBox1.Focus()
Else
MsgBox("Kode Telah Ada Sebelumnya", vbInformation + vbOKOnly, "Pesan")
Call TampilGrid()
End If
End If
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Call bersih()
Call TampilGrid()
TextBox1.Focus()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
If TextBox1.Text = "" Then
MsgBox("Kode Masih Kosong")
Button3.Focus()
Exit Sub
Else
cmd = New OleDbCommand("Update dbbiodata set Umur='" & _
TextBox2.Text & "', Alamat = '" & TextBox3.Text & "',Keterangan='" & TextBox4.Text & "' where Nama='" & TextBox1.Text & "'", conn)
cmd.ExecuteNonQuery()
Call bersih()
Call TampilGrid()
TextBox1.Focus()
End If
End Sub
Private Sub TextBox5_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox5.TextChanged
If RadioButton1.Checked = True Then
da = New OleDbDataAdapter("Select * from dbbiodata where Nama like '%" & TextBox5.Text & "%' order by Nama asc", conn)
ds = New DataSet
ds.Clear()
da.Fill(ds, "dbbiodata")
DataGridView1.DataSource = (ds.Tables("dbbiodata"))
DataGridView1.ReadOnly = True
ElseIf RadioButton2.Checked = True Then
da = New OleDbDataAdapter("Select * from dbbiodata where Umur like '%" & TextBox5.Text & "%' order by Umur asc", conn)
ds = New DataSet
ds.Clear()
da.Fill(ds, "dbbiodata")
DataGridView1.DataSource = (ds.Tables("dbbiodata"))
DataGridView1.ReadOnly = True
End If
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
If TextBox1.Text = "" Then
MsgBox("Kode Masih Kosong")
Button3.Focus()
Exit Sub
Else
If MessageBox.Show("Yakin Akan di Hapus ...?", "Konfirmasi", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.Yes Then
cmd = New OleDbCommand("Delete from dbbiodata where Nama= '" & _
TextBox1.Text & "'", conn)
cmd.ExecuteNonQuery()
Call bersih()
Call TampilGrid()
TextBox1.Focus()
Else
Call bersih()
Call TampilGrid()
TextBox1.Focus()
End If
End If
End Sub
End Class

Sampai Disini Kurang Lebih Begitu Lah ya gan , Sekarang agan boleh cek Programnya tutor menjalankan progrmnya klik tersedia tanda play di option kafetaria di atas Visual Studio 2010 ., Sampai Disini Sekian Tutorial Dari Saya ., Semoga Berfungsi Bagi Anda Semua Yaa... Sekian Dari Saya Admin JagoanKode Silahkan Berkunjung lagi ya gan , ane kasi trik trik diam-diam nan orang belum pastinya share .. Sekian Terima Kasih 

Mengatasi Could Not Get Column Information For Database Object Named Pada Vb.Net

Halo Semua Admin Akan Membagikan Tutorial Bagaimana Mengatasi Could not get column information for database object named Pada VB.NET Pada Database Xampp Sql, Pada masalahitu aku juga pernah mengalaminya sempat galau juga solusinya apa cari sana cari sini gak sanggup juga , naahh kaliitu aku mau mengembangkan pengalaman aku dikala mencar ilmu vbnet, awalnya aku itu ingin membikin aktivitas database dengan menggunakan fitur koneksi dari data source nan diambil datanya dari odbc(rampung tersedia di pc) tetapi apa nan terjadi ? sesudah aku membikin koneksi aku mendapat pesan ini

<`database`..`table`>
Could not get column information for database object named
 '`database`..`table`'

Entah apapun itu masalahnya apakah itu driver , ataupun tersedia fitur nan kurang , tapi anehnya sewaktu aku duduk dibangku sekolah dikala praktek membikin aktivitas cuma 2 (dua) orang nan belombisa , itu yakni termasuk aku padahal semua driver rampung aku coba tetapi tetap saja hasilnya nol, tapi ingat sesusah apapun kami berusaha tetap itu mau berharga entah nanti ataupun kapanpun.. mulai dari my.sql data aku perbaiki , Microsoft C ++ Juga rampung semua, odbc driver, ado.net, bahkan tipe data juga rampung aku ulang berulang periksa rampung aku coba tetapi apa hasilnya juga belombisa ,

dan lalu sesudah sebulan lamanya aku mencari gak ketemu juga ? aku alhasil jenuh mencari itu juga aku tetapkan sebagai mengganti database xampp jadinya access, karna aku berfikir visual studio 2010 itu belomcocok databasenya jikalau menggunakan xampp/phpmyadmin , jadi tersedia menthor aku mengajarkan ia mengasi saran sebagai ubah database ganti jadinya microsoft sql server , yah karna aku malas mencari itu ataupun sanggup jadi aku malas mendownloadnya aku tetapkan sebagai berganti database jadinya access .

pilihan aku menentukan access karna ga repotkan gan, karna niscaya setiap orang rampung tersedia microsoft office nan dididalemnya itu rampung niscaya tersedia microsoft access nahh itu sanggup kami fungsikan gan, niscaya selamaitu belum pernah berfikir sebagai mencobanya kan ? naahh silahkan dicoba ganitu saran aku karna gunakan accessitu ga ribet sama sekali kami hanya perlu koneksi modulnya juga tinggal membikin aplikasinya nahh agan ga perlu kawatir aku rampung menyediakannya kok tutorialnya sangat gampang , Saran aku lebih benar kalian hentikan mencari dilema Could not get column information for database object named itu , percuma gan ga tersedia solusinya itu hanya berfungsi di sebagian laptop nan mendukung saja gan , apabila agan beralih ke lain pastinya ilmu kalian semua juga bertambah kan ? naahh janganlah sia sia kan waktu kalian ya,

Sesuai dengan postingan sebelumnialah Artikelnya gan Klik Disini
ataupun disitu Silahkan Ke Artikel Berikut

boleh kalian kunjungi artikel kami karna itu sangat berfungsi , aku melihat kebanyakan orang membikin aktivitas itu dengan vb6 ,bahkan hampir semua tutorial menjelaskan vb6 karna tutor sebagai VBNETitu sangat minim aku ingin meringankan kalian semua kami juga sama - sama mencar ilmu gan.. Demikianlah Sharing ilmu aku disitu aku ucapkan Terima kasih ... Sering Berkunjung Ya gann :D