Bonjour à tous,

j'au mis en place une requete parametrée ,l'affichage sur fait ds un datalist, avec un bouton pour editer le resultat.
mais en cliquant sur le bouton pour editer rien ne se passe.

ma page ASPX
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
26
27

<asp:LabelID="Label1"runat="server"Text="Matricule :"></asp:Label>
<asp:TextBoxID="TextBox1"runat="server"></asp:TextBox>
<asp:ButtonID="Button1"runat="server"OnClick="getdata"Text="Button"/>

<asp:DataListID="DataList1"runat="server"BackColor="LightGoldenrodYellow"RepeatColumns="1"BorderColor="Tan"BorderWidth="1px"CellPadding="2"ForeColor="Black">

 
<ItemTemplate>
<tr><td><asp:LabelID="Label2"runat="server"Text='<%# Container.DataItem("MAT") %>'></asp:Label></div>
<tr><td> <%#Container.DataItem("agent")%> 
<tr><td><asp:ButtonCommandName="Edit"Text="Edition"Runat="server"ID="Button2"/></td>
</ItemTemplate>

<EditItemTemplate>
<inputtype="text"id="txtFirst"value='<%#Container.DataItem("agent")%>'runat="server"/>
</EditItemTemplate>
<FooterStyleBackColor="Tan"/>
<SelectedItemStyleBackColor="DarkSlateBlue"ForeColor="GhostWhite"/>
<AlternatingItemStyleBackColor="PaleGoldenrod"/>
<HeaderStyleBackColor="Tan"Font-Bold="True"/>

</asp:DataList>&nbsp;
Mon code behind

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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51

Imports System
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports system.data
Imports system.data.oledb
 
Namespace aspx
PublicClass recherche
 
Inherits Page
ProtectedWithEvents textbox1 As TextBox
ProtectedWithEvents Label1 As Label
ProtectedWithEvents DataList1 As DataList
ProtectedWithEvents button1 As button
ProtectedWithEvents Label2 As Label
ProtectedWithEvents button2 As button
ProtectedWithEvents txtFirst As TextBox
 
Sub getdata(ByVal obj AsObject, ByVal e As System.EventArgs)
Dim conn AsNew oledbconnection("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\base\eval.mdb")
Dim objcomm As OleDbcommand = New OleDbcommand _
("select * from tblagent_service where mat=@mat", conn)
Dim objreader As oledbdatareader
Dim objparam As oledbparameter
objparam = objcomm.parameters.add("@textbox1", oledbtype.integer)
objparam.direction = ParameterDirection.input
objparam.value = textbox1.text
Try
objcomm.connection.open()
objreader = objcomm.executereader
Catch ex As oledbexception
label1.text = "Ooooopss"
EndTry
 
DataList1.datasource = objreader
DataList1.databind()
objreader.close()
objcomm.connection.close()
EndSub
 
 
Sub DataList1_EditCommand(ByVal source AsObject, ByVal e As DataListCommandEventArgs)
DataList1.EditItemIndex = e.Item.ItemIndex
datalist1.databind()
EndSub
 
EndClass
EndNamespace
a votre avis ou est le pb.

merci