Połączenie z bazą danych MSSQL

0

Cześć,
proszę o pomoc, czy coś jest nie tak z kodem, czy może z konfiguracją bazy.
Próbuję ustanowić połączenie kodem:


Imports System.Data.SqlClient
Public Class Form1

    Dim connection As New SqlConnection("server=####; database=####; user id=####; password=####")

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

        If connection.State = ConnectionState.Closed Then
            connection.Open()
            MsgBox("Connection open")
        End If

    End Sub

End Class
```

i dostaję błąd z załącznika.

Dane bazy są na pewno ok, ponieważ bez problemu łączę się przez Management studio.
0

Ja to robię tak:


            string sConnectionString;
            sConnectionString = "Data Source=NAMESERWER;Initial Catalog=BAZA;Persist Security Info=True;User ID=user; Password=password;";
            SqlConnection objConn
            = new SqlConnection(sConnectionString);
            objConn.Open();
    

            SqlDataAdapter faktura
= new SqlDataAdapter("SELECT  [t0].[Faktura] as 'InvoiceNumber', [t0].[FATrN_Data2] as 'Date', [t0].[FATrN_Data3] as 'InvoiceIssueDate',  DATEADD(DD, 90, [t0].[FATrN_Data3]) as 'InvoiceDueDate', '90' as 'PaymentTerms', 'I' as 'PaymentTermsReferenceDate' FROM [CDN].[INEcodFANaglo] AS [t0] WHERE ([t0].[TrN_GIDNumer] = '1015871') AND ([t0].[TrN_GIDTyp] = '2033')", objConn);

            SqlDataAdapter paymentmethod1
   = new SqlDataAdapter("SELECT  'P' as 'CODE', 'Przelew' as 'Description' FROM [CDN].[INEcodFANaglo] AS [t0] WHERE ([t0].[TrN_GIDNumer] = '1015871') AND ([t0].[TrN_GIDTyp] = '2033')", objConn);

       

           
            DataSet ds = new DataSet("Invoice");
            faktura.Fill(ds, "InvoiceHeader");
           
		   paymentmethod1.Fill(ds, "PaymentMethod");
           

            XDocument doc1 = new XDocument(
    new XDeclaration("1.0", null, null));


            dataGridView1.DataSource = ds;
            ds.WriteXml(@"c:\test.xml");
            dataGridView1.DataSource = ds;
            objConn.Close();

        }
0

spróbuj dodać ; po password=####

0
s.wojcik napisał(a):

Cześć,
proszę o pomoc, czy coś jest nie tak z kodem, czy może z konfiguracją bazy.
Próbuję ustanowić połączenie kodem:


Imports System.Data.SqlClient
Public Class Form1

    Dim connection As New SqlConnection("server=####; database=####; user id=####; password=####")

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

        If connection.State = ConnectionState.Closed Then
            connection.Open()
            MsgBox("Connection open")
        End If

    End Sub

End Class

Na pewno podajesz dobry login użytkownika? Sprawdziłem u siebie i podobny komunikat "login failed for user ....." występuje gdy podam zły login użytkownika w ConnectionString.

0

Serwer SQL jest na tej samej maszynie ?

0
Slepiec napisał(a):

Serwer SQL jest na tej samej maszynie ?

Nie. Na serwerze w sieci wewnętrznej.
Przez VBA mogę się bez problemu połączyć na tych samych danych logowania.

1 użytkowników online, w tym zalogowanych: 0, gości: 1