Вставка новой записи.

tasha klemer
Дата: 23.06.2014 16:36:15
добрый день. хосу сделать вставку новой записи через дополнительную форму.
в качестве основного элемента отображаюзего данные является listView1 ( заполнятется на основе dataBuinding)
при добавление новой записи нужно чтоб открывалась форма с DataDrid. и при двойном счелчке Id со второй формы переносилось в первую и отрабатывала процедура записи.
ВОт что я пока смогла накидать.

 If lbWorkerFromObj.Items.Count = 5 Then
            MsgBox("Возможно только 5 отвественных сотрудников!", vbOKOnly, "Ошибка добавления отвественного сотрудника")
        Else
            fWorkerSelect.MdiParent = fStart
            fWorkerSelect.Show()
            cmd.CommandText = "INSERT INTO [BuildInspector].[dbo].[TWorker],[id_worker],[id_Obj],[id_WorkerfromDic])VALUES()(<id_worker, int,>,<" + CInt(fBuildAll.ID_Obj) + ", int,>,<" + CInt(fWorkerSelect.IdWorkerfromSelect) + ">, int,>) "
            adapter.SelectCommand.CommandText = cmd.CommandText
            adapter.Fill(ds)
        End If
Konst_One
Дата: 23.06.2014 16:38:28
SelectCommand
InsertCommand

это разные вещи
tasha klemer
Дата: 23.06.2014 16:55:22
поправила, но до этого момента проект даже не отрабатывал.
tasha klemer
Дата: 23.06.2014 17:01:32
          cmd.CommandText = "INSERT INTO TWorker (id_Obj, id_WorkerfromDic) VALUES (" + CInt(fBuildAll.ID_Obj) + "," + CInt(12) + ")"
            adapter.InsertCommand.CommandText = cmd.CommandText


нга этой строке выходит сообщение
Additional information: Приведение строки "INSERT INTO TWorker (id_Obj, id_" к типу "Double" является недопустимым.
Konst_One
Дата: 23.06.2014 17:21:31
CInt(fBuildAll.ID_Obj)

проверьте что там в этом параметре
tasha klemer
Дата: 23.06.2014 17:45:14
Konst_One
CInt(fBuildAll.ID_Obj)

проверьте что там в этом параметре


  fBuild.cmd.CommandText = "INSERT INTO TWorker (id_Obj, id_WorkerfromDic) VALUES (" & fBuildAll.ID_Obj & " ," & IdWorkerfromSelect & ")"
            'cmd.Parameters.Add(ID_Obj, Int())
            fBuild.adapter.InsertCommand.CommandText = fBuild.cmd.CommandText
            fBuild.adapter.Fill(fBuild.ds)


результат
INSERT INTO TWorker (id_Obj, id_WorkerfromDic) VALUES (2 ,4)

В экземпляре объекта не задана ссылка на объект.

причина была в том, что в таблице 3 поля а в Inserte Только указала.