Господа, помогите. Прочитал книжку, а апдейт не получается, только строки для редактирования открываются в виде TextBox. А дальше темный лес для меня. В коде dgResults_CancelCommand не знаю что написать, чтобы возвращалась строка в исходное состояние. А в dgResults_UpdateCommand при изменении строки данные чтобы изменились в базе и на DataGrid

Вот собственно сам DataGrid

<asp:DataGrid id="dgResults" AutoGenerateColumns="False" OnItemCommand="Click_Grid" OnEditCommand="dgResults_EditCommand" OnCancelCommand="dgResults_CancelCommand" OnUpdateCommand="dgResults_UpdateCommand" runat="server">
<Columns>
<asp:BoundColumn HeaderText="Должность" DataField="НаимДолжн"></asp:BoundColumn>
<asp:BoundColumn HeaderText="Фамилия Имя Отчество" DataField="ФИО"></asp:BoundColumn>
<asp:BoundColumn HeaderText="Кабинет" DataField="Кабинет"></asp:BoundColumn>
<asp:BoundColumn HeaderText="Телефон" DataField="телефон"></asp:BoundColumn>
<asp:BoundColumn HeaderText="ДопИнф" DataField="ДопИнф"></asp:BoundColumn>
<asp:BoundColumn HeaderText="отдел" DataField="отдел"></asp:BoundColumn>
<asp:BoundColumn HeaderText="Структура" DataField="Структура" Visible="False"></asp:BoundColumn>
<asp:BoundColumn DataField="Код" Visible="False"></asp:BoundColumn>
<asp:ButtonColumn HeaderText="Удаление" ButtonType="LinkButton" Text="Удалить" CommandName="cmdRemoveItem"></asp:ButtonColumn>
<asp:EditCommandColumn HeaderText="Редактирование" EditText="Редактировать" CancelText="Отменить" UpdateText="Изменить" ButtonType="LinkButton"></asp:EditCommandColumn>
</Columns>
</asp:DataGrid>


Вот код к нему:

<%@ Page Language="VB" Debug="true" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.OLEDB" %>
<script runat="server" language=vb>

Sub Page_Load (ByVal Sender as Object, ByVal E as EventArgs)


Dim DBConn as OleDBConnection
Dim DBCommand as OleDBDataAdapter
Dim DSPageData as New DataSet
DBConn = New OleDbConnection ("Provider=Microsoft.Jet.OLEDB.4.0; Ole DB Services=-4; Data Source=C:\Tel_SN"& _
".mdb")

DBCommand = New OleDbDataAdapter ("Select НаимДолжн, ФИО, Кабинет, телефон, ДопИнф, отдел, Код, Структура from Тел", DBConn)
DBCommand.Fill (DSPageData, _
"SignIn")
dgResults.DataSource = DSPageData.Tables("SignIn").DefaultView
dgResults.DataBind()
End Sub

Sub dgResults_EditCommand(source as Object, e as DataGridCommandEventArgs) Handles dgResults.EditCommand
dgResults.EditItemIndex = e.Item.ItemIndex
dgResults.DataBind()
End Sub

Sub dgResults_CancelCommand(source as Object, e as DataGridCommandEventArgs) Handles dgResults.CancelCommand
dgResults.EditItemIndex = -1
dgResults.DataBind()
End Sub

Sub dgResults_UpdateCommand(source as Object, e as DataGridCommandEventArgs) Handles dgResults.UpdateCommand

End Sub



Спасибо...

Все-таки этот код работает нормально. То есть, в режим редактирования dgResults_EditCommand DataGrid переходит, из режима редактирования CancelCommand в нормальный режим возвращается, но вот UpdateCommand не хочет работать. Вроде бы в textBox'е Datagrid'а новую запись пишу, а строка обновляется со старыми данными. Может кто знает, в чем причина?

Sub dgResults_UpdateCommand(ByVal source As Object, ByVal e As DataGridCommandEventArgs)

Dim НаимДолжн1 as string
Dim Код1 as Integer
Dim tb1, tb7 As TextBox
tb7 = CType(e.Item.Cells(7).Controls(0), TextBox)
Код1 = CInt(tb7.text)

tb1 = CType(e.Item.Cells(0).Controls(0), TextBox)
НаимДолжн1 = CStr(tb1.text)

Dim DBConn as OleDBConnection
Dim DBUpdate As New OleDbCommand
Dim DSPageData as New DataSet
DBConn = New OleDbConnection ("Provider=Microsoft.Jet.OLEDB.4.0; Ole DB Services=-4; Data Source=C:\Tel_SN"& _
".mdb")


DBUpdate.CommandText = "Update НГДУСН Set НаимДолжн = '" & НаимДолжн1 & "' where Код = " & Код1 & ""
DBUpdate.Connection = DBConn
DBUpdate.Connection.Open
DBUpdate.ExecuteNonQuery()
dgResults.EditItemIndex = -1
dgResults.DataBind()

End Sub

Нет, этот код на С#, а мне нужен на VB.

Кстати, если скомпилировать данный код на С#, получится тот же на VB, наверное.
Что у меня и есть в исходнике

Написал код по примеру, но программа тормозится на этой строке:

ds.Tables(0).PrimaryKey = New DataColumn(ds.Tables(0).Columns("Код"))

пишется Value of type 'System.Data.DataColumn' cannot be converted to 'String'

Как победить это? Пока знаний не хватает моих.

To HondKot


Может Вы посмотрите код моей программы (прилагается), бьюсь, бьюсь, ищу коды в инете, но не помогает.
С PrimaryKey вроде разобрался, но теперь пишет:

reference not set to an instance of an object.

останавливается на
myColArray(0) = ds.Tables(0).Columns("Код")

Буду признателен

Исправил, страничка работает, но все равно данные после редактирования не обновляются в DataGride.

??? Какая еще заковыка заложена?

Спасибо всем, кто пытался мне помочь. Наконец-то этот код побежден.

Помогла Библиотека классов .NET Framework DataGrid.EditItemIndex - свойство в MSDN

http://msdn.microsoft.com/library/rus/default.asp?url=/library/rus/cpref/html/frlrfsystemwebuiwebcontrolsdatagridclassedititemindextopic.asp

ANF76http://msdn.microsoft.com/library/rus/default.asp?url=/library/rus/cpref/html/frlrfsystemwebuiwebcontrolsdatagridclassedititemindextopic.asp