Discussion :

[chuspyto]

boujour,
je voudrai savoir comment faire pour que dans une requete la table prend le nom réel de la table ciblée:

Code :

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

1
2
3
4
5
6
7
Me.1.Checked And Me2.Checked
                pnomtable = "TableETE"
Me.1.Checked And Me3.Checked
                pnomtable = "Tablenuit"
 ........      
 
 SQLstr = "INSERT INTO  pnomtable (champ1) VALUES (1) "

merci

[Invité]

En faisant comme ça, ça devrait marcher :

Code VB.Net :

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

1
2
 
SQLstr = String.Format("INSERT INTO  {0} (champ1) VALUES (1) ", pnomtable)

[chuspyto]

merci est il possible d'avoir ceci:

Code :

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

SQLstr = String.Format("INSERT INTO  {0} (champ1) VALUES ('Recherche_AVI.Text') ", pnomtable)

'Recherche_AVI.Text' etant une textbox
de plus pnomtable indique qu'il est utilisé avant qu'une valeur ne lui soit assignée(mais pnomtable a bien pris la valeur de la table que j'ai selectionné en fonction des checkbox.)
faut il prendre en compte ce message?

[_Ez3kiel]

Comme dit ici : http://www.developpez.net/forums/d13...e/#post7279487

Code :

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

SQLstr = String.Format("INSERT INTO  {0} (champ1) VALUES ('" & Recherche_AVI.Text & "') ", pnomtable)

Et pour ce qui est de la valeur non-assigné, tu peux l'instancier à String.Empty, et la tester avant l’exécution de la requête.

[chuspyto]

peut on faire la meme chose pour effectuer une lecture?

Code :

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

1
2
For i = 1 To 4
                    cmd.CommandText = String.Format("SELECT  (Chm)from {0} WHERE [ID] =" & i, pnomtable)

[_Ez3kiel]

Du coup tu fais 4 Select à la suite, ça deviendrait vite lourd pour ta BDD quand tu auras 10.000 lignes ... De plus cela ne fonctionne que si les Id commencent à 1 jusque x, et le jour où tu voudrais plus que 4, tu devras modifier ton code, le jour où tu supprimes une de tes lignes qui a l'identifiant 2 (par ex), alors tu auras un retour vide etc etc. En gros, non, ce n'est pas à faire.

Tu peux passer par un DataReader. Voir : http://dotnet.developpez.com/articles/ado1/vbnet/#LVI

[chuspyto]

est ce que je lire 2 tables en meme temps?en rajoutant a la requete:

Code :

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

            Dim cmd As New OleDbCommand("SELECT  FROM {0} WHERE [ID] =?", pnomtable),cnn)

[Invité]

Je pense que si tu ne fais pas des recherches tu ne vas pas trop bien t'en sortir.
Développez en propose de bons ici.

[chuspyto]

merci pour le lien,j'ai pu regarder ce week end a tout cela mais je n'ai pas trouver un cas de figure et n'ayant pas les medias a porter de ma base j'aimerai savoir si cette instruction est réalisable ,et fonctionnelle.
pour ce qui est d'avoir 2 tables dans une requete j'ai pu voir comment si prendre.

Code :

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

1
2
3
4
5
6
7
8
9
 
 Dim UneInfo As String = Nothing
        Using cnn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\base1.mdb")
 Dim cmd As New OleDbCommand(("SELECT (Chm) from {0} WHERE [ID]= ?", table1), cnn)
cmd.Parameters.Add("ID", System.Data.OleDb.OleDbType.Integer)
            cmd.Parameters("ID").Value = L_Info
            cnn.Open()
            UneInfo = cmd.ExecuteScalar()
        End Using

merci

[Rainui]

Bonjour,

Un petit effort de votre part serrait appréciable

j'aimerai savoir si cette instruction est réalisable

Quelle instruction???
Je présume que c'est au sujet de la requête sur deux tables mais :

pour ce qui est d'avoir 2 tables dans une requête j'ai pu voir comment si prendre.

Donc quelle est la question?

[chuspyto]

l'instruction dont je fais reference est celle ci:

Code :

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

Dim cmd As New OleDbCommand(("SELECT (Chm) from {0} WHERE [ID]= ?", table1), cnn)

[Rainui]

Est ce que vos tables ont un champ de jointure?

Si oui, ça donne un truc du genre :
(T1 = Table 1, T2 Table 2, C1=champ côté clé primaire, C2=champ côté clé étrangère, C3, C4,... appartenant à T2)

Code :

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

Dim cmd As New OleDbCommand(("SELECT C1, C3, C4 FROM {0} INNER JOIN {1} ON T1.C1=T2.C2 WHERE C1= ?", T1,T2), cnn)

Si non, deux requêtes.

Et sinon 2, vous pouvez répéter la question?
(Stéphanie de monaco ...)