Forum
merhaba arkadaşlar,
visual basic 2010 kullanmaktayım.
aşağıdaki kod ile listboxta bulunan veriyi sql e kayıt yapmak istediğimde program sql kodlamasında hata veriyor. nedeni bir türlü anlayamadım. normalde kayıt yapması gerekiyor. run yapıp butona bastığımda hata alıyorum. sizce problem ne olabilir. (hata veren satırın altı çizili)
Public Class Form1
Dim baglanti As New SqlClient.SqlConnection("Data Source=localhost\SQLEXPRESS;Initial Catalog=dedektor;Persist Security Info=True;User ID=test;Password=test1")
Dim adaptor As SqlClient.SqlDataAdapter
Dim kayit As New DataSet
Dim datakayit As DataRow
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a As Integer
For a = TextBox1.Text To TextBox2.Text
ListBox1.Items.Add(a)
Next
adaptor = New SqlClient.SqlDataAdapter("INSERT INTO Table_2([po])VALUES('" + ListBox1.Items.Add(a) + "') ", baglanti)
adaptor.Fill(kayit, "table_2")
End Sub
Merhaba,
Bunu kullanmayı deneyiniz.İkinci olarak programın size verdiği hata mesajı nedir?
Dim sqlquery As String = ""INSERT INTO Table_2([po])VALUES(@po)" //sql string
Dim cmd As SqlClient.SqlCommand = New SqlClient.SqlCommand(sqlquery, con) //Insert
Dim a As Integer
For a = TextBox1.Text To TextBox2.Text
cmd.Parameters.AddwithValue("@po",ListBox1.Items.Add(a)) //use parameters to avoid sql injection
cmd.ExecuteNonQuery() //execute insert Command
Next
//You must call another query to populate your DataSet
adaptor.Fill(kayit, "table_2")
Saygılar,
merhaba
hata mesajı aşağıdaki gibidir
"InvalidArgument=Value of '5' is not valid for 'index'.
Parameter name: index"