Rabu, 10 Oktober 2012

Cara Koneksi Microsoft SQL Server dengan Visual Basic 2005

Cara Koneksi Microsoft SQL Server 2005 dengan VB.NET 2005



Pada Kesempatan kali ini saya akan memberikan tips bagaimana membuat koneksi database dari sql server 2005 ke visual basic 2005 (VB 2005).

Pertama yang harus dilakukan yaitu :
Buat dahulu database di SQL Server dengan menggunakan SQL Server Management Studio Express.
Buka SQL Server Management Studio Express di Start Menu ->All programs -> Microsoft SQL Server 2005 -> SQL Server Management Studio Express.









Setelah itu akan muncul tampilan seperti di bawah ini :






Sebelum meng-klik connect, pastikan nama servernya benar.

Setelah itu pada klik kanan pada database à New database. Dalam contoh ini saya akan membuat database dengan nama kampus 



Setelah selesai, buka Visual Basic 2005.
Tambahkan sebuah objek di form, yaitu button. Lalu ganti tulisan button dengan tulisan “Connect to database” dengan cara mengganti properti text pada button.





Setelah itu kita masuk pada tahap coding. Double click pada button yang telah ditambahkan tadi.
Masukan code dibawah ini ke dalam form coding tersebut :
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim sqlconn As New SqlClient.SqlConnection
   
        'membuat koneksi dengan database
        'F23\SQLEXPRESS (SQL Server 9.0.1399 - F23\Lab F) adalah nama server di komputer, ini bisa diganti
        sqlconn.ConnectionString = "server = F23\SQLEXPRESS (SQL Server 9.0.1399 - F23\Lab F);Database = kampus;integrated security=true"
        Try
            sqlconn.Open()
        Catch ex As Exception
            MessageBox.Show(ex.Message, "Connection Failed", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try
        If sqlconn.State = 1 Then
            Me.Text = "Koneksi Berhasil"
            Me.BackColor = Color.Aqua
        End If

    End Sub
End Class


Tampilan coding pada Visual Basic 2005


Tampilan Form apabila koneksi berhasil




Penjelasan :
1. Inherits System.Windows.Forms.Form : Class Form1 sebagai turunan (inherits)dari System.Windows.Forms.Form. Ini karena setiap objek yang kita buat pada vb 2005 terdiri dari class. 2. sqlconn.ConnectionString = “server = F23\SQLEXPRESS (SQL Server 9.0.1399 - F23\Lab F);Database = kampus;integrated security=true” : Sintaks ini sebagai pembuat koneksi database antara vb 2005 dengan sql server 2005, dengan nama server F23\SQLEXPRESS (SQL Server 9.0.1399 - F23\Lab F)” adalah nama computer saya, sedangkan nama databasenya adalah kampus sesuai dengan yang tadi telah kita buat. Nama server dan database sebaiknya diganti sesuai nama server pada laptop atau komputer anda.
3. Perintah try sampai dengan end try adalah sintaks yang berfungsi untuk mengalihkan jika terjadi error. Jika dalam instruksi dalam Try terdapat kesalahan maka yang akan dijalankan adalah instruksi dibawah catch. Dalam contoh di atas apabila, tidak ada kesalahan pada Try koneksi akan berjalan, F23\SQLEXPRESS (SQL Server 9.0.1399 - F23\Lab F) sedangkan jika tidak akan keluar pesan error.


4. Sedangkan pada percabangan if, jika koneksi berhasil akan merubah background form dan properti text pada form.
           

Tidak ada komentar:

Posting Komentar