Selasa, 20 Agustus 2013

koneksi vb 2010 dengan sql server 2008 r2

Ane mau bagiin buat rekan - rekan sekalian tentang cara mengkoneksikan vb 2010 dengan sql server 2008 r2 dan cara menampilkan database yang berada di sql server 2008 r2 ke datagridview......moga - moga untuk agan" yang masih baru tulisan ne bermanfaat n untuk agan" yang sudah mahir di vb 2010 n sql server 2008 r2 ,,, mohon di koreksi yooooo .... ane juga lagi proses belajar ... hheeeu
berikut sintaksnya
Imports System.Data
Imports System.Data.SqlClient

Public Class Form1
    Dim koneksi As SqlConnection

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim strkoneksi As String

        strkoneksi = "Data source=DAGOENG-24\SQLEXPRESS;Initial Catalog=db_mhs;Integrated Security = True"

        koneksi = New SqlConnection (strkoneksi )
        Try
            koneksi.Open()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
       
    End Sub

Tampilan awal (belum di run )

double klik di button tampill

    Private Sub btn_tampil_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_tampil.Click
        Dim da As SqlDataAdapter
        Dim ds As DataSet

        Try
            da = New SqlDataAdapter("select*from dbo.mhs", koneksi)
            ds = New DataSet

            da.Fill(ds, "dbo.mhs")
            DataGridView1.DataSource = ds.Tables(0)

        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub
End Class

Tampilan setelah di run

untuk membuat database di sql server 2008 r2 silahkan di liahat di judul sql server milik ku.. hheeeeu

sekian.. terima kasih ^__^

Tidak ada komentar:

Posting Komentar