VB .NET - Cara Koneksi Database SQL Server
Jangan lupa membaca artikel sebelumnya, yaitu > Panduan Pemrograman Pemula.
Pada tutorial gratis VB .Net atau Visual Basic .Net kali ini akan dibahas mengenai Cara Koneksi Database SQL Server. Langkahnya sangat mudah, silahkan ikuti tutorial dibawah ini :
Pastikan anda telah menginstall Aplikasi dibawah ini :
1. Visual Basic .Net
2. Database SQL Server (kami menggunakan SQL Server 2008 R2)
Berikut langkanya :
No.1 - Membuat Database dan Tabel Dengan SQL Server
Kemudian silahkan Run atau jalankan Project VB Net anda
Selain sebagai media informasi pemrograman, kami juga berbagi artikel terkait tips trik Android.
Pada tutorial gratis VB .Net atau Visual Basic .Net kali ini akan dibahas mengenai Cara Koneksi Database SQL Server. Langkahnya sangat mudah, silahkan ikuti tutorial dibawah ini :
Pastikan anda telah menginstall Aplikasi dibawah ini :
1. Visual Basic .Net
2. Database SQL Server (kami menggunakan SQL Server 2008 R2)
Berikut langkanya :
No.1 - Membuat Database dan Tabel Dengan SQL Server
Buatlah Database Pada SQL Server dengan nama : DBJNM
Kemudian karena nantinya kita akan mengkoneksikannya saja, maka membuat sample data pada
TBL_PEGWAI tersebut. silahkan masukan seperti contoh dibawah ini :
TBL_PEGWAI tersebut. silahkan masukan seperti contoh dibawah ini :
Jika sudah membuat langkah diatas,
No.2 - Membuat Form1 Beserta KodingnyaBuka Visual Basic .Net anda
Pada Form diatas, hanya ditambahkan Datagridview1
Kemudian pada Form1, masukan koding dibawah ini :
Imports System.Data.SqlClient
Public Class Form1
Dim Conn As SqlConnection
Dim da As SqlDataAdapter
Dim ds As DataSet
Dim LokasiDB As String
Sub Koneksi()
LokasiDB = "data source=JAVANET007;initial catalog=DBJNM;integrated security =true"
Conn = New SqlConnection(LokasiDB)
If Conn.State = ConnectionState.Closed Then Conn.Open()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Koneksi()
da = New SqlDataAdapter("Select * from TBL_PEGAWAI", Conn)
ds = New DataSet
ds.Clear()
da.Fill(ds, "TBL_PEGAWAI")
DataGridView1.DataSource = (ds.Tables("TBL_PEGAWAI"))
End Sub
End Class
Kemudian silahkan Run atau jalankan Project VB Net anda
Hasilnya adalah seperti gambar dibawah ini :
Silahkan KLIK DISINI Untuk Download Project Source Code diatas
Silahkan KLIK DISINI Untuk Download Project Source Code diatas
Semoga bermanfaat untuk Sobat JNM, ikuti terus pembelajaran kami selanjutnya :)
Selain sebagai media informasi pemrograman, kami juga berbagi artikel terkait tips trik Android.