Module Koneksi pada VB.Net Visual Basic dengan database iSQLPlus

Berikut ini adalah module Koneksi pada VB (Visual Basic) yang berfungsi untuk mengkoneksikan dengan database Oracle 10g /  iSQLPlus. Caranya yaitu dengan klik kanan pada Project => Add => Module dan beri nama Koneksi. Langsung saja lihat kodingnya dibawah :

Imports System.Data

Imports System.Data.OleDb

Module Koneksi

    Public con As OleDbConnection

    Public cmd As OleDbCommand

    Public dr As OleDbDataReader

    Public Sub koneksidata()

        Dim konek As String

        konek = "Provider=msdaora;Data Source=ORCL;User Id=system;Password=dery"

        Try

            con = New OleDb.OleDbConnection(konek)

            con.Open()

            con.Close()

        Catch ex As Exception

            MessageBox.Show("Koneksi Eror : " & ex.Message)

        End Try

    End Sub

End Module

 Sekian dan Terimakasih...........