Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / DataRowView / 11 сообщений из 11, страница 1 из 1
20.08.2004, 11:19
    #32658422
irinka
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DataRowView
Добрый день, очень нужен ваш совет.
Есть такой текст:
Код: plaintext
1.
2.
Dim cm As CurrencyManager = CType(BindingContext(dataset1, "table1"), CurrencyManager)
        Dim rv As DataRowView = CType(cm.Current, DataRowView) 
        rv2("pole1") = CType(ComboBox2.SelectedIndex, Integer)
в таблицу table1 заносится SelectedIndex из комбо.
если индекс от 1 и выше, в базу заносится все правильно (т е 1, 2 и т п), если же индекс = 0, то в базе отображается не 0, а Null
Как это обойти?
PS.После присвоения
rv2("pole1") = CType(ComboBox2.SelectedIndex, Integer)
rv2("pole1") имеет значение 0 (я смотрела в вотче), но при сохранении в базу почему изменяется и заносится null
...
Рейтинг: 0 / 0
20.08.2004, 11:34
    #32658469
Sa
Sa
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DataRowView
Таким образом в результате выполнения кода:
Код: plaintext
1.
2.
3.
4.
Dim cm As CurrencyManager = CType(BindingContext(dataset1, "table1"), 
CurrencyManager)
Dim rv As DataRowView = CType(cm.Current, DataRowView) 
rv2("pole1") =  0 
pole1 будет Null ?

Код: plaintext
 uid  =  S a
...
Рейтинг: 0 / 0
20.08.2004, 11:35
    #32658479
irinka
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DataRowView
Да
...
Рейтинг: 0 / 0
20.08.2004, 11:42
    #32658510
кузя
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DataRowView
что за БД, провайдер ?
...
Рейтинг: 0 / 0
20.08.2004, 11:42
    #32658515
кузя
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DataRowView
+ текст на INSERT (UPDATE)
...
Рейтинг: 0 / 0
20.08.2004, 11:47
    #32658536
irinka
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DataRowView
БД - SQL Server
Обновляется вызовом Me.UpdateDataSet2

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
 Public Sub UpdateDataSource2(ByVal ChangedRows As Scheta.DSSchabloni)         Try
                       If (Not (ChangedRows) Is Nothing) Then
                               SqlDataAdapter2.Update(ChangedRows)

            End If
        Catch updateException As System.Exception

            Throw updateException
        Finally

        End Try

    End Sub

    Public Sub UpdateDataSet2()
    dataset.
    Scheta.DSDocumentsVidOplati()  'Scheta.DS_Documents1() 
        Dim objDataSetChanges2 As Scheta.DSSchabloni = New Scheta.DSSchabloni()         Me.BindingContext(DsSchabloni1, "TForShablonov").EndCurrentEdit()
               objDataSetChanges2 = CType(DsSchabloni1.GetChanges, Scheta.DSSchabloni)
              If (Not (objDataSetChanges2) Is Nothing) Then
            Try
          datasource by
            parameters.
                Me.UpdateDataSource2(objDataSetChanges2)
                DsSchabloni1.Merge(objDataSetChanges2)
                DsSchabloni1.AcceptChanges()
            Catch eUpdate As System.Exception
                 'Add your error handling code here. 
                Throw eUpdate
            End Try
           have been
                   End If

    End Sub
...
Рейтинг: 0 / 0
20.08.2004, 11:47
    #32658541
Sa
Sa
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DataRowView
+ DDL скрипт table1

Код: plaintext
 uid  =  S a
...
Рейтинг: 0 / 0
20.08.2004, 11:53
    #32658567
irinka
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DataRowView
еще раз, а то криво копирнула
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
Public Sub UpdateDataSet2()
        Dim objDataSetChanges2 As Scheta.DSSchabloni = New Scheta.DSSchabloni()  'Scheta.DS_Documents1() 
        Me.BindingContext(DsSchabloni1, "TForShablonov").EndCurrentEdit()
        objDataSetChanges2 = CType(DsSchabloni1.GetChanges, Scheta.DSSchabloni)
        If (Not (objDataSetChanges2) Is Nothing) Then
            Try
                Me.UpdateDataSource2(objDataSetChanges2)
                DsSchabloni1.Merge(objDataSetChanges2)
                DsSchabloni1.AcceptChanges()
            Catch eUpdate As System.Exception
                Throw eUpdate
            End Try
        End If

    End Sub

а можно без скрипта таблицы?
просто структура:
prodavec_id int
pokup_id int
pole1 smallint
..
pole5 smallint
...
Рейтинг: 0 / 0
20.08.2004, 12:00
    #32658596
Sa
Sa
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DataRowView
irinka
еще раз, а то криво копирнула

Вообще то нужен Text InsertCommand и UpdateCommand вашего DataAdapter

irinka
а можно без скрипта таблицы?

Всегда думал что DDL скрипт легче сделать, чем вручную написать структуру. Делается за 5 сек из query analyzer :-)

Код: plaintext
 uid  =  S a
...
Рейтинг: 0 / 0
20.08.2004, 12:06
    #32658612
irinka
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DataRowView
автор
Всегда думал что DDL скрипт легче сделать, чем вручную написать структуру. Делается за 5 сек из query analyzer :-)

просто не хотела отображать истинную стр-ру таблицы :)
...
Рейтинг: 0 / 0
20.08.2004, 17:42
    #32659693
irinka
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DataRowView
:)
Спасибо за содействие, проблема решена.
Весь глюк происходил в самом клиенте при апдейте, надо было просто пару св-в изменить.
...
Рейтинг: 0 / 0
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / DataRowView / 11 сообщений из 11, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]