connexion SQLServer asp.net vb.net avec visal studio

Question

bonjour

J'ai un petit probl&#232;me pour me connecter &#224; SQLServer donc la base se trouve sur un serveur pour l'instant j'ai proc&#233;d&#233; ainsi:

petite fonction qui me permet de me connecter &#224; la base:

    Public Function Execute_SQL_dv(ByVal SQL As String) As DataView
        Dim connstring As String = "Provider=Microsoft OLE DB Provider for SQL Server;Integrated Security=SSPI;Data Source=SQL;Initial Catalog=WinWare Import"
        'Try
        Dim Conn As New OleDbConnection(connstring)
        Dim DA As New OleDbDataAdapter(SQL, Conn)
        Dim DS As New DataSet
        DA.Fill(DS)
        Return DS.Tables(0).DefaultView
        'Catch ex As Exception

        'End Try
    End Function

mais quand je veux afficher les donn&#233;es de ma requete dans un datagrid j'obtiens tjs la m&#234;me erreur:
    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        DataGrid1.DataSource = Execute_SQL_dv("SELECT * FROM [Articles]")
        If Not DataGrid1.DataSource Is Nothing Then
            DataGrid1.DataBind()
            If DataGrid1.Items.Count > 0 Then
                Result.Text = "Liste des r&#233;sultats (s) page " & DataGrid1.CurrentPageIndex + 1 & " / " & DataGrid1.PageCount
            Else
                DataGrid1.Visible = False
                DataGrid1.Visible = False
                Result.Text = "Aucun produit trouv&#233;"
            End If
        Else
            Result.Text = "Aucun produit trouv&#233;"
        End If

    End Sub

l'erreur que j'obtiens &#224; chaque fois est la suivante:
D&#233;tails de l'exception: System.Data.OleDb.OleDbException: Login failed 
for user '(null)'. Reason: Not associated with a trusted SQL Server 
connection.

MERCI DE VOTRE AIDE

Fehn · Answer

Bonjour,

Tiens, je te donne ma fonction pour une base de donn&#233;e DSN (tu peux mettre ta base de donn&#233;e SQL Server en DSN gr&#226;ce au outils d'administration (tu vas dans "Source de donn&#233;e ODBC)

Function connexion() As ADODB.Connection
    'D&#233;claration des variables
    Dim objADOConn As ADODB.Connection
    Dim strConn As String
    'param&#232;tre de la base plac&#233; dans une variable string
    strConn = "DSN=nom_de_ta_base; " & _
              "Network Library=dbmssocn;"
              
    Set objADOConn = CreateObject("ADODB.Connection")
    'Ouverture de la base de donn&#233;e
    On Error Resume Next
    objADOConn.Open strConn
        If (Err 0) And (objADOConn.State adStateOpen) Then
        'connexion r&#233;ussi
        Set connexion = objADOConn
        MsgBox "Connexion ok"
    Else
        'connexion &#233;chou&#233;
        Set connexion = Nothing
        MsgBox "Probl&#232;me lors de la connexion &#224; la base de donn&#233;e"
    End If
End Function

Ensuite, tu appelle cette fonction dans les sous Routines concern&#233;es.

Voil&#224;, j'espere que ca pourra t'aider :)

Fehn

Connexion SQLServer asp.net vb.net avec visal studio

1 réponse

Discussions similaires