Hi,

I have a Datagrid with a dropdown as one of the column in it. The DropDownList is in the EditItemTemplate and is enabled when the User clicks on the Edit Button in the DataGrid. The Selected value in the DropDownList is then saved in the DataSet.

Having said that, I would like to disable the DropDownList when the user clicks on one particular value named "Other" from the list and display a textBox in place of the dropdownlist where the User can enter their own data and, then this data can now be saved in the dataSet.

Where should I add the TextBox in the aspx code and what should the VB.NET code look like to capture this event.


The aspx code is.............

<asp:datagrid id="dgReceivingInfo" runat="server" Width="888px" EnableViewState="True" BorderStyle="Solid"
BorderColor="Black" AutoGenerateColumns="False" HorizontalAlign="Justify" PageSize="15" BorderWidth="1" cssclass="tblMain"
headerCSS="tblHeader" bodyCSS="tblBody" bodyHeight="190">
<SelectedItemStyle BackColor="Cornsilk" />
<Columns>
<asp:TemplateColumn HeaderText="Add Comment" HeaderStyle-HorizontalAlign="Center" HeaderStyle-Width="74px"
ItemStyle-Width="74px" ItemStyle-HorizontalAlign="Center" HeaderStyle-BorderStyle="Solid" HeaderStyle-
BorderWidth="1" ItemStyle-BorderStyle="Solid" ItemStyle-BorderWidth="1">
<HeaderStyle></HeaderStyle>
<ItemStyle Height="20px"></ItemStyle>
<ItemTemplate>
<Center>
     <asp:button id="btnEdit" Text="Edit" runat="server" Font-Size="0.7em" Height="18px" width="60px"
      EnableViewState="True" Enabled="true" CommandName="Edit" />
</Center>
</ItemTemplate>
<EditItemTemplate>
     <asp:button id="btnSave" Text="Save" runat="server" Font-Size="0.7em" Height="18px" width="33px"
      EnableViewState="True" Enabled="true" CommandName="Save" />
      <asp:button id="btnCancelChanges" Text="Cancel" runat="server" Font-Size="0.7em" Height="18px"
       width="35px" EnableViewState="True" Enabled="true" CommandName="Cancel" />
</EditItemTemplate>
</asp:TemplateColumn>
<asp:TemplateColumn HeaderText="Receiving Comments" HeaderStyle-BorderStyle="Solid" HeaderStyle-BorderWidth="1"
     HeaderStyle-HorizontalAlign="Center" ItemStyle-BorderStyle="Solid" ItemStyle-HorizontalAlign="Left"
     ItemStyle-BorderWidth="1">
<HeaderStyle BackColor="LightGray" Width="230px"></HeaderStyle>
<ItemStyle Height="20px" Width="230px"></ItemStyle>
<ItemTemplate>
     <asp:label Enabled="True" Font-Size="8" ID="lblRecvComments_values" Text='<%# DataBinder.Eval(Container.DataItem,"ReceivingComme nts") %>' Width="230px" Runat="server" Height="20px">
     </asp:label>
</ItemTemplate>
<EditItemTemplate>
     <asp:DropDownList Enabled="True" Font-Size="8" ID="ddRecvComments" Width="230px" Runat="server"
                 Height="20px" DataSource="<%# TempDataView %>" DataValueField="ReceivingComments"
                 DataTextField="ReceivingComments">
     </asp:DropDownList>
</EditItemTemplate>
</asp:TemplateColumn>
</Columns>
</asp:datagrid>

The VB.NET DataGrid ItemCommand Event..............

Private Sub dgReceivingInfo_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs ) Handles dgReceivingInfo.ItemCommand

If e.CommandName = "Edit" Then
    LoadDropDownList()
    Dim strSelect As String = dgReceivingInfo.Items(e.Item.ItemIndex).Cells.ToSt ring
    dgReceivingInfo.EditItemIndex = e.Item.ItemIndex
    dgReceivingInfo.DataSource = Session("ds_ReceivingInfo")
    dgReceivingInfo.DataBind()
