glodylmg
Messages postés4Date d'inscriptionmercredi 5 février 2014StatutMembreDernière intervention 2 juillet 2015 2 juil. 2015 à 07:24
Je ce code me plus en vb 6.0
Private Sub ComboBox2_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox2.SelectedIndexChanged
RstParent.Open("SELECT *from dbo.Parent where Nompar='" & (ComboBox2.Text) & "'", connexion, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic)
TextBox8.Text = ""
'(Sql)
Do While RstParent.EOF = False
TextBox8.Text = (RstParent("Codpar").Value)
RstParent.MoveNext()
Loop
RstParent.Close()
End Sub
ce sa le code que j'utilise
ucfoutu
Messages postés18038Date d'inscriptionlundi 7 décembre 2009StatutModérateurDernière intervention11 avril 2018209 Modifié par ucfoutu le 2/07/2015 à 07:53
Bonjour, glodylmg,
Ta réponse est complètement "à côté de la plaque" !!!!
Elle ne correspond pas à la question.