Coneccion Remota

[mactus]

No puedo conectar me al servidor no se ques lo que pasa o que me falta para completar la coneccion siempre me manda error de sintaxis

Imports System.Data.SqlClient ' EL PROVEEDOR DE BASE DE DATOS SQLCLIENT



Public Class Form1
Dim conexion As New SqlConnection 'DECLARAS TU CONEXION

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click



conexion.ConnectionString = "Data Source=192.168.1.101,1433;Network Library=DBMSSOCN;Initial Catalog=TestCpi;User ID=user;Password=xxx;"



Try 'ABRES TRY
conexion.Open() 'ABRE TU CONEXION


MessageBox.Show("Tu conexion es correcta") 'SI NO HAY PROBLEMA SE ABRE LA CONEXION Y APARECE EL MENSAJE


Catch excepcion As SqlException ' DECLARAS EXCEPCION


MessageBox.Show("Error de sintaxis") 'SI TIENES ALGUN ERROR ENTRA ESTE MENSAJE


conexion.Close() 'CIERRA TU CONEXION


End Try 'CIERRAS TRY

End Sub
End Class