Else
   If e.CommandName = "Save" Then
     Dim arEdit() As DataRow
     Dim txtPOLineNo As TextBox
     txtPOLineNo = e.Item.Cells(3).FindControl("txtPOLineNo")
     Dim dd_RecvComments As DropDownList
     dd_RecvComments = e.Item.Cells(7).FindControl("ddRecvComments")
     Dim lblReceiptID As Label
     lblReceiptID = e.Item.Cells(1).FindControl("lblReceiptID")
     Dim lblPOID As Label
     lblPOID = e.Item.Cells(2).FindControl("lblPOID")
     Dim lblItemID As Label
     lblItemID = e.Item.Cells(4).FindControl("lblItemID")

     Dim p As String = lblReceiptID.Text
     Dim q As String = lblPOID.Text
     Dim r As String = lblItemID.Text

     arEdit = Session("ds_ReceivingInfo").Tables(0).Select("Rece iptID='" + lblReceiptID.Text + "' AND POID='" +
                lblPOID.Text + "' AND ItemID='" + lblItemID.Text + "'")
     arEdit(0)("ReceivingComments") = dd_RecvComments.SelectedValue.ToString

     Session("ds_ReceivingInfo").Tables(0).Rows.Count()
     dgReceivingInfo.EditItemIndex = -1

     dgReceivingInfo.DataSource = Session("ds_ReceivingInfo").Tables(0)
     dgReceivingInfo.DataBind()
    Else
     If e.CommandName = "Cancel" Then
         dgReceivingInfo.EditItemIndex = -1
         dgReceivingInfo.DataSource = Session("ds_ReceivingInfo").Tables(0)
         dgReceivingInfo.DataBind()
     End If
    End If
End If
End Sub

Thanks!

First:
Place a textbox in your EditItemTemplate next to your dropdownlist

Second:
You have to create an event handler for your dropdown:
Protected Sub <dropdownlistname>_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs)
'Get a refernce to the dropdownlist:
Dim <dropdownlistname> As DropDownList = CType(sender, DropDownList)
IF <dropdownlistname>.selectedtext = "Other" Then
   <textboxname>.visible = TRUE
END IF

End Sub

Third:
In your HTML, you have to add this to your dropdownlist definition:
OnSelectedIndexChanged="<dropdownlistname"_Selecte dIndexChanged"

I followed the steps you asked me to do.

But, I need the SelectedIndexchanged event of the DropDown List to Fire once I select the value Other in it and not when I click the Save Button.

The steps recommended causes the DropDownList event to fire only when I click the Save Button, then the datagrid returns into it original non editable state.
Here I see only the label Displaying the Value(Other) selected in the DropDownList.

Actually I am trying to Implement Some thing similar to a Combo Box in VB

The event will fire on the change of an item selection in the drop down. Make sure you have placed the OnSelectedIndexChanged="<dropdownlistname"_Selecte dIndexChanged"
line in the correct place in the HTML. Put it on the dropdownlist in the template column.
This is a sample from my code:


    <ItemTemplate>
                            <asp:DropDownList id=ddlEmployees runat="server" DataMember="Employees" DataSource="<%# DsEmployees1 %>" OnSelectedIndexChanged="ddlEmployees_SelectedIndex Changed" AutoPostBack="True" DataTextField="Name" DataValueField="EmployeeID">
                            </asp:DropDownList>
                        </ItemTemplate>

Thanks I was missing the AutoPostBack in my HTML, but I now have another little problem popping.....
When I select any values in the dropdownlist other than the Value "Other" the dropdown is resetting itself to a default first value in the list, the dropdown is not showing the selected value hence when saving the values in the DataSet it is by default saving the firstvalue in the DropDown to the DataSet.

It sounds like the grid is getting bound each time a post back occurs which is triggerd by the onchange event of the dropdownlist. Try using
IF NOT IsPostBack Then
   ... connect.. fill data set...
   ... bind the grid...
END IF

I am still not able to figure the problem out Can you please look at the code and advice, thanks.......

aspx for datagrid....

