VB.Net ADO.Net Récupérer une valuer d'une requête SQL

Question

Bonjour...


J'ai une requête SQL et un Variable en String
Dim Numero as String Req "SELECT Code FROM Liste WHERE Cad '" & Replace(Combobox.Text, "'", "''") & "'"
P.S. je ne suis pas certain que ma requête est OK


Je veux récupérer la valeur du Code (Voir requête SQL)


Comment je fais???
Numero = ??????????????????


Merci de votre aide


Pour le moment j'utilise ce code pour d'autres requêtes


    Private Sub cbxCadastre_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)
        'le datagridview du form "liste_cadastre" se met à jour
        ReqSQL = "SELECT * FROM Liste_Cadastre"
        Execute("Plans")
        Liste_Cadastre.DtgListe.DataSource = Dtt        Req "SELECT Code FROM Liste WHERE Cad '" & Replace(Combobox.Text, "'", "''") & "'"
    End Sub


Public Function Execute(ByVal table As String) As DataView
                Dim SourceConnect As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\Plans_Cadastre.mdb"
        SourceOle = New OleDbConnection(SourceConnect)
        Select Case SourceOle.State
            Case ConnectionState.Closed
                SourceOle.Open()
        End Select


        DataA = New OleDbDataAdapter(Req, SourceOle)
        Dim DataS As New DataSet
        DataA.Fill(DataS, table)
        Dtt = DataS.Tables(table)


        Try 'la suite n'est pas obligatoire
            Return DataS.Tables(table).DefaultView 'on demande au dataset de renvoyer la reponse de la requetesql sous forme de datagridview
        Catch ex As Exception
            Return Nothing
        Finally
            Select Case SourceOle.State
            Case ConnectionState.Open
                SourceOle.Close()
                SourceOle.Dispose()
                SourceOle = Nothing
        End Select
        End Try


    End Function

NHenry · Answer

Bonjour

Je te conseile plutot d'utiliser un objet Command et de récupérer un DataReader (voir MSDN).

if DataReader.Read() then 'Ne pas l'oublier, sinon c'est l'erreur assurée
    DataReader.GetString(0)
end if

Le fer à souder a besoin d'une panne pour fonctionner.
VB (6, .NET1&2), C++, C#.Net1
Mon site

cs_MagDix · Answer

Salut...

Mais il n'y a aucune façon de récupérer l'info à partir d'ADO ou bien prendre la ligne aucomplet et la Spliter par la suite ????

merci

NHenry · Answer

Bonjour

Sinon dans ton DataSet, tu as des DataTable (.Tables(...)), tu as après les lignes (.Rows(...)) et ensuite, tu peux accéder au cellules (.Cells(...), je crois).

Le fer à souder a besoin d'une panne pour fonctionner.
VB (6, .NET1&2), C++, C#.Net1
Mon site

VB.Net ADO.Net Récupérer une valuer d'une requête SQL

3 réponses

Votre réponse

Discussions similaires