Не ме мразете за това, тъй като това е най-доброто, което мога да направя за толкова кратък период от време:
http://www.fileswap.com/dl/KusycS0QTC/
По принцип това е проект с MDI родителска форма и две дъщерни форми. Имам DGV на всеки и прехвърлям информацията от единия формуляр в другия. Ще трябва да направите необходимите редакции, за да отчетете вашата настройка, но това трябва да е достатъчно, за да ви даде представа как да направите това, което търсите.
РЕДАКТИРАНЕ:
Възможни промени:
Dim _Name As String = ""
Dim _Last As String = ""
For Each xRow In MasterForm.oTransferRows
_Name = xRow.Cells("GVName").Value.ToString()
_Last = xRow.Cells("GVLast").Value.ToString()
„Трябва ли да се вмъкне следващият ред?
Dim _sqlInsert As String = String.Format("Insert testing(Name, LastName) Values (@iName, @iLast)")
Using conn As New SqlClient.SqlConnection("Server = localhost; Username= root; Password =; Database = test")
Using cmd
With cmd
MsgBox("Connection Established")
.Connection = conn
.Parameters.Clear()
'Create Insert Query
.CommandText = _sqlInsert
.Parameters.Add(New SqlParameter("@iName", _Name))
.Parameters.Add(New SqlParameter("@iLast", _Last))
End With
Try
conn.Open()
Me.Validate()
cmd.ExecuteNonQuery()
Catch ex As Exception
MsgBox(ex.Message.ToString())
End Try
End Using
End Using
Next