<div style="BORDER-RIGHT: #00006f thin solid; BORDER-TOP: #00006f thin solid; BACKGROUND-IMAGE: none; BORDER-LEFT: #00006f thin solid; WIDTH: 99.2%; BORDER-BOTTOM: #00006f thin solid; HEIGHT: 200px; BACKGROUND-COLOR: #d2d2d2"
align="center"><asp:datagrid id="dgReceivingInfo" runat="server" Width="888px" EnableViewState="True" BorderStyle="Solid"
BorderColor="Black" AutoGenerateColumns="False" HorizontalAlign="Justify" PageSize="15" BorderWidth="1" cssclass="tblMain"
headerCSS="tblHeader" bodyCSS="tblBody" bodyHeight="190">
<SelectedItemStyle BackColor="Cornsilk" />
<Columns>
<asp:TemplateColumn HeaderText="Add Comment" HeaderStyle-HorizontalAlign="Center" HeaderStyle-Width="74px"
    ItemStyle-Width="74px" ItemStyle-HorizontalAlign="Center" HeaderStyle-BorderStyle="Solid" HeaderStyle-BorderWidth="1"
    ItemStyle-BorderStyle="Solid" ItemStyle-BorderWidth="1">
    <HeaderStyle></HeaderStyle>
    <ItemStyle Height="20px"></ItemStyle>
    <ItemTemplate>
        <Center>
            <asp:button id="btnEdit" Text="Edit" runat="server" Font-Size="0.7em" Height="18px" width="60px"
                EnableViewState="True" Enabled="true" CommandName="Edit" />
        </Center>
    </ItemTemplate>
    <EditItemTemplate>
        <asp:button id="btnSave" Text="Save" runat="server" Font-Size="0.7em" Height="18px" width="33px"
            EnableViewState="True" Enabled="true" CommandName="Save" />
        <asp:button id="btnCancelChanges" Text="Cancel" runat="server" Font-Size="0.7em" Height="18px"
            width="35px" EnableViewState="True" Enabled="true" CommandName="Cancel" />
    </EditItemTemplate>
</asp:TemplateColumn>
<asp:TemplateColumn Visible="False">
    <Itemtemplate>
        <asp:Label Runat = "server" ID = "lblReceiptID" Text='<%# DataBinder.Eval(Container.DataItem, "ReceiptID")%>'>
        </asp:Label>
    </Itemtemplate>
</asp:TemplateColumn>
<asp:TemplateColumn Visible="False">
    <Itemtemplate>
        <asp:Label Runat = "server" ID = "lblPOID" Text='<%# DataBinder.Eval(Container.DataItem, "POID")%>'>
        </asp:Label>
    </Itemtemplate>
</asp:TemplateColumn>
<asp:TemplateColumn HeaderText="PO Line #" HeaderStyle-BorderStyle="Solid" HeaderStyle-BorderWidth="1"
    ItemStyle-BorderStyle="Solid" ItemStyle-HorizontalAlign="Left" ItemStyle-BorderWidth="1">
    <HeaderStyle HorizontalAlign="Center" BackColor="LightGray" Width="75px"></HeaderStyle>
    <ItemStyle Height="20px" Width="75px"></ItemStyle>
    <ItemTemplate>
        <asp:Label Runat = "server" ID = "lblPOLineNo" Height = "20px" Width = "72px" text='<%# DataBinder.Eval(Container.DataItem,"LineNumber") %>'>
        </asp:Label>
    </ItemTemplate>
</asp:TemplateColumn>
<asp:TemplateColumn HeaderText="PO Item #" HeaderStyle-BorderStyle="Solid" HeaderStyle-BorderWidth="1"
    ItemStyle-BorderStyle="Solid" ItemStyle-HorizontalAlign="Left" ItemStyle-BorderWidth="1">
    <HeaderStyle HorizontalAlign="Center" BackColor="LightGray" Width="70px"></HeaderStyle>
    <ItemStyle Width="70px"></ItemStyle>
    <ItemTemplate>
        <asp:label Runat = "server" ID="lblItemID" Height="20px" Width = "67px" text='<%# DataBinder.Eval(Container.DataItem,"ItemID") %>'>
        </asp:label>
    </ItemTemplate>
</asp:TemplateColumn>
<asp:TemplateColumn HeaderText="Item Description" HeaderStyle-BorderStyle="Solid" HeaderStyle-BorderWidth="1"
    ItemStyle-BorderStyle="Solid" ItemStyle-HorizontalAlign="Left" ItemStyle-BorderWidth="1">
    <HeaderStyle HorizontalAlign="Center" BackColor="LightGray" Width="350px"></HeaderStyle>
    <ItemStyle Width="350px"></ItemStyle>
    <ItemTemplate>
        <asp:label Runat = "server" ID="lblItemDesc" Height="20px" Width = "347px" text='<%# DataBinder.Eval(Container.DataItem,"Description") %>'>
        </asp:label>
    </ItemTemplate>
