Discussion :

[solid_sneak06]

voila, je veux fais faire un copier coller d'une colonne (n_facture) de la table "D_F", vers la table "numero" mais je c pas comment faire.

voila ce que j'ai pu faire, je sais pas quoi faire après

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
Imports System
Imports System.Data
Imports System.Data.OleDb
Imports Microsoft.VisualBasic
 
 
Public Class Form1
    Dim cnn1, cnn2 As New OleDb.OleDbConnection
 
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        cnn1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\~~\Bureau\BP\facturation.mdb;Persist Security Info=False"
        cnn2.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\~~\Bureau\BP\tmp.mdb;Persist Security Info=False"
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        cnn1.Open()
        Dim sqlcomand As New OleDb.OleDbCommand
        sqlcomand.Connection = cnn1
        sqlcomand.CommandText = "select n_facture from D_F GROUP BY n_facture"
        Dim resultat = sqlcomand.ExecuteScalar
    End Sub
End Class

help

[bidou]

Après il faut une autre requête (Command) pour insérer les valeurs dans l'autre table

[solid_sneak06]

Après il faut une autre requête (Command) pour insérer les valeurs dans l'autre table

merci pour ta reponse mais je c qu'il faut un insert mais comment je vais metre le resultat dans ce INSERT??
merci

[bidou]

Avec un paramètre

[solid_sneak06]

Avec un paramètre

oui mais comment?

[bidou]

un exemple tiré de MSDN

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
command = New OleDbCommand( _
        "INSERT INTO Customers (CustomerID, CompanyName) " & _
        "VALUES (?, ?)", connection)
command.Parameters.Add("CustomerID", OleDbType.Char, 5, "CustomerID")
command.Parameters.Add("CompanyName", OleDbType.VarChar, 40, "CompanyName")
command.ExecuteNonQuery()