ต้องการใช้งาน 2 เครื่อง ต้องทำไงครับ SQL SEVER 2008

Imports System.Data.SqlClient

Dim myCNN As New SqlClient.SqlConnection("Data Source=Woody;Initial Catalog=Your DB;Persist Security Info=True;User ID=sa;Password=Your Password") ' เป็นส่วนของ ConnectionString เพื่อติดต่อ Database

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load



If myCNN.State = ConnectionState.Open Then myCNN.Close()
myCNN.Open()  ' Test Connect Server

If myCNN.State = ConnectionState.Open Then
                    MsgBox("Connected Complete")
                Else
                    MsgBox("Can Not Connect")
                End If


End if



End Sub