قرار دادن لیست باکس در دیتا بیس

["emad"]

دو تا لیست باکس دارم میخوام اطلاعات این دو لیست باکس وارد فیلدهای دیتابس شود101209

[123s0ran]

سلام دوست . بفرماید این هم کدش..

فقط نام جدول و فیلد هارو عوض کن و بجای نام جدول و فیلد های که توی این کد هستش فیلد و جدول خودتو بزار


Try

If CheckPersonExist(TextBox1.Text, TextBox2.Text, TextBox5.Text, ComboBox3.Text, ComboBox2.Text, TextBox6.Text, ComboBox1.Text, ComboBox4.Text) = False Then
If cnn.State = ConnectionState.Closed Then cnn.Open()
Try
cmd = New SqlCommand("Insert Into blit (name,fname,mabda,maqsad,sat,pelak,sandal,data) Values(@name,@fname,@mabda,@maqsad,@sat,@pelak,@sa ndal,@data) ", cnn)
With cmd
.Parameters.Clear()
.Parameters.AddWithValue("@name", TextBox1.Text)
.Parameters.AddWithValue("@fname", TextBox2.Text)
.Parameters.AddWithValue("@mabda", ComboBox1.Text)
.Parameters.AddWithValue("@maqsad", ComboBox2.Text)
.Parameters.AddWithValue("@sat", ComboBox4.Text)
.Parameters.AddWithValue("@pelak", ComboBox3.Text)
.Parameters.AddWithValue("@sandal", TextBox5.Text)
.Parameters.AddWithValue("@data", TextBox6.Text)
.ExecuteNonQuery()
End With
Catch ex As Exception
MsgBox(Err.Description, MsgBoxStyle.Critical, "Error Happened For Add New Record")
End Try
ReloadRecord()
Else
MsgBox("مشخصات این شخص قبلاً در دیتابیس ثبت شده است")
End If
cnn.Close()
Catch ex As Exception
cnn.Close()
MsgBox("خطا در اتصال به دیتابیس")

راستی توی این کد من کومبو باکس نوشته شده است اما شما لیست بکس هم بنوسید مشکلی نداره

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

["emad"]

دو تا لیست باکس دارم میخوام اطلاعات این دو لیست باکس وارد فیلدهای دیتابس شود
101230
جواب نمیده.من دو تا لیست باکس دارم میخوام اطلاعات آن وارد دیتا بیس شود