|
|
|
VB 2005
|
|||
|---|---|---|---|
|
#18+
Добрый день! Помогите пожалуйста в одном вопросе. В своем приложении через Add New Data Source я создала один общий DataSet, где объединила все таблицы из моей БД. Создала форму для добавления к примеру нового заказа, на которую для этого закинула несколько TextBox-ов и ComboBox-ов (с помощью перетаскивания самих полей из таблиц DataSet-а). Автоматически на форме появился BindingNavigator с соответствующими кнопками Add, Next, Prev, Delete и Save. Но для сохранения записи необходимо в уже существующем коде кнопки Add добавить SqlTransaction в такой форме Dim tran As SqlTransaction Try conn.Open() tran = conn.BeginTransaction Adapter.UpdateCommand.Transaction=tran Adapter.Update(Ds,"Table") tran.Commit() Catch ex As Exception tran.Rollback() Finally conn.Close() End Try (это как должно быть в VB.Net 2003). А в VB 2005 это не прокатывает. Не подскажмте как это можно сделать в 2005 версии. Заранее спасибо. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 21.08.2007, 15:07 |
|
||
|
VB 2005
|
|||
|---|---|---|---|
|
#18+
Что не работает? Ошибки какие? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 21.08.2007, 15:18 |
|
||
|
VB 2005
|
|||
|---|---|---|---|
|
#18+
Просто в 2005 версии нет метода UpdateCommand, т.е. после точки в списке имеющихся свойств и методом есть только Update. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 21.08.2007, 15:31 |
|
||
|
VB 2005
|
|||
|---|---|---|---|
|
#18+
автор метода UpdateCommand а гиде есть? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 21.08.2007, 15:57 |
|
||
|
VB 2005
|
|||
|---|---|---|---|
|
#18+
ЕЩЕ РАЗ: МЕТОД UpdateCommand? может, свойство? если свойство, то у адаптера есть это свойство, что в 2002, что в 2003, что в 2005. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 21.08.2007, 16:11 |
|
||
|
VB 2005
|
|||
|---|---|---|---|
|
#18+
Короче когда создаешь DataSet на форме с помощью Add New DataSource то автоматически создаются Adaptor-ы для каждой таблицы и BindingNavigator у которого уже есть кнопки Add, Delete и Update. Public Class Form1 Private Sub APPLICATIONBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles APPLICATIONBindingNavigatorSaveItem.Click Me.APPLICATIONTableAdapter.Update(Me.IncidentDataSet.APPLICATION) End Sub В этом уже автоматически созданном коде нужно добавить SqlTransaction для того, чтобы полностью обновить данные в таблице. Dim Tran as New SqlTransaction Try con.Open() tran = con.BeginTransaction() APPLICATIONTableAdapter.UpdateCommand.Transaction = Tran <-В 2005 в списке свойств и методов адаптера, которые появляются после точки просто нет. APPLICATIONTableAdapter.Update(DataSet,APPLICATION) tran.Commit() Catch Err As Exception tran.Rollback() Finally con.Close() End Try ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 21.08.2007, 17:04 |
|
||
|
|

start [/forum/topic.php?fid=17&msg=34742680&tid=1352654]: |
0ms |
get settings: |
9ms |
get forum list: |
14ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
43ms |
get topic data: |
9ms |
get forum data: |
3ms |
get page messages: |
49ms |
get tp. blocked users: |
1ms |
| others: | 196ms |
| total: | 330ms |

| 0 / 0 |
