Lad være med at hade mig for dette, da det er det bedste, jeg kunne gøre på så kort tid:
http://www.fileswap.com/dl/KusycS0QTC/
Grundlæggende er det et projekt med en MDI-overordnet formular og to underordnede formularer. Jeg har en DGV på hver, og jeg overfører oplysningerne fra den ene formular til den anden. Du bliver nødt til at foretage de nødvendige redigeringer for at tage højde for din opsætning, men det burde være nok til at give dig en idé om, hvordan du skal gøre det, du leder efter.
EDIT:
Mulige ændringer:
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()
'Skal den næste linje indsættes i?
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