Discussion :

[crapule]

Bonjour et merci a ceux qui vont me lire et m aider pour commencer.

Je souhaite creer une table, depuis un formulaire, en proposant a l utilisateur de choisir le nom de la table a créee.
Le formulaire comporte une zone de texte nommée "Text3" ou l utilisateur devra rentrer le nom de la ta ble a creer ainsi qu un bouton commande.

voici le code de mon bouton commande :

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
private Sub Commande5_Click()
Dim y As String
y = Texte3
MsgBox y
         'pas necessaire, c est juste pour que je puisse controler que la
       ' variable contient bien ce qu a tapé l utilisateur
Dim qdf As QueryDef
'Dim parametre As Parameter
         'ligne precedente en commentaire car il ne me semble pas que ca
       ' soit necessaire pour executer la requete, bien que meme en 
       'en declarant le parametre, cela ne fonctionne pas
 
Set qdf = currentdb.QueryDefs("RequeteCreateTable")
        'j appel donc la requete en question
    With qdf
        .Parameters("parametre") = y
        'a partir de ce moment la, le parametre devrait prendre la valeur de
      ' y ( c est a dire de ce qui est tapé par l utilisateur dans la zone de 
      ' texte Texte3)
        .Execute
    End With
End Sub

voici le code de ma requete:

Code :

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

CREATE TABLE parametre (fournisseur char, type_de_materiel char, prix_unitaire char, reference char, description char);

je cree donc la table dont le nom est parametre (pour continuer dans ma logique) ainsi que 5 champs sur lesquels je ne m attarderai pas.

ma question est la suivante: pourquoi ca ne marche pas??(etonné, hein?)
plus serieusement, quand j execute mon code, le deboggueur m indique (je cite) :

"Erreur d execution '3265'
Element non trouvé dans la collection"

Je sais que parametre fait partie de la collection parameters, collection presente pour les requetes parametrees.
Je me demande si les parametres (pour les requetes) ne sont utilisables QUE pour les criteres (WHERE .......=[nomParametre])

Enfin, si ce n est pas possible par une requete parametrée, comment puis je faire pour reussir a creer une table depuis un formulaire en proposant a l utilisateur de choisir le nom?
merci d avance.
J espere avoir été relativement clair, n hésitez pas a me demander des infos pour eclaircir un point en particulier.

[medkarim]

essay ance les fonction ADO

[ThierryAIM]

essay ance les fonction ADO

S'il travaille en DAO, c'est pas pour tout refondre en ADO, surtout s'il est en VBA Access, ce que je soupconne fortement

pour creer un table en DAO, teste simplement :

Code :

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

currentdb.Execute "CREATE TABLE Nom_de_ma_Table (fournisseur char, type_de_materiel char, prix_unitaire char, reference char, description char);"