Bonjour à tous !
Depuis quelques temps, sous Visual Studio 2017, que ce soit sur de nouveau projets directement crée dedans ou d'ancien projet migré vers 2017, j'ai des messages avec mes UserControl.
Je suis sous Vb.net.
exemple :
Dans ma page .aspx j'ai mon userControl renseigné comme ceci :
et employé comme ceci dans .aspx.vb
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 <%@ Register Src="~/wucMetier/wucInitBandeau.ascx" TagPrefix="uc1" TagName="wucInitBandeau" %>
J'au par exemple sur la première ligne, d'affectation du User, le message suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 wucInitBandeau.SetUser(UserAgence) wucInitBandeau.Ecran = "- Initialisation"
Une référence à l'assembly 'App_Code.raj9wqoq, Version=0.0.0.0, Cultures=neutral, PublicKeyToken=null' contenant le type 'User' est requise. Ajoutez-en une à votre projet.
Dans mon userControl j'ai bien ma méthode :
Le code fonctionne, si je tape un appel à SetUser l'intellisense fonctionne, je ne comprends pas le problème...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25 Public Sub SetUser(ByVal user As Francelot.User) If IsNothing(user) = False Then If IsNothing(user.strNom) AndAlso IsNothing(user.strPrenom) Then lUser.Text = String.Format("{0}", user.strNomUser) Else lUser.Text = String.Format("{0} {1}", user.strNom, user.strPrenom) End If Select Case user.EstDeSexe Case Francelot.User.Sexe.Feminin lUser.CssClass = "userF" Case Else lUser.CssClass = "userM" End Select lAgence.Text = user.Agence.strNomAgence Else lUser.Text = "Inconnu." lAgence.Text = "Inconnue." End If End Sub
Merci d'avance pour vos éclaircissement.
Partager