Grazie stoichenko sei sempre gentilissimo.
Io dopo una serie indefinita di madonne ho risolto in questo modo, lo posto nel caso in futuro potesse servire a qualcuno:
codice:
Sub inserisci_cancella(ByVal nomegiocatore As String)
Try
connetti_database()
Dim ds As DataSet = New DataSet
Dim dbda As MySqlDataAdapter = New MySqlDataAdapter
dbda.SelectCommand = New MySqlCommand("SELECT nome,ruolo,valore FROM giocatori_tot WHERE nome like '%" & (nomegiocatore) & "%'", conn)
dbda.Fill(ds, "fantacalcio")
Dim inserisci As New MySqlCommand("INSERT INTO giocatori_squadra (nome,ruolo,valore) VALUES('" & ds.Tables("fantacalcio").Rows.Item(0).Item("nome") & "','" & ds.Tables("fantacalcio").Rows.Item(0).Item("ruolo") & "','" & ds.Tables("fantacalcio").Rows.Item(0).Item("valore") & "')", conn)
inserisci.ExecuteNonQuery()
disconnetti_database()
Catch ex As Exception
Response.Write(ex.Message)
End Try
End Sub