Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Afficher le résultat d'une store procedure

12 réponses
Avatar
Sophie
Bonjour,

Je suis débutante en VB.net et ASP.net et ADO.net j'ai donc besoin de votre
aide. J'ai regardé dans les archives et je n'ai rien trouvé qui
correspondait à mon problème. Voici mon problème.

J'essaie de faire afficher le résultat d'une store procedure dans un Listbox
ou dans un DropDownList et ca ne fonctionne pas. Je joins à ce message le
code que j'ai utilisé. Je ne sais pas ce que j'ai fait d'incorrect puisque
j'ai utilisé le même code pour un datagrid et ça fonctionne bien. Ma store
procedure est bonne je l'ai tester avec query analyzer mais je vous l'ajoute
après mon code.



S.v.p. aidez moi.





Dim sqlCon As New SqlConnection("User Id=.;Password=.;Persist Security
Info=False;Initial Catalog=.;Data Source=..")





Dim sqlCon As New SqlConnection("User Id=sa;Password=sqladm2;Persist
Security Info=False;Initial Catalog=FraisDeplacement;Data Source=sqladm2")



Dim cmdFD As New SqlCommand

Dim prmNomUsager As New SqlClient.SqlParameter



With prmNomUsager

.ParameterName = "@pNomUsager"

.SqlDbType = SqlDbType.VarChar

End With



prmNomUsager.Value = pNomUsager



With cmdFD

.Connection = sqlCon

.CommandType = CommandType.StoredProcedure

.CommandText = "[psSelectionnerFraisDeplacement]"

.Parameters.Add(prmNomUsager)

.Connection.Open()

End With



Dim sqlAdapterFD As New SqlDataAdapter(cmdFD)



Dim dtFD As New DataTable

sqlAdapterFD.Fill(dtFD)



lbxFeuilleDeplacement.DataSource = dtFD

lbxFeuilleDeplacement.DataBind()



ddlFeuilleDeplacement.DataSource = dtFD

ddlFeuilleDeplacement.DataBind()




CREATE PROCEDURE psSelectionnerFraisDeplacement

@pNomUsager varchar


AS

SELECT (CAST(NoFeuille AS VARCHAR) + ' - ' + CAST(Min(DateDFD)AS VARCHAR) +
' - ' + CAST(Min(DateDFD)AS VARCHAR)) AS Feuille
FROM DetailFraisDeplacement
WHERE NomUsager = @pNomUsager
GROUP BY DetailFraisDeplacement.NoFeuille
GO


***************************************************



Merci

Bonne journée

Sophie



P.S. s.v.p. répondre dans le newsgroup je le consulte régulièrement

2 réponses

1 2
Avatar
Isabelle Prawitz
La réponse est sur le newsgroup aspnet...
Isa

"Sophie" a écrit dans le message de news:
Je viens de me rendre compte que je n'ai pas mentionné que c'étais du web.
Et donc mon listbox ne contient pas ces propriété là. Il n'y a pas de
DisplayMember et de ValueMember. Je suis sincèrement désolé d'avoir omit
cette information et de vous avoir induit en erreur.

Mon code est donc écrit pour une page web en relation avec les données d'une
base SQL.

Sophie

"Isabelle Prawitz" a écrit dans le message de
news:
> Bonjour !
> Renseigne les propriétés DisplayMember (pour ce qui s'affiche) et
ValueMember (pour ce qui est renvoyé, l'index en quelque
> sorte), les deux étant le nom (chaîne de texte entre "") de colonnes de ta
table.
> A+
> Isa
>
> "Sophie" a écrit dans le message de
news:%
> > Bonjour,
> >
> > Je suis débutante en VB.net et ASP.net et ADO.net j'ai donc besoin de
votre
> > aide. J'ai regardé dans les archives et je n'ai rien trouvé qui
> > correspondait à mon problème. Voici mon problème.
> >
> > J'essaie de faire afficher le résultat d'une store procedure dans un
Listbox
> > ou dans un DropDownList et ca ne fonctionne pas. Je joins à ce message
le
> > code que j'ai utilisé. Je ne sais pas ce que j'ai fait d'incorrect
puisque
> > j'ai utilisé le même code pour un datagrid et ça fonctionne bien. Ma
store
> > procedure est bonne je l'ai tester avec query analyzer mais je vous
l'ajoute
> > après mon code.
> >
> >
> >
> > S.v.p. aidez moi.
> >
> >
> >
> >
> >
> > Dim sqlCon As New SqlConnection("User Id=.;Password=.;Persist
Security
> > Infoúlse;Initial Catalog=.;Data Source=..")
> >
> >
> >
> >
> >
> > Dim sqlCon As New SqlConnection("User Id=sa;Password=sqladm2;Persist
> > Security Infoúlse;Initial Catalog=FraisDeplacement;Data
Source=sqladm2")
> >
> >
> >
> > Dim cmdFD As New SqlCommand
> >
> > Dim prmNomUsager As New SqlClient.SqlParameter
> >
> >
> >
> > With prmNomUsager
> >
> > .ParameterName = "@pNomUsager"
> >
> > .SqlDbType = SqlDbType.VarChar
> >
> > End With
> >
> >
> >
> > prmNomUsager.Value = pNomUsager
> >
> >
> >
> > With cmdFD
> >
> > .Connection = sqlCon
> >
> > .CommandType = CommandType.StoredProcedure
> >
> > .CommandText = "[psSelectionnerFraisDeplacement]"
> >
> > .Parameters.Add(prmNomUsager)
> >
> > .Connection.Open()
> >
> > End With
> >
> >
> >
> > Dim sqlAdapterFD As New SqlDataAdapter(cmdFD)
> >
> >
> >
> > Dim dtFD As New DataTable
> >
> > sqlAdapterFD.Fill(dtFD)
> >
> >
> >
> > lbxFeuilleDeplacement.DataSource = dtFD
> >
> > lbxFeuilleDeplacement.DataBind()
> >
> >
> >
> > ddlFeuilleDeplacement.DataSource = dtFD
> >
> > ddlFeuilleDeplacement.DataBind()
> >
> >
> >
> >
> > CREATE PROCEDURE psSelectionnerFraisDeplacement
> >
> > @pNomUsager varchar
> >
> >
> > AS
> >
> > SELECT (CAST(NoFeuille AS VARCHAR) + ' - ' + CAST(Min(DateDFD)AS
VARCHAR) +
> > ' - ' + CAST(Min(DateDFD)AS VARCHAR)) AS Feuille
> > FROM DetailFraisDeplacement
> > WHERE NomUsager = @pNomUsager
> > GROUP BY DetailFraisDeplacement.NoFeuille
> > GO
> >
> >
> > ***************************************************
> >
> >
> >
> > Merci
> >
> > Bonne journée
> >
> > Sophie
> >
> >
> >
> > P.S. s.v.p. répondre dans le newsgroup je le consulte régulièrement
> >
> >
>
>




Avatar
Zoury
Bonjour!

en francais je crois que DropDownList c'est combobox, mais pas sur :)



"Liste déroulante" serait le terme français approprié. ComboBox est l'ancien
nom du contrôle DropDownList et ce n'est pas plus français que l'autre.


Toutefois, dans le monde de la programmation, si tu être certaine que les
gens sache de quoi tu parles, DropDownList est définitivement le terme
approprié car sinon on pourrait se demandé de quel contrôle du parles... ;O)


--
Cordialement
Yanick
MVP pour Visual Basic
1 2