how can i insert a data to dataset

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

i call gecicidoldur and i want to add StokIDile_MinnoDS records to MinnogeciciDS datase

but i cant

dim StokIDile_MinnoDS As New DataSe
Public Sub StokIDile_Minno(

StokIDile_MinnoDA.SelectCommand.Parameters.Item("@StokID").Value = m_stokI
StokIDile_MinnoDA.Fill(StokIDile_MinnoDS, "StokIDile_Minno"


End Su

dim MinnogeciciDS As New DataSe
Public Sub Minnogecici(

MinnogeciciDS.Clear(
MinnoGeciciDA.Fill(MinnogeciciDS, "Minnogecici"

End Su

Public Sub GeciciMinNOdoldur(

Dim drMinno As Intege
For drMinno = 0 To (StokIDile_MinnoDS.Tables.Item("StokIDile_Minno").Rows.Count - 1

'MsgBox(StokIDile_MinnoDS.Tables.Item("StokIDile_Minno").Rows(drMinno).Item("Minno").ToString()

Dim ClientInsRow As DataRow = MinnogeciciDS.Tables("Minnogecici").NewRow(
ClientInsRow("StokID") = m_stokI
ClientInsRow("MinNo") = m_minN
ClientInsRow("KullaniciID") = m_kullaniciI
ClientInsRow("AmbarAdi") = m_ambarAd

MinnogeciciDS.Tables("Minnogecici").Rows.Add(ClientInsRow



Nex
MinnoGeciciDA.Update(MinnogeciciDS)
 
Hi Bafidi,

A lot of needed code (I asume it are snippets) seems to be correct, what is
it what is it not doing, is there an error message or something?

Cor
i call gecicidoldur and i want to add StokIDile_MinnoDS records to MinnogeciciDS dataset

but i cant


dim StokIDile_MinnoDS As New DataSet
Public Sub StokIDile_Minno()

StokIDile_MinnoDA.SelectCommand.Parameters.Item("@StokID").Value = m_stokID
StokIDile_MinnoDA.Fill(StokIDile_MinnoDS, "StokIDile_Minno")



End Sub

dim MinnogeciciDS As New DataSet
Public Sub Minnogecici()

MinnogeciciDS.Clear()
MinnoGeciciDA.Fill(MinnogeciciDS, "Minnogecici")


End Sub


Public Sub GeciciMinNOdoldur()

Dim drMinno As Integer
For drMinno = 0 To
Click to expand...
(StokIDile_MinnoDS.Tables.Item("StokIDile_Minno").Rows.Count - 1)
 
Hi bafidi,

An exemple with a DataTable. For the Dataset it should be the same way: but
instead of dtblIsabel use MyDataset.Tables("dtblIsabel")

Dim dtblIsabel As New DataTable
Dim drowRow As DataRow

Dim dcolCol As DataColumn

dcolCol = New DataColumn("ID")
dcolCol.DataType = System.Type.GetType("System.Int16")
dtblIsabel.Columns.Add(dcolCol)

dcolCol = New DataColumn("Name")
dcolCol.DataType = System.Type.GetType("System.String")
dtblIsabel.Columns.Add(dcolCol)

dcolCol = New DataColumn("ChildNumber")
dcolCol.DataType = System.Type.GetType("System.Int16")
dtblIsabel.Columns.Add(dcolCol)


For intX = 1 To intNumberChilds
drowRow = dtblIsabel.NewRow
drowRow.Item("ID") = 0
drowRow.Item("Name") = strFile
drowRow.Item("ChildNumber") = intX
dtblIsabel.Rows.Add(drowRow)
Next intX


Pieter


bafidi said:
i call gecicidoldur and i want to add StokIDile_MinnoDS records to MinnogeciciDS dataset

but i cant


dim StokIDile_MinnoDS As New DataSet
Public Sub StokIDile_Minno()

StokIDile_MinnoDA.SelectCommand.Parameters.Item("@StokID").Value = m_stokID
StokIDile_MinnoDA.Fill(StokIDile_MinnoDS, "StokIDile_Minno")



End Sub

dim MinnogeciciDS As New DataSet
Public Sub Minnogecici()

MinnogeciciDS.Clear()
MinnoGeciciDA.Fill(MinnogeciciDS, "Minnogecici")


End Sub


Public Sub GeciciMinNOdoldur()

Dim drMinno As Integer
For drMinno = 0 To
Click to expand...
(StokIDile_MinnoDS.Tables.Item("StokIDile_Minno").Rows.Count - 1)
 
Back
Top