Koneksi String VB.NET 2010 From App.Config

Sebelumnya sudah di jelaskan koneksi string pada pembahasan sebelumnya dengan judul Koneksi String VB.NET 2010 sekarang penulis akan membagikan sedikit ilmu cara Koneksi String VB.NET 2010 dari App.Config. Berikut adalah tutorialnya :

Buka project yang sudah dibuat Membuat Project Baru di VB.NET 2010
Tambahkan Reference : klik kanan pada folder References + Add Reference seperti gambar berikut 

 

Pilih tab .NET + System.Configuration + OK lihat gambar berikut

 

Dibawah ini adalah tampilan isi References yang sudah di tambahkan System.configuration

 

Aktifkan file App.Config dengan cara klik kanan pada file App.Config pilih Include In Project seperti gambar di bawah ini

 

Berikut adalah tampilan App.Config yang sudah di include di  dalam project

 

Untuk menyembunyikan kembali file yang ter-hidden klik tombol yang diberi tanda merah seperti gambar di bawah ini dan file yang tidak terhidden ada didalam kotak warna hijau

Buka  file App.Config dan ketikkan kode seperti berikut

 <?xml version="1.0" encoding="utf-8" ?>
<configuration>
    <startup>
        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.0,Profile=Client" />
    </startup>
    <appSettings>
      <add key="ConString" value="uid=sa;pwd=;database=Applications_test;server=."/>
    </appSettings>
</configuration>

Buat form seperti gambar dibawah ini

 

 Ketikkan kode berikut

Imports System.Data.SqlClient
Imports System.Configuration

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim connectionString As String
        Dim cnn As SqlConnection

        connectionString = ConfigurationManager.AppSettings("ConString").ToString()

        cnn = New SqlConnection(connectionString)
        Try
            cnn.Open()
            MsgBox("Connection Open ! ")
            cnn.Close()
        Catch ex As Exception
            MsgBox("Can not open connection ! ")
        End Try
    End Sub
End Class

Setelah selesai menambahkan kode diatas, jalankan project dengan menekan tombol RUN. bila ada info Conncetion Open ! seperti gambar dibawah ini berarti sukses.

Posted in: Visual Basic .Net 2010