</asp:TemplateColumn>
<asp:TemplateColumn HeaderText="Quantity Received" HeaderStyle-BorderStyle="Solid" HeaderStyle-BorderWidth="1"
    ItemStyle-BorderStyle="Solid" ItemStyle-HorizontalAlign="Right" ItemStyle-BorderWidth="1">
    <HeaderStyle HorizontalAlign="Center" BackColor="LightGray" Width="70px"></HeaderStyle>
    <ItemStyle Width="70px"></ItemStyle>
    <ItemTemplate>
        <asp:Label Runat = "server" ID="lblQtyReceived" Height="20px" Width="67px" text='<%# DataBinder.Eval(Container.DataItem,"Quantity") %>'>
        </asp:Label>
    </ItemTemplate>
</asp:TemplateColumn>
<asp:TemplateColumn HeaderText="Receiving Comments" HeaderStyle-BorderStyle="Solid" HeaderStyle-BorderWidth="1"
    HeaderStyle-HorizontalAlign="Center" ItemStyle-BorderStyle="Solid" ItemStyle-HorizontalAlign="Left"
    ItemStyle-BorderWidth="1">
    <HeaderStyle BackColor="LightGray" Width="230px"></HeaderStyle>
    <ItemStyle Height="20px" Width="230px"></ItemStyle>
    <ItemTemplate>
        <asp:label Enabled="True" Font-Size="8" ID="lblRecvComments_values" Text='<%# DataBinder.Eval(Container.DataItem,"ReceivingComme nts") %>' Width="230px" Runat="server" Height="20px">
        </asp:label>
    </ItemTemplate>
    <EditItemTemplate>
        <asp:DropDownList Enabled="True" Font-Size="8" ID="ddRecvComments" Width="230px" Runat="server" Height="20px" DataSource="<%# TempDataView %>"
         OnSelectedIndexChanged = "ddRecvComments_SelectedIndexChanged" DataValueField="ReceivingComments" DataTextField="ReceivingComments" AutoPostBack="True">
        </asp:DropDownList>
        <asp:TextBox ID ="txtRecvComments" Text='<%# DataBinder.Eval(Container.DataItem,"ReceivingComme nts") %>' Width="230px" Runat="server" Height="20px"></asp:TextBox>
    </EditItemTemplate>
</asp:TemplateColumn>
</Columns>
</asp:datagrid></div>

VB.NET
DataBinding and loading the dropdown in PageLoad, This code is inside the Not(Page.isPostBack) condition

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

If Not (Page.IsPostBack) Then

    LoadDropDownList()

    Dim ds_ReceivingInfo As DataSet = DataBind_ReceivingInfo("spReceivingInfo2")
    dgReceivingInfo.DataSource = ds_ReceivingInfo
    dgReceivingInfo.DataBind()

    Session.Add("ds_ReceivingInfo", ds_ReceivingInfo)

End If
End Sub

Private Sub btnSubmit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSubmit.Click
UpdateReceivingInfo()
End Sub

Protected Sub ddRecvComments_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ddRecvComments.SelectedIndexChanged
Dim ddRecvComments2 As DropDownList = CType(sender, DropDownList)
If ddRecvComments2.SelectedValue = "Other" Then
    'ddRecvComments2.SelectedValue = ""
    ddRecvComments2.Visible = False
Else
    ddRecvComments2.Visible = True
    ddRecvComments2.AutoPostBack = False
End If
End Sub


Public Function DataBind_IssuedPODetails(ByVal SPName As String, Optional ByVal TableName As String = Nothing) As DataSet
      Dim param1 As String
      Dim ds As DataSet = New DataSet
      Dim da As SqlDataAdapter
      Dim conn As SqlConnection = clsConnection.GetConnection()
      param1 = Session.Item("arrVal_Ix")
      Dim Cmd As SqlCommand = New SqlCommand(SPName, conn)
      Cmd.CommandType = CommandType.StoredProcedure

      Cmd.Parameters.Add("@POID", param1)
      da = New SqlDataAdapter(Cmd)

      conn.Open()

      If (TableName = Nothing) Then
      da.Fill(ds)
   Else
      da.Fill(ds, TableName)
   End If

   conn.Close()
   Return (ds)
End Function

Public Sub LoadDropDownList()
   'Dim TempDataView1 As DataView
   Dim drv As DataRowView

   Dim ds_DropDownList = New DataSet
   Dim da As SqlDataAdapter
   Dim conn As SqlConnection = clsConnection.GetConnection()

   Dim cmd As SqlCommand = New SqlCommand("Select * from t_ReceivingComments", conn)
   da = New SqlDataAdapter(cmd)
   da.Fill(ds_DropDownList, "t_ReceivingComments")
   'Dim y As Int32 = ds_DropDownList.Tables("t_ReceivingComments").Rows .Count

   TempDataView = New DataView(ds_DropDownList.Tables("t_ReceivingCommen ts"))
   drv = TempDataView.AddNew
   drv("ReceivingComments") = "Other"
