مشکل Open کردن اتصال در اکثر موارد ، اشتباه در Connection String هست .

شما Connection String رو به این صورت بنویسین :

کد:
Dim con As New SqlClient.SqlConnection("server=(local);database=goldsmith;Integrated Security=True")