Tuesday, 19 July 2011

VB.NET Connection String

Imports System.Data.OleDb

Public Class Form1
Dim connetionString As String
Dim conn As OleDbConnection

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
connetionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\USER\Documents\Database3.accdb"
conn = New OleDbConnection(connetionString)
Try
conn.Open()
MsgBox("Done")
conn.Close()
Catch ex As Exception
MsgBox("Not Done")

End Try

End Sub
End Class

No comments:

Post a Comment