Haat me hier niet voor, want het is het beste wat ik in zo'n korte tijdspanne kan doen:
http://www.fileswap.com/dl/KusycS0QTC/
Eigenlijk is het een project met een MDI-ouderformulier en twee onderliggende formulieren. Ik heb op elk een DGV en ik breng de informatie over van het ene formulier naar het andere. U zult de nodige wijzigingen moeten aanbrengen om rekening te houden met uw instellingen, maar het zou voldoende moeten zijn om u een idee te geven van hoe u moet doen wat u zoekt.
BEWERKEN:
Mogelijke wijzigingen:
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()
'Moet de volgende regel worden ingevoegd 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