Discussion :

[dakota77]

Bonjour,
Tout novice en VB.NET mais bonne expérience Access.
J'ai une form dans laquelle se trouve un Datagridview qui affiche les enregistrements d'une table.
Il y a donc un Tableadapter qui contient une requête RQ01.
La syntaxe est la suivante :
Me.MaTableTableAdapter.Fill(Me.DSMaTable.RQ01)

Comment faire pour créer une nouvelle méthode Fill01 avec du code ?
L'objectif étant de n'afficher que certains enregistrements :
SELECT [N°], CODE, DES, RESP, FICH FROM RQPRDEF WHERE (CODE = '01')

Auriez-vous une petite piste à me suggérer ? D'avance merci.

[JPelli]

Bonjour,
Utilise un objet command
Voici un exemple avec sqlserveur, remplace sqlclient par ton fournisseur

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
dim SQLCON as new sqlclient.connection
    Dim SQLCMD As New SqlClient.SqlCommand
    Dim SQLDA As SqlClient.SqlDataAdapter
dim SCmd as string
scmd = "le texte de la requête"
    'créer et ouvrir la connection
    SQLCMD.Connection = SQLCON
    SQLCMD.CommandText = SCmd
    SQLCMD.CommandType = CommandType.Text
    SQLCMD.CommandTimeout = (pas obligatoire, par défaut 0 ou une valeur)
    SQLDA = New SqlClient.SqlDataAdapter
    SQLDA.SelectCommand = SQLCMD
    Try
      SQLDA.Fill(Table)
    Catch ex As Exception
      Throw New Exception(String.Format("Erreur Chargement table : {0}", Table.TableName), ex)
   end try

Bon boulot Jean

[dakota77]

Jean, merci pour ta réponse.
Si je fais tout en code cela fonctionne.
Cependant j'aimerais utiliser les objets qui ont été créés par l'assistant connexion base de données. Cet assistant crée le NL1tableAdapter, le dataset (DSvoc), le bindingnavigator et le bindingsource.

Mais c'est alors que je voudrais remplir le dataset DSVOC en filtrant certains enregistrements et donc en utilisant une chaîne SQL.
Je suppose qu'il ne faut pas créer un nouveau Dataset puisqu'il a été créé par l'assistant. Mais comment le remplir en ne retenant que certains enregistrements (champ NBR= 0) ?
La chaîne SQL serait : sw1 = "SELECT NFD, NBR FROM(CAL01) where (NBR=0)"
Création d'un objet command : AcCmd = New OleDb.OleDbCommand(sw1)
Pour remplir le dataset : Me.NL1TableAdapter.Fill(Me.DSVOC.NL1)

Comment remplir le dataset existant en tenant compte d'une chaîne SQL ?
Merci