สร้างโปรแกรมเก็บข้อมูลโดยใช้ฐานข้อมูล Access เชื่อมกับ Sever

    Sub Page_Load(sender As Object, e As EventArgs)
		Dim strConnString As String
		strConnString = "Server=localhost;Uid=sa;PASSWORD=;database=mydatabase;Max Pool Size=400;Connect Timeout=600;"
		objConn = New SqlConnection(strConnString)
		objConn.Open()

		If objConn.State = ConnectionState.Open Then
			Me.lblText.Text = "SQL Server Connected"
		Else
			Me.lblText.Text = "SQL Server Connect Failed"
		End IF
    End Sub