listboxtaki verileri sql aktarmak

Anonim

(@Anonim)

Gönderiler: 0

Konu başlatıcı

merhaba arkadaşlar

visual basic 2010 kullanmaktayım

listboxtaki tüm verileri sql aktaramıyorum. listbox yerine textboxı yazdığım da bir sorun oluşmuyor. sorunu nasıl aşabilirim acaba? kodlar aşağıdaki gibidir.

Dim builder As SqlClient.SqlCommandBuilder = New SqlClient.SqlCommandBuilder(adaptor4)
Dim insert_komut As New SqlClient.SqlCommand
datakayit4 = kayit4.Tables("bakimkaydi").NewRow

Dim i As Integer

For i = 1 To ListBox5.Items.Count

datakayit4("m_fabricno") = ListBox5.Items.Item(i)

Gönderildi : 21/01/2011 18:07

IT Max

(@selahattinsadoglu)

Gönderiler: 826

Prominent Member

Sizin kodunuz sadece tek bir satıra kayıt yapacaktır.

Yapmanız gereken döngü içinde satır eklemeniz gerekiyor.Bunun yolu tabloya birden fazla satır ekleyebilirsiniz.

Dim builder As SqlClient.SqlCommandBuilder = New SqlClient.SqlCommandBuilder(adaptor4)
Dim insert_komut As New SqlClient.SqlCommand

Dim i As Integer

    For i = 1 To ListBox5.Items.Count
        datakayit4 = kayit4.Tables("bakimkaydi").NewRow
        datakayit4("m_fabricno") = ListBox5.Items.Item(i)
        kayit4.Tables("bakimkaydi").Rows.Add(datakayit4)
        adaptor4.Update(kayit4, "bakimkaydi")

Saygılar,

Gönderildi : 21/01/2011 20:31

Anonim

(@Anonim)

Gönderiler: 0

Konu başlatıcı

kodu aşağıdaki gibi yapınca sorunum çözüldü. yardımlarınız için teşekkürler

[:D]

Dim builder As SqlClient.SqlCommandBuilder = New SqlClient.SqlCommandBuilder(adaptor4)
    Dim insert_komut As New SqlClient.SqlCommand

    Dim i As Integer

    For i = 1 To ListBox5.Items.Count -1
        datakayit4 = kayit4.Tables("bakimkaydi").NewRow
        datakayit4("m_fabricno") = ListBox5.Items.Item(i)
        kayit4.Tables("bakimkaydi").Rows.Add(datakayit4)
        adaptor4.Update(kayit4, "bakimkaydi")
next