Requête SQL sur une table dont le nom est variable

Version imprimable

Bonjour à tous,
Je souhaiterais créer une page (et une seule, d'ou l'intérêt) pour pouvoir modifier plusieurs (une dizaine) tables "systemes" (pays, zone, etc...) et donc je comptais utiliser une liste déroulante pour lister les tables systèmes (ca c'est ok) et une fois le nom de la table sélectionné afficher les lignes de cette table pour les modifier.

Je suis loin d'avoir fini et je bloque déjà :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 <% Dim TABLEVAR Dim TABLEVAR_cmd Dim TABLEVAR_numRows Set TABLEVAR_cmd = Server.CreateObject ("ADODB.Command") TABLEVAR_cmd.ActiveConnection = MM_sd_STRING dim SQL SQL="SELECT * FROM " & TABLESSYSTEME.Fields.Item("NOMTABLESYS").Value Response.Write(SQL) TABLEVAR.CommandText = SQL TABLEVAR_cmd.Prepared = true Set TABLEVAR = TABLEVAR_cmd.Execute TABLEVAR_numRows = 0 %>
La ligne TABLEVAR.CommandText = SQL me donne une erreur :
Erreur d'exécution Microsoft VBScript error '800a01a8'

Objet requis: ''

Quelqu'un aurait il une idée du problème ?

Sinon si vous avez des idées ou conseils pour gérer ma gestion des tables "systèmes" sur une seule page, je suis preneur ;-)

Par avance, merci.

22/12/2006, 07h27
ryan
Bonjour Harry,

Hmm, j'ai l'impression que tu as oublié une partie du nom de l'objet
Code:

1 2 TABLEVAR.CommandText = SQL
devrait être
Code:

1 2 TABLEVAR_cmd.CommandText = SQL
non?
22/12/2006, 10h43
harry25
Bonjour Ryan,
C'était bien ca le problème... Merci car c'est souvent sur ce genre de problème évident (quand on la vu ;-) que l'on perd pas mal de temps...

Je ne met pas encore mon post "résolu" car j'ai une autre question :
Comment récupérer le nom des colonnes d'une table ?
Avec ma liste déroulante je selectionne le nom de ma table à modifier, et ensuite je voudrais afficher cette table (le nom de colonnes et le nbre de colonnes ne sont pas les memes selon les tables...).

Par avance, merci.
Citation:
Envoyé par ryan

Bonjour Harry,

Hmm, j'ai l'impression que tu as oublié une partie du nom de l'objet

Code:

1 2 TABLEVAR.CommandText = SQL

devrait être

Code:

1 2 TABLEVAR_cmd.CommandText = SQL

non?
22/12/2006, 11h27
ryan
Re!

Normalement, l'object TABLEVAR est de type Recordset, si j'ai bien suivi.
Donc tu as la collection fields.
Code:

1 2 3 4 For each fielditem in TABLEVAR.fields response.write fielditem.name & "<br>" Next
27/12/2006, 21h53
harry25
Citation:
Envoyé par ryan

Re!

Normalement, l'object TABLEVAR est de type Recordset, si j'ai bien suivi.
Donc tu as la collection fields.

Code:

1 2 3 4 For each fielditem in TABLEVAR.fields response.write fielditem.name & "<br>" Next
Ok ca marche, merci encore.
J'ai d'autres soucis mais je vais créer un nouveau post...