End Sub

Public Function UpdateReceivingInfo()
Try
    Dim conn As SqlConnection = clsConnection.GetConnection()
    Dim da As SqlDataAdapter

    da = New SqlDataAdapter("spPOReceivingInfoSelect", conn)
    da.SelectCommand.CommandType = CommandType.StoredProcedure

    With da.SelectCommand.Parameters
    .Add(New System.Data.SqlClient.SqlParameter("@ReceiptID", System.Data.SqlDbType.VarChar, 10, "ReceiptID"))
    .Add(New System.Data.SqlClient.SqlParameter("@POID", System.Data.SqlDbType.BigInt, 8, "POID"))
    .Add(New System.Data.SqlClient.SqlParameter("@ItemID", System.Data.SqlDbType.VarChar, 25, "ItemID"))
    .Add(New System.Data.SqlClient.SqlParameter("@wh_id", System.Data.SqlDbType.VarChar, 10, "wh_id"))
    End With

    da.UpdateCommand = New SqlCommand(Nothing, conn)
    With da.UpdateCommand
    .CommandText = "UPDATE t_POReconciliation1 SET ReceivingComments = @ReceivingComments WHERE (ReceiptID = @ReceiptID) AND (POID = @POID) AND (wh_id = @wh_id) AND (ItemID = @ItemID); "
    .Parameters.Add(New System.Data.SqlClient.SqlParameter("@ReceiptID", System.Data.SqlDbType.VarChar, 10, "ReceiptID"))
    .Parameters.Add(New System.Data.SqlClient.SqlParameter("@POID", System.Data.SqlDbType.BigInt, 8, "POID"))
    .Parameters.Add(New System.Data.SqlClient.SqlParameter("@wh_id", System.Data.SqlDbType.VarChar, 10, "wh_id"))
    .Parameters.Add(New System.Data.SqlClient.SqlParameter("@ItemID", System.Data.SqlDbType.VarChar, 25, "ItemID"))
    .Parameters.Add(New System.Data.SqlClient.SqlParameter("@ReceivingComm ents", System.Data.SqlDbType.VarChar, 256, "ReceivingComments"))
    End With

    Dim ds As DataSet = Session("ds_ReceivingInfo")
    Dim x As Int32 = ds.Tables(0).Rows.Count()
    Dim yu As Int32 = ds.Tables(0).Rows.Count()
    da.Update(ds)
    ds.AcceptChanges()
    Return True

Catch ex As Exception
    Return False
End Try
End Function

Thanks for your time...... :)

In the IF NOT is Post back
  Fill the dataset for the grid
  Fill the dataset for the drop down
  Bind the datagrid
End IF

Do not load and bind them separately. The above will load the data for each dropdown in the grid.

Can you explain in a little more detail.... as you might be seeing I am using a DataListView in the LoadDropDown method and then in the aspx page adding this DataListView as the datasource, just calling the method is binding the data to the DropDown. I am using the session dataset for binding the grid.

I am not able to figure out how to fill the dataset for the grid, then the dataset for the DropDown and then bind the DataGrid.

In the Page_Load event of the page:
IF NOT IsPostBack THEN
'Get the data for the drop down list:
 Dim ds_DropDownList = New DataSet
   Dim da As SqlDataAdapter
   Dim conn As SqlConnection = clsConnection.GetConnection()

   Dim cmd As SqlCommand = New SqlCommand("Select * from t_ReceivingComments", conn)
   da = New SqlDataAdapter(cmd)
   da.Fill(ds_DropDownList, "t_ReceivingComments")
   ddRecvComments.DataSource = ds_DropDownList
   ddlRecvComments.DataMember = "t_ReceivingComments"
'Do NOT bind the DropDownList here. It will be done when the grid is bound.

'Get the data for the data grid and bind the grid
   Dim ds_ReceivingInfo As DataSet = DataBind_ReceivingInfo("spReceivingInfo2")
    dgReceivingInfo.DataSource = ds_ReceivingInfo
    dgReceivingInfo.DataBind()

    Session.Add("ds_ReceivingInfo", ds_ReceivingInfo)

END IF

Hope this is more clear...

Jim