Remplir dynamiquement des textefields avec une base de donnée
Louis_Dher
Messages postés
5
Date d'inscription
vendredi 27 juin 2014
Statut
Membre
Dernière intervention
18 juillet 2014
-
Modifié par Louis_Dher le 18/07/2014 à 11:22
Jessica - 11 août 2014 à 13:27
Jessica - 11 août 2014 à 13:27
A voir également:
- Remplir dynamiquement des textefields avec une base de donnée
- Base de données javascript - Conseils pratiques -Javascript
- Nomenclature base de données - Conseils pratiques -PHP
- Connexion base de données - Conseils pratiques -PHP
- Ebp impossible de se connecter à la base de données ✓ - Forum SQL
- Exemple base de donnée gestion de stock - Forum SQL
1 réponse
' COTE CLIENT
' Datasource
<asp:SqlDataSource ID="SqlDataSourceClient" runat="server"
ConnectionString="<%$ ConnectionStrings:... %>"
SelectCommand="SELECT CodeClient , NomClient FROM .. ORDER BY NomClient ASC"></asp:SqlDataSource>
'List Client
<asp:DropDownList ID="ListeClient" runat="server" AppendDataBoundItems="true" DataSourceID="SqlDataSourceClient" DataTextField="NomClient" DataValueField="CodeClient" >
<asp:ListItem Value="-1">Tous</asp:ListItem>
</asp:DropDownList>
' COTE SERVEUR
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
else
If ListeClient.SelectedItem.Value <> "-1" Then
NomFunction()
End If
End Sub
' Sub NomFunction()
Dim maConnexion As New SqlConnection
Dim req As String
maConnexion.ConnectionString = ...
maConnexion.Open()
req = "SELECT id_contact, nom, ... FROM CONTACTS WHERE codeClient='" & ListeClient.SelectedValue & "'"
Dim maCommand As New SqlCommand(req, maConnexion)
Dim monReader As SqlDataReader = maCommand.ExecuteReader()
monReader.Read()
If monReader.HasRows <> False Then
nomClient.Text = monReader(0)
contactClient.Text = monReader(2)
adrClient.Text = ..
cpClient.Text = ""
villeClient.Text = ""
End If
monReader.Close()
maConnexion.Close()
' Datasource
<asp:SqlDataSource ID="SqlDataSourceClient" runat="server"
ConnectionString="<%$ ConnectionStrings:... %>"
SelectCommand="SELECT CodeClient , NomClient FROM .. ORDER BY NomClient ASC"></asp:SqlDataSource>
'List Client
<asp:DropDownList ID="ListeClient" runat="server" AppendDataBoundItems="true" DataSourceID="SqlDataSourceClient" DataTextField="NomClient" DataValueField="CodeClient" >
<asp:ListItem Value="-1">Tous</asp:ListItem>
</asp:DropDownList>
' COTE SERVEUR
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
else
If ListeClient.SelectedItem.Value <> "-1" Then
NomFunction()
End If
End Sub
' Sub NomFunction()
Dim maConnexion As New SqlConnection
Dim req As String
maConnexion.ConnectionString = ...
maConnexion.Open()
req = "SELECT id_contact, nom, ... FROM CONTACTS WHERE codeClient='" & ListeClient.SelectedValue & "'"
Dim maCommand As New SqlCommand(req, maConnexion)
Dim monReader As SqlDataReader = maCommand.ExecuteReader()
monReader.Read()
If monReader.HasRows <> False Then
nomClient.Text = monReader(0)
contactClient.Text = monReader(2)
adrClient.Text = ..
cpClient.Text = ""
villeClient.Text = ""
End If
monReader.Close()
maConnexion.Close()
