Cara Koneksi Sql Server dengan Visual Studio 2010
Selamat pagi guys kali ini saya akan membuat sebuah artikel yang berjudul cara koneksi sql server dengan visual studio 2010, di sini saya akan mengkoneksikan database yang ada pada sql server. tetapi pada artikel kali ini masih belum banyaknya tmbol button yang ada, jadi hanya sekedar mengkineksikan saja, tetapi disini saya memberi 1 tombol button yang button tambah, untuk memasukkan data kedatabase.
langsung aja ya guys perhatikan tutorialnya dibawah ini:
- yang pertama anda lakukan adalah membuat database pada sql server dengan nama TBLSisswa, dan isikan data sesuai dengan gambar dibawah ini.
- setelah anda membuat database seperti pada gambar berikutnya anda harus membuka aplikasi visual studio anda, dan beri namakoneksiTBLsiswa.
- yang pertama anda lakukan ketika aplikasi visual studio anda terbuka adalah membuat desainnya, untuk lebih jelasnya lihat gambar di bawah ini.
- setelah anda membuat desain seperti gambar diatas, berikutnya yang mesti anda lakukan adalah memasukkan kodingannya, mungkin ini yang agak sulit bagi pemula, karena disni sobat harus sangat teliti memasukkannya beda koma(,) saja aplikasi anda tidak akan terkoneksi, makanya ketelitian sangat di butuhkan.
- berikutnya klik kanan form1 kemudian Pilih View Code (f7). dan masukkan kode di bawah ini.
Public Class Form1
Dim tabel As OleDb.OleDbDataAdapter
Dim data As DataSet
Dim record As New BindingSource
Sub bersih()
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
Call datasisswa()
End Sub
Sub datasisswa()
Call koneksi()
tabel = New Data.OleDb.OleDbDataAdapter("select * from TBLSisswa", database)
data = New DataSet
tabel.Fill(data)
record.DataSource = data
record.DataMember = data.Tables(0).ToString()
DataGridView1.DataSource = record
End Sub
Dim tabel As OleDb.OleDbDataAdapter
Dim data As DataSet
Dim record As New BindingSource
Sub bersih()
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
Call datasisswa()
End Sub
Sub datasisswa()
Call koneksi()
tabel = New Data.OleDb.OleDbDataAdapter("select * from TBLSisswa", database)
data = New DataSet
tabel.Fill(data)
record.DataSource = data
record.DataMember = data.Tables(0).ToString()
DataGridView1.DataSource = record
End Sub
- setelah anda memasukkan kodingan diatas, berikutnya yang mesti anda lakukan adalah klik 2 kali pada (double click) pada form 1 dan masukkan kode berikut.
Call datasisswa()
Me.BackColor = Color.Aquamarine
Me.BackColor = Color.Aquamarine
- berikutnya adalah klik 2 kali (double click) button tambah dan masukkan kode berikut.
Dim sqlquery As New OleDb.OleDbCommand
sqlquery.Connection = database
sqlquery.CommandType = CommandType.Text
sqlquery.CommandText = "insert into TBLSisswa values ('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "')"
sqlquery.ExecuteNonQuery()
MsgBox("data tersimpan")
Call bersih()
sqlquery.Connection = database
sqlquery.CommandType = CommandType.Text
sqlquery.CommandText = "insert into TBLSisswa values ('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "')"
sqlquery.ExecuteNonQuery()
MsgBox("data tersimpan")
Call bersih()
- berikutnya anda harus membuat module caranya adalah klik kanan pada nama file anda (koneksiTBLsiswa) kemudian pilih add dan pilih module.
- setelah form module terbuka masukkan kode dibawah ini.
Imports System.Data
Imports System.Data.Sql
Module Module1
Public database As OleDb.OleDbConnection
Public Sub koneksi()
Try
database = New OleDb.OleDbConnection("Provider=SQLOleDb.1;Integrated Security=SSPI;Persist Security Info=false;Initial catalog=TBLSisswa;data source=.\SQLEXPRESS")
database.Open()
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub
End Module
Imports System.Data.Sql
Module Module1
Public database As OleDb.OleDbConnection
Public Sub koneksi()
Try
database = New OleDb.OleDbConnection("Provider=SQLOleDb.1;Integrated Security=SSPI;Persist Security Info=false;Initial catalog=TBLSisswa;data source=.\SQLEXPRESS")
database.Open()
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub
End Module
- Finish
- berikutnya anda tinggal run (menjalankan aplikasinya) dan tampilannya seperti gambar dibawah ini.
Sebenarnya yang susah dalam mengkoneksikan antara sql server dengan visual studio adalah ketika kurang koma(,) saja atau tanda kutip(") aplikasinya akan error, dan itu butuh waktu lama mencari error seperti itu, makanya sekedar saran dalam mengkoneksikan kedua aplikasi ini ketelitian tinggi mesti harus anda miliki. sekian artikel pada kali ini mudah-mudahan bisa bermanfaat, jika ada kekurangan mohon mav, jika ada yang kurang jelas silahkan tinggalkan comment dibawah ini.
