01.
If
sqlconn.State = ConnectionState.Open
Then
02.
sqlconn.Close()
03.
04.
sqlregist =
"INSERT INTO [paid] ([pay_id], [food_id], [amount], [Discount], [food_sum]) "
& _
05.
"VALUES (@pay_id, @food_id, @amount, @Discount, @food_sum)"
06.
07.
comSale =
New
SqlCommand(sqlregist, sqlconn)
08.
comSale.Parameters.Add(
"@pay_id"
, SqlDbType.NVarChar).Value = tmptakeid
09.
comSale.Parameters.Add(
"@food_id"
, SqlDbType.NVarChar).Value = lsvFoodList.Items(i).SubItems(0).Text
10.
comSale.Parameters.Add(
"@amount"
, SqlDbType.Int).Value =
CInt
(lsvFoodList.Items(i).SubItems(3).Text)
11.
comSale.Parameters.Add(
"@Discount"
, SqlDbType.Float).Value =
CSng
(lsvFoodList.Items(i).SubItems(4).Text)
12.
comSale.Parameters.Add(
"@food_sum"
, SqlDbType.Float).Value =
CSng
(lsvFoodList.Items(i).SubItems(5).Text)
13.
14.
sqlconn.Open()
15.
comSale.ExecuteNonQuery()
16.
sqlconn.Close()