Hassen Sie mich nicht dafür, denn es ist das Beste, was ich in so kurzer Zeit tun konnte:
http://www.fileswap.com/dl/KusycS0QTC/
Im Grunde ist es ein Projekt mit einem übergeordneten MDI-Formular und zwei untergeordneten Formularen. Ich habe jeweils ein DGV und übertrage die Informationen von einem Formular auf das andere. Sie müssen die erforderlichen Änderungen vornehmen, um Ihr Setup zu berücksichtigen, aber es sollte ausreichen, um Ihnen eine Vorstellung davon zu geben, wie Sie vorgehen können, was Sie anstreben.
BEARBEITEN:
Mögliche Änderungen:
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()
'Soll die nächste Zeile eingefügt werden in?
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