Load data grid in edit mode

Nltdgcelq · Apr 28, 2012

Does anyone know how to load a row of the datgrid or the entire datagrid in edit mode instead of having to click the edit button? Couldn't you just call the datagrid edit sub at the end of the datagrid load sub? Sort of like this: Sub Page_Load() "Your page load or data query here" DataGrid1.DataSource = dsScores DataGrid1.DataBind() DataGrid1_Edit End Sub Sub DataGrid1_Edit(obj as object, e as DataGridCommandEventArgs) DataGrid1.EditItemIndex = e.Item.ItemIndex DataGrid1.DataBind() End sub Some kind of code along these lines should put you into edit mode when you load the grid. You can likely shorten the whole thing and just put the DataGrid1.EditItemIndex = right in the page load routine. Good Luck, Tom TThat seems logical. I had tried it before posting this. It dosent work

If you call the procedure: MyDataGrid_Edit From the form load you get the error: Argument not specified for parameter 'E' of 'Public Sub MyDataGrid_Edit(Sender As Object, E As System.Web.UI.WebControls.DataGridCommandEventArgs )'. If you try to shorten it by putting: MyDataGrid.EditItemIndex = CInt(E.Item.ItemIndex) if form load that gives you and error msg as well. I also tried putting this in MyDataGrid_ItemDataBound. That doesent work quite right either. Any other ideas?? Thanks for the suggestion though!I just ran code where I loaded the datagrid and just before the DataBind() I added the line: DataGrid1.EditItemIndex = 0 The code loop (I left out the connection stuff) looked like this: Dim objCmd As New OleDbDataAdapter _ ("Select * from Scores", objConn) Dim dsScores As DataSet = New Dataset() objCmd.Fill(dsScores, "Scores") DataGrid1.DataSource = dsScores DataGrid1.DataMember = "Scores" DataGrid1.EditItemIndex = 0 DataBind() When I ran it, it loaded the datagrid and opened the first line in edit mode. Tom Thmmmmm - That does make sense. However, i can not get it to work on my code. No error message or anything. I tried putting the statement mydatagrid.edititemindex = 0 in the form load, and when that did not work i tired it in my bindgrid(). But still no edit mode. No errors either. Here is my bindgrid() Dim DS As DataSet Dim MyCommand As OleDbDataAdapter MyCommand = new OleDbDataAdapter("select ordernum, vendor1N, Vendor1C, Vendor2N, Vendor2C, Vendor3N, Vendor3C, Vendor4N, Vendor4C, Revenue from tblOrdersProcessed WHERE OrderNum = " & OrderID.text, MyConnection) DS = new DataSet() MyCommand.Fill(DS, "tblOrdersProcessed") MyDataGrid.DataSource=DS.Tables("tblOrdersProcessed").DefaultView MyDataGrid.DataBind() MyDataGrid.EditItemIndex = 0 Any thoughts as to what may be going wrong? Thank you very much for taking the time to offer suggestions on this!My dyslexia kicked in. I just realized you suggested putting mydatagrid.edititemindex = 0 BEFORE mydatagrid.databind() and not AFTER. I corrected my mistake and i do get and error message that says: Object reference not set to an instance of an object Any ideas? ThanksI think you're actually there. The error you're getting sounds like (excuse me, but it's late) a typing error. I usually get that when I mis-type a variable or object name. With the change you made to do binding after setting the editItemIndex, it should work with no problems. Repost your code again if it is something else and I'll substitute my database and run it. Since I'm on west coast time, it must be later where you are. Good Luck Tom TI tested your suggestion of mydatagrid.edititemindex = 0 on another datagrid i had, and it worked fine. My data grid is and editiable datagrid with a list box. I think that may be part of the problem of why i get the error message: Object reference not set to an instance of an object Im going to post my code. If you see anything that may be causing the problem, please let me know. Im going to play around with it some more. Thanks again for all the help!! ___________________________________________   <html> <script language="VB" runat="server"> Public vendor3CIndex As Hashtable Sub Page_Load(Src As Object, E As EventArgs) If Not (IsPostBack) OrderID.text=Request.QueryString("OrderNUM") BindGrid() End If vendor3CIndex = New Hashtable() vendor3CIndex("Select Vendor") = 0 vendor3CIndex("Coast Index") = 1 vendor3CIndex("Custom Tabs") = 2 vendor3CIndex("GE Polymershapes") = 3 vendor3CIndex("Image Star") = 4 vendor3CIndex("Ingram Micro") = 5 vendor3CIndex("Kleer Fax") = 6 vendor3CIndex("Marks Papter") = 7 vendor3CIndex("National Index") = 8 vendor3CIndex("Original") = 9 vendor3CIndex("Pengad") = 10 vendor3CIndex("Shamrock") = 11 vendor3CIndex("Southwest") = 12 vendor3CIndex("Spiral") = 13 vendor3CIndex("TEI") = 14 vendor3CIndex("Unibind") = 15 vendor3CIndex("United Manual") = 16 vendor3CIndex("United Transmittal") = 17 End Sub Public Function Getvendor3CIndex(vendor3CName As String) As Integer If vendor3CIndex(vendor3CName) <> Nothing Return CInt(vendor3CIndex(vendor3CName)) Else Return 0 End If End Function Sub MyDataGrid_Edit(Sender As Object, E As DataGridCommandEventArgs) MyDataGrid.EditItemIndex = CInt(E.Item.ItemIndex) BindGrid() End Sub Sub MyDataGrid_Cancel(Sender As Object, E As DataGridCommandEventArgs) MyDataGrid.EditItemIndex = -1 BindGrid() End Sub Sub PlaceNewOrder_Click(sender As Object, e As EventArgs) dim url as string url="frmPlaceOrder.aspx" Response.Redirect(url) end Sub Sub MyDataGrid_Update(Sender As Object, E As DataGridCommandEventArgs) Dim DS As DataSet Dim MyCommand As oleDBCommand Dim UpdateCmd As String = "UPDATE tblOrdersProcessed SET OrderNum = @OrderNum, Vendor1N = @Vendor1N, Vendor1C = @Vendor1C, Vendor2N = " _ & " @Vendor2N, Vendor2C = @Vendor2C, Vendor3N = @Vendor3N, vendor3C = @vendor3C, vendor4N = @vendor4N, vendor4C = @vendor4C, Revenue = @Revenue where OrderNum = @OrderNum" MyCommand = New oleDBCommand(UpdateCmd, MyConnection) MyCommand.Parameters.Add(New OleDbParameter("@OrderNum", OleDbType.VarChar, 100)) MyCommand.Parameters.Add(New OleDbParameter("@Vendor1N", OleDbType.VarChar, 100)) MyCommand.Parameters.Add(New OleDbParameter("@Vendor1C", OleDbType.VarChar, 100)) MyCommand.Parameters.Add(New OleDbParameter("@Vendor2N", OleDbType.VarChar, 100)) MyCommand.Parameters.Add(New OleDbParameter("@Vendor2C", OleDbType.VarChar, 100)) MyCommand.Parameters.Add(New OleDbParameter("@Vendor3N", OleDbType.VarChar, 100)) MyCommand.Parameters.Add(New OleDbParameter("@vendor3C", OleDbType.VarChar, 100)) MyCommand.Parameters.Add(New OleDbParameter("@vendor4N", OleDbType.VarChar, 100)) MyCommand.Parameters.Add(New OleDbParameter("@vendor4C", OleDbType.VarChar,100)) MyCommand.Parameters.Add(New OleDbParameter("@Revenue", OleDbType.VarChar,100)) MyCommand.Parameters("@OrderNum").Value = http://aspmessageboard.com/archive/index.php/MyDataGrid.DataKeys(CInt(E.Item.ItemIndex)) Dim Cols As String() = {"Vendor1C","Vendor2C","Vendor3C","Vendor4C","Revenue"} Dim I As Integer For I = 0 To 4 Dim CurrentTextBox As TextBox CurrentTextBox = E.Item.FindControl("edit_" & Cols(I)) Dim ColValue As String = CurrentTextBox.Text ' Check for null values in required fields ' If I<3 And ColValue = "" ' Message.InnerHtml = "ERROR: Null values not allowed for Name or Vendor2N" ' Message.Style("color") = "red" ' Return ' End If MyCommand.Parameters("@" & Cols(I)).Value = Server.HtmlEncode(ColValue) Next Dim vendor1NDropDownList As DropDownList vendor1NDropDownList = E.Item.FindControl("edit_vendor1N") MyCommand.Parameters("@vendor1N").Value = vendor1NDropDownList.SelectedItem.ToString() Dim vendor2NDropDownList As DropDownList vendor2NDropDownList = E.Item.FindControl("edit_vendor2N") MyCommand.Parameters("@vendor2N").Value = vendor2NDropDownList.SelectedItem.ToString() Dim vendor3NDropDownList As DropDownList vendor3NDropDownList = E.Item.FindControl("edit_vendor3N") MyCommand.Parameters("@vendor3N").Value = vendor3NDropDownList.SelectedItem.ToString() Dim vendor4NDropDownList As DropDownList vendor4NDropDownList = E.Item.FindControl("edit_vendor4N") MyCommand.Parameters("@vendor4N").Value = vendor4NDropDownList.SelectedItem.ToString() MyCommand.Connection.Open() Try MyCommand.ExecuteNonQuery() Message.InnerHtml = "Record Updated"' & UpdateCmd MyDataGrid.EditItemIndex = -1 Catch Exp As OledbException ' If Exp.Number = 2627 Message.InnerHtml = "ERROR: A record already exists with the same primary key" ' Else Message.InnerHtml = "ERROR: Could not update record, please ensure the fields are correctly filled out" ' End If Message.Style("color") = "red" End Try MyCommand.Connection.Close() BindGrid() End Sub Sub MyDataGrid_ItemDataBound(Sender As Object, E As DataGridItemEventArgs) If (e.Item.ItemType = ListItemType.EditItem) Then Dim i As Integer For i = 0 To e.Item.Controls.Count-1 Try If (e.Item.Controls(i).Controls(1).GetType().ToString () = "System.Web.UI.WebControls.TextBox") Then Dim tb As TextBox tb = e.Item.Controls(i).Controls(1) tb.Text = Server.HtmlDecode(tb.Text) End If Catch End Try Next End If End Sub Sub BindGrid() Dim DS As DataSet Dim MyCommand As OleDbDataAdapter MyCommand = new OleDbDataAdapter("select ordernum, vendor1N, Vendor1C, Vendor2N, Vendor2C, Vendor3N, Vendor3C, Vendor4N, Vendor4C, Revenue from tblOrdersProcessed WHERE OrderNum = " & OrderID.text, MyConnection) DS = new DataSet() MyCommand.Fill(DS, "tblOrdersProcessed") MyDataGrid.DataSource=DS.Tables("tblOrdersProcessed").DefaultView MyDataGrid.DataBind() End Sub </script> <body style="font: 10pt verdana"> <form runat="server"> <ASP

ataGrid id="MyDataGrid" runat="server" Width="800" BackColor="#ccccff" BorderColor="black" ShowFooter="false" CellPadding=3 CellSpacing="0" Font-Name="Verdana" Font-Size="8pt" HeaderStyle-BackColor="#aaaadd" OnEditCommand="MyDataGrid_Edit" OnCancelCommand="MyDataGrid_Cancel" OnUpdateCommand="MyDataGrid_Update" DataKeyField="OrderNum" AutoGenerateColumns="false" OnItemDataBound="MyDataGrid_ItemDataBound" > <Columns> <asp:EditCommandColumn EditText="Edit" CancelText="Cancel" UpdateText="Add Vendor" ItemStyle-Wrap="false" ButtonType="PushButton"/> <asp:BoundColumn HeaderText="OrderNum" SortExpression="OrderNum" ReadOnly="True" DataField="OrderNum" ItemStyle-Wrap="false"/> <asp:TemplateColumn HeaderText="Revenue" SortExpression="Revenue"> <ItemTemplate> <asp:Label runat="server" Text='<%# DataBinder.Eval (Container.DataItem, "Revenue", "{0:c}") %>'/> </ItemTemplate> <EditItemTemplate> <asp:TextBox runat="server" id="edit_Revenue" Text='<%# DataBinder.Eval(Container.DataItem, "Revenue") %>'/> </EditItemTemplate> </asp:TemplateColumn> <asp:TemplateColumn HeaderText="vendor1N" SortExpression="vendor1N"> <ItemTemplate> <asp:Label runat="server" Text='<%# DataBinder.Eval(Container.DataItem, "vendor1N") %>'/> </ItemTemplate> <EditItemTemplate> <asp

ropDownList runat="server" SelectedIndex='<%# Getvendor3CIndex(Container.DataItem("vendor1N")) %>' id="edit_vendor1N"> <asp:ListItem>Select Vendor</asp:ListItem> <asp:ListItem>Coast Index</asp:ListItem> <asp:ListItem>Custom Tabs</asp:ListItem> <asp:ListItem>GE Polymershapes</asp:ListItem> <asp:ListItem>Image Star</asp:ListItem> <asp:ListItem>Ingram Micro</asp:ListItem> <asp:ListItem>Kleer Fax</asp:ListItem> <asp:ListItem>Marks Papter</asp:ListItem> <asp:ListItem>National Index</asp:ListItem> <asp:ListItem>Original</asp:ListItem> <asp:ListItem>Pengad</asp:ListItem> <asp:ListItem>Shamrock</asp:ListItem> <asp:ListItem>Southwest</asp:ListItem> <asp:ListItem>Spiral</asp:ListItem> <asp:ListItem>TEI</asp:ListItem> <asp:ListItem>Unibind</asp:ListItem> <asp:ListItem>United Manual</asp:ListItem> <asp:ListItem>United Transmittal</asp:ListItem> </asp

ropDownList> </EditItemTemplate> </asp:TemplateColumn> <asp:TemplateColumn HeaderText="Vendor1C" SortExpression="Vendor1C"> <ItemTemplate> <asp:Label runat="server" Text='<%# DataBinder.Eval(Container.DataItem, "Vendor1C", "{0:c}") %>'/> </ItemTemplate> <EditItemTemplate> <asp:TextBox runat="server" id="edit_Vendor1C" Text='<%# DataBinder.Eval(Container.DataItem, "Vendor1C") %>'/> </EditItemTemplate> </asp:TemplateColumn> <asp:TemplateColumn HeaderText="vendor2N" SortExpression="vendor2N"> <ItemTemplate> <asp:Label runat="server" Text='<%# DataBinder.Eval(Container.DataItem, "vendor2N", "{0:c}") %>'/> </ItemTemplate> <EditItemTemplate> <asp

ropDownList runat="server" SelectedIndex='<%# Getvendor3CIndex(Container.DataItem("vendor2N")) %>' id="edit_vendor2N"> <asp:ListItem>Select Vendor</asp:ListItem> <asp:ListItem>Coast Index</asp:ListItem> <asp:ListItem>Custom Tabs</asp:ListItem> <asp:ListItem>GE Polymershapes</asp:ListItem> <asp:ListItem>Image Star</asp:ListItem> <asp:ListItem>Ingram Micro</asp:ListItem> <asp:ListItem>Kleer Fax</asp:ListItem> <asp:ListItem>Marks Papter</asp:ListItem> <asp:ListItem>National Index</asp:ListItem> <asp:ListItem>Original</asp:ListItem> <asp:ListItem>Pengad</asp:ListItem> <asp:ListItem>Shamrock</asp:ListItem> <asp:ListItem>Southwest</asp:ListItem> <asp:ListItem>Spiral</asp:ListItem> <asp:ListItem>TEI</asp:ListItem> <asp:ListItem>Unibind</asp:ListItem> <asp:ListItem>United Manual</asp:ListItem> <asp:ListItem>United Transmittal</asp:ListItem> </asp

ropDownList> </EditItemTemplate> </asp:TemplateColumn> <asp:TemplateColumn HeaderText="Vendor2C" SortExpression="Vendor2C"> <ItemTemplate> <asp:Label runat="server" Text='<%# DataBinder.Eval(Container.DataItem, "Vendor2C", "{0:c}") %>'/> </ItemTemplate> <EditItemTemplate> <asp:TextBox runat="server" id="edit_Vendor2C" Text='<%# DataBinder.Eval(Container.DataItem, "Vendor2C") %>'/> </EditItemTemplate> </asp:TemplateColumn> <asp:TemplateColumn HeaderText="vendor3N" SortExpression="vendor3N"> <ItemTemplate> <asp:Label runat="server" Text='<%# DataBinder.Eval(Container.DataItem, "vendor3N", "{0:c}") %>'/> </ItemTemplate> <EditItemTemplate> <asp

ropDownList runat="server" SelectedIndex='<%# Getvendor3CIndex(Container.DataItem("vendor3N")) %>' id="edit_vendor3N"> <asp:ListItem>Select Vendor</asp:ListItem> <asp:ListItem>Coast Index</asp:ListItem> <asp:ListItem>Custom Tabs</asp:ListItem> <asp:ListItem>GE Polymershapes</asp:ListItem> <asp:ListItem>Image Star</asp:ListItem> <asp:ListItem>Ingram Micro</asp:ListItem> <asp:ListItem>Kleer Fax</asp:ListItem> <asp:ListItem>Marks Papter</asp:ListItem> <asp:ListItem>National Index</asp:ListItem> <asp:ListItem>Original</asp:ListItem> <asp:ListItem>Pengad</asp:ListItem> <asp:ListItem>Shamrock</asp:ListItem> <asp:ListItem>Southwest</asp:ListItem> <asp:ListItem>Spiral</asp:ListItem> <asp:ListItem>TEI</asp:ListItem> <asp:ListItem>Unibind</asp:ListItem> <asp:ListItem>United Manual</asp:ListItem> <asp:ListItem>United Transmittal</asp:ListItem> </asp

ropDownList> </EditItemTemplate> </asp:TemplateColumn> <asp:TemplateColumn HeaderText="Vendor3C" SortExpression="Vendor3C"> <ItemTemplate> &#Lot of code and I'm bluring out. I'll take a look in the morning to see if anything jumps out. Good luck with it. Tom TWhen you get the error "object not set.........", what line number is noted? Its not giving me a line number. I am doing this in ultraedit and running it in ie 6.0. However, i did find something helpful. If i put it in edit mode, then put in the MyDataGrid.EditItemIndex = 0 statement before bindgrid() i can refresh and it works fine. I can even click the cancel button and it stays in edit mode. I just need to figure out why i get the error when i try to initialize the program on pageload. Im doing more testing now. Thanks for the help again!I figured out the promblem. Everything you said about setting the edit mode to 0 works fine. The problem was in my form load. I just moved my hash table above the "If not (ispostback)" where my bindgrid() statement was and it works fine. I think it will be obvious why this was causing the problem. Thanks for all of your help! In case anyone is following this code i am posting the corrected page load here: ____________________________ Sub Page_Load(Src As Object, E As EventArgs) OrderID.text=Request.QueryString("OrderNUM") vendor3CIndex = New Hashtable() vendor3CIndex("Select Vendor") = 0 vendor3CIndex("Coast Index") = 1 vendor3CIndex("Custom Tabs") = 2 vendor3CIndex("GE Polymershapes") = 3 vendor3CIndex("Image Star") = 4 vendor3CIndex("Ingram Micro") = 5 vendor3CIndex("Kleer Fax") = 6 vendor3CIndex("Marks Papter") = 7 vendor3CIndex("National Index") = 8 vendor3CIndex("Original") = 9 vendor3CIndex("Pengad") = 10 vendor3CIndex("Shamrock") = 11 vendor3CIndex("Southwest") = 12 vendor3CIndex("Spiral") = 13 vendor3CIndex("TEI") = 14 vendor3CIndex("Unibind") = 15 vendor3CIndex("United Manual") = 16 vendor3CIndex("United Transmittal") = 17 If Not (IsPostBack) BindGrid() End If End SubI use a text editor for most coding as well. I have VS.net but can't get away from a basic editor for asp work. If you add Debug="true" to the top of your page: <%@ Page Language="VB" Debug="True" %> you will get a lot more information when an error pops. This works with any editor. Tom T

Load data grid in edit mode

Nltdgcelq

New Member