Ist doch okay dein Code. Jetzt musst du im ItemDataBound Event wo du die Dropdownliste erzeugst nur noch einen neuen Eventhandler f�r die DDL generieren, welcher auf die Methode zeigt, die die Verarbeitung �bernehmen soll.
Andr� -----Urspr�ngliche Nachricht----- Von: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Im Auftrag von Brunmair, Patrick Gesendet: Mittwoch, 21. April 2004 08:56 An: [EMAIL PROTECTED] Betreff: AW: [Asp.net] dropdown - datagrid ***SPAM 2*** Hier ein ausschnitt meines codes: Private Sub DataGrid1_ItemCommand1(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DataGrid1.ItemCommand Dim strSQL, sql, updSQL, InsSQL, Aktion As String If Session("SortFeld") Is Nothing Then strSQL = " select * from Irgendwas" Else strSQL = "select * from Irgendwas order by " & Session("SortFeld") & " " & Session("SortArt") End If Select Case e.CommandName.ToString Case Is = "Edit" 'Ruft den Wert der Dropdownlist.value ab und verwendet ihn in der sub DataGrid1_ItemDataBound DataGrid1.ShowFooter = False DataGrid1.Columns.Item(7).Visible = False Dropdownwert1 = e.Item.Cells(4).Text DropDownWert2 = e.Item.Cells(6).Text DataGrid1.EditItemIndex = CInt(e.Item.ItemIndex) data(strSQL) Case Is = "update" 'eigenschaft aus den controls auslesen. Dim txtBezeichnungU = Convert.ToString(CType(e.Item.FindControl("txtBezeichnungB"), TextBox).Text) Dim ddlKostgruppeU = Convert.ToString(CType(e.Item.FindControl("dropdownlist1"), DropDownList).SelectedItem.Value) Dim ddlLeistungsGruppeU = Convert.ToString(CType(e.Item.FindControl("dropdownlist3"), DropDownList).SelectedItem.Value) Dim txtMaGruppeU = Convert.ToString(CType(e.Item.FindControl("Label3"), Label).Text) 'eigenschaft der controls in update verpacken. updSQL = "update xxx " & _ "SET xx = '" & txtBezeichnungU & _ "' ,xx = '" & ddlKostgruppeU & _ "' ,xx = '" & ddlLeistungsGruppeU & _ "' WHERE xx = '" & _ txtMaGruppeU & " '" Dim fehler = db.SqlAendern(updSQL, ConnectionStr) 'wenn kein fehler dann aus bearbeitungsmodus raus und in label2 erfolgsnachricht anzeigen. If fehler = "" Then DataGrid1.EditItemIndex = -1 DataGrid1.Columns.Item(7).Visible = True data(strSQL) Label2.Text = "Datensatz wurde erfolgreich ge�ndert." Label2.Visible = True Else Label2.Text = fehler Label2.Visible = True End If 'aus bearbeitungsmodus raus . Case Is = "Cancel" DataGrid1.ShowFooter = False DataGrid1.EditItemIndex = -1 DataGrid1.Columns.Item(7).Visible = True data(strSQL) Case Is = "AddNew" DataGrid1.EditItemIndex = -1 data(strSQL) DataGrid1.Columns.Item(7).Visible = False DataGrid1.ShowFooter = True Case Is = "Insert" Dim MaGruppe = Convert.ToString(CType(e.Item.FindControl("txtMaGruppe"), TextBox).Text) Dim Bezeichnung = Convert.ToString(CType(e.Item.FindControl("txtBezeichnung"), TextBox).Text) Dim kostgruppe = Convert.ToString(CType(e.Item.FindControl("dropdownlist2"), DropDownList).SelectedItem.Value) Dim Leistungsgruppe = Convert.ToString(CType(e.Item.FindControl("dropdownlist4"), DropDownList).SelectedItem.Value) InsSQL = "INSERT INTO Irgendwas " & _ "(xxx, xxx, xxx, xxx) " & _ "VALUES('" & MaGruppe & _ "','" & Bezeichnung & _ "','" & kostgruppe & _ "','" & Leistungsgruppe & "' )" Dim Fehler2 = db.SqlAendern(InsSQL, ConnectionStr) If Fehler2 = "" Then 'Aktualisieren der ansicht DataGrid1.EditItemIndex = -1 DataGrid1.ShowFooter = False DataGrid1.Columns.Item(7).Visible = True data(strSQL) Label2.Text = "Ein Datensatz wurde erfolgreich eingef�gt." Label2.Visible = True Else 'Fehler aufgetreten Label2.Text = Fehler2 Label2.Visible = True End If Case Is = "Delete" 'l�schen Benutzer Dim MaGruppeD = Convert.ToString(CType(e.Item.FindControl("Label3"), Label).Text) sql = "delete from xxx where xxx = '" & MaGruppeD & "'" Aktion = db.SqlAendern(sql, ConnectionStr) If Aktion = "" Then 'Aktualisieren der ansicht DataGrid1.EditItemIndex = -1 data(strSQL) Label2.Text = "Der Datensatz wurde erfolgreich gel�scht." Label2.Visible = True Else 'Fehler aufgetreten Label2.Text = Aktion Label2.Visible = True End If Case Is = "help" 'Hilfe aufrufen Response.Write("<script language=Javascript>") Response.Write("window.open('HelpGruppe.aspx','test', ") Response.Write("'resizable=no,height=270,width=740')</script>") End Select End Sub Private Sub DataGrid1_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataGridItemEventArgs) Handles DataGrid1.ItemDataBound On Error Resume Next If e.Item.ItemType = ListItemType.EditItem Then Dim DropDownList1 As DropDownList reader1 = db.SqlReader("select * from xxx", ConnectionStr) DropDownList1 = CType(e.Item.FindControl("DropDownList1"), DropDownList) DropDownList1.DataSource = reader1 DropDownList1.DataTextField = "Kostgruppe" DropDownList1.DataValueField = "KostGruppe" DropDownList1.DataBind() DropDownList1.SelectedValue = Dropdownwert1 reader1.Close() Dim DropDownList3 As DropDownList reader2 = db.SqlReader("select * from xxx", ConnectionStr) DropDownList3 = CType(e.Item.FindControl("DropDownList3"), DropDownList) DropDownList3.DataSource = reader2 DropDownList3.DataTextField = "LeistungsGruppe" DropDownList3.DataValueField = "LeistungsGruppe" DropDownList3.DataBind() DropDownList3.SelectedValue = DropDownWert2 reader2.Close() End If If e.Item.ItemType = ListItemType.Footer Then Dim dropdownlist2 As DropDownList reader1 = db.SqlReader("select * from xxx", ConnectionStr) dropdownlist2 = CType(e.Item.FindControl("Dropdownlist2"), DropDownList) dropdownlist2.DataSource = reader1 dropdownlist2.DataTextField = "Kostgruppe" dropdownlist2.DataValueField = "Kostgruppe" dropdownlist2.DataBind() reader1.Close() Dim dropdownlist4 As DropDownList reader2 = db.SqlReader("select * from xxx", ConnectionStr) dropdownlist4 = CType(e.Item.FindControl("Dropdownlist4"), DropDownList) dropdownlist4.DataSource = reader2 dropdownlist4.DataTextField = "LeistungsGruppe" dropdownlist4.DataValueField = "LeistungsGruppe" dropdownlist4.DataBind() reader1.Close() End If On Error GoTo 0 End Sub -----Urspr�ngliche Nachricht----- Von: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Im Auftrag von Alexander Zeitler Gesendet: Mittwoch, 21. April 2004 08:52 An: [EMAIL PROTECTED] Betreff: RE: [Asp.net] dropdown - datagrid Hallo, > > Aber f�r diese gibt leider kein on index change() das ist da > mein problem , ich m�sste auf die dropdownliste doch mit > e.item.findcontrol...... zugreifen! > Ich hab den vollen h�nger:( > poste bitte mal Deinen bisherigen Code. Gruss Alex ************************* _______________________________________________ This ASP.NET email is sponsored by: UDEX ProMenu.Net - Die Software f|r Navigation - Jetzt kostenlos testen! Tree- Style, Horizontal- Slide, Vertical- Slide. http://www.udexnet.com _______________________________________________ Asp.net Mailingliste, Postings senden an: [EMAIL PROTECTED] An-/Abmeldung und Suchfunktion unter: http://www.glengamoi.com/mailman/listinfo/asp.net ************************* ************************* _______________________________________________ This ASP.NET email is sponsored by: UDEX ProMenu.Net - Die Software f�r Navigation - Jetzt kostenlos testen! Tree- Style, Horizontal- Slide, Vertical- Slide. http://www.udexnet.com _______________________________________________ Asp.net Mailingliste, Postings senden an: [EMAIL PROTECTED] An-/Abmeldung und Suchfunktion unter: http://www.glengamoi.com/mailman/listinfo/asp.net ************************* ************************* _______________________________________________ This ASP.NET email is sponsored by: UDEX ProMenu.Net - Die Software f�r Navigation - Jetzt kostenlos testen! Tree- Style, Horizontal- Slide, Vertical- Slide. http://www.udexnet.com _______________________________________________ Asp.net Mailingliste, Postings senden an: [EMAIL PROTECTED] An-/Abmeldung und Suchfunktion unter: http://www.glengamoi.com/mailman/listinfo/asp.net *************************
