PDA

View Full Version : insert اطلاعات از طریق دیتا گرید ویو در vb



novinmehran
سه شنبه 05 مرداد 1395, 17:30 عصر
سلام من نرم افزار حسابداری میخوام درست کنم که توی اون اطلاعات رو میخوام کاربر توی دیتا گرید ویو وارد کنه و من اونا رو ذخیره کنم توی sql میشه بگید چطوری از دیتا گرید ویو این اطلاعات رو بگیرم

gilsoft
چهارشنبه 06 مرداد 1395, 08:30 صبح
سلام من نرم افزار حسابداری میخوام درست کنم که توی اون اطلاعات رو میخوام کاربر توی دیتا گرید ویو وارد کنه و من اونا رو ذخیره کنم توی sql میشه بگید چطوری از دیتا گرید ویو این اطلاعات رو بگیرم

سلام دوست عزیز

کد زیر ساده‌ترین روش Insert اطلاعات از DatagridView به SQL هست: ( باید ازش ایده بگیری )
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim connection As New Data.SqlClient.SqlConnection
Dim command As New Data.SqlClient.SqlCommand

connection.ConnectionString = "Server= ServerName; Database= DbName; integrated security=true"
command.CommandText = "INSERT INTO <TableName> (Col1, Col2, Col3, Col4, Col5) VALUES (@CodeSL, @CodeDL, @Article, @Debit, @Credit)"

command.Parameters.Add("@CodeSL", SqlDbType.Int)
command.Parameters.Add("@CodeDL", SqlDbType.Int)
command.Parameters.Add("@Article", SqlDbType.NVarChar)
command.Parameters.Add("@Debit", SqlDbType.BigInt)
command.Parameters.Add("@Credit", SqlDbType.BigInt)
connection.Open()
command.Connection = connection

For i As Integer = 0 To DataGridView1.Rows.Count - 1
command.Parameters(0).Value = DataGridView1.Rows(i).Cells(0).Value
command.Parameters(1).Value = DataGridView1.Rows(i).Cells(1).Value
command.Parameters(2).Value = DataGridView1.Rows(i).Cells(2).Value
command.Parameters(3).Value = DataGridView1.Rows(i).Cells(3).Value
command.Parameters(4).Value = DataGridView1.Rows(i).Cells(4).Value
command.ExecuteNonQuery()
Next
End Sub

ناگفته نماند که سند حسابداری آیتمهای دیگری هم برای ذخیره در بانک دارد

موفق باشید .....

novinmehran
پنج شنبه 07 مرداد 1395, 01:04 صبح
ممنون از جوابتون