hi,

I was able to save data in sql but i can't save multi rows in listview items,
please can any one help out.the code is give below.



Private Sub btnAdd_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnAdd.Click

Dim intPosition As Integer
Dim strdt As Date
Dim objCommand As SqlCommand = New SqlCommand()
intPosition = objCurrencyManager.Position
objConnection.Open()
strdt = dtp1.Value
objCommand.Connection = objConnection
objCommand.CommandText = "INSERT INTO First_Assortment_Received" & _
"(e_no,part_no,lot_no,date,s_no,p_code,p_than, pwt ) " & _
"VALUES(@e_no,@part_no,@lot_no,@date,@s_no,@p_code ,@p_than,@pwt)"

Dim intMaxID As Integer = lstView.Items.Count
Dim lstStuff As ListViewItem = New ListViewItem()
objCommand.Parameters.AddWithValue("@e_no", txtEntryId.Text)
objCommand.Parameters.AddWithValue("@part_no", txtPartNumber.Text)
objCommand.Parameters.AddWithValue("@lot_no", txtLotNumber.Text)
objCommand.Parameters.AddWithValue("@date", strdt)
objCommand.Parameters.AddWithValue("@s_no", lstView.Items(0).Text)
objCommand.Parameters.AddWithValue("@p_code", lstView.Items(0).SubItems(1).Text)
objCommand.Parameters.AddWithValue("@p_than", lstView.Items(0).SubItems(2).Text)
objCommand.Parameters.AddWithValue("@pwt", lstView.Items(0).SubItems(3).Text)

Try
For i = 1 To intMaxID
objCommand.ExecuteNonQuery()
Next
Catch SqlExceptionErr As SqlException
MessageBox.Show(SqlExceptionErr.Message)
End Try

objConnection.Close()
FillDataSetandView()
BindFields()
objCurrencyManager.Position = intPosition
ShowPosition()
ToolStripStatusLabel1.Text = "Record Added"
GroupBox1.Enabled = False
GroupBox2.Enabled = True
End Sub