declarer nom table comme variable [Résolu]

naouah · 27/08/2007, 16h41

Bonjour

J'ai creé page ASP qui recupere des données depuis un fichier excel ou access, pour afficher un tableau

lors de selection

Select * from table1

j'ai une liste deroulante avec nom des table ( table1, table2 ...)

et je voudrais déclaerer nom table en tant que varaible"

Select * from Request.Form("nom dans form")

est t'il possible de faire ça?

et merci d'avance

marabout · 27/08/2007, 16h52

Oui, tout à fait mais tu dois construire ta querystring:

Code :

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

strSQL="SELECT * FROM " & Request.Form("champForm")

naouah · 27/08/2007, 17h02

merci pour votre reponse, mais je ne suis pas sur c'est acadimique ce que je fais, parceqe j'ai le menu deroulante et resultat sur meme page, en fait j'ai besoin d'avoir les deux même page.
et merci encore

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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
<%Option Explicit%>
<html>
	<title>Les resultats par ville</title>
	<body bgcolor="#FFFFFF" text="#000000" link="#0000FF" vlink="#0000FF" alink="#FF0000">
 
	<form method="POST" action="--WEBBOT-SELF--">
 
		<p>
		<select size="1" name="D1">
			<option>choisir une ville</option>
			<option>Lyon</option>
			<option>nancy</option>
			<option>paris</option>
			</select>
		</p>
	</form>
	<%
		Dim FichierExcel, MaConn, MonObjRs, MonSQL, CompteurColonne
 
		FichierExcel = "test1.xls"
 
 
		Set MaConn = Server.CreateObject("ADODB.Connection")
		MaConn.Open "DBQ=" & Server.MapPath(FichierExcel) & ";DRIVER={Microsoft Excel Driver (*.xls)};"
		Set MonObjRs = Server.CreateObject("ADODB.Recordset")
 
		MonSQL = "SELECT * FROM " & Request.Form("D1")	
		MonObjRs.Open MonSQL, MaConn
	%>
		<p>&nbsp;</p>
	<p>&nbsp;</p>
		<table border="1" cellspacing="0" cellpadding="2" align="center" bordercolor="#000000">
 
			<tr>
			<%For CompteurColonne = 0 To (MonObjRs.Fields.Count - 1)%>
				<td bgcolor="#C0C0C0"><b><font face="Verdana" size="2"><% 
				' Le nom des champs
				%><%=MonObjRs.Fields.Item(CompteurColonne).Name%></font></b></td>
			<%Next%>
			</tr>
			<%Do While Not MonObjRs.EOF%>
			<tr><%
			For CompteurColonne = 0 To (MonObjRs.Fields.Count - 1)%>
				<td align="center"><font face="Arial" size="2">
					<%=MonObjRs.Fields.Item(CompteurColonne).Value %></font></td>
			<%Next %>
			</tr>
			<%MonObjRs.MoveNext
			Loop%>
		</table>
<%
	' On vide tous les objets tout bien comme il faut :)
	MonObjRs.close
	Set MonObjRs = Nothing
	MaConn.close
	Set MaConn = Nothing
%>
	</body>
</html>

pc75 · 28/08/2007, 08h15

Bonjour,

Citation:

Envoyé par naouah

en fait j'ai besoin d'avoir les deux même page.

Tu veux dire quoi là ?

Tu veux une première page avec ta liste déroulante et afficher le résultat dans une deuxième page ?

naouah · 28/08/2007, 15h51

j'ai reussi a creer une page en html et qui envoie vers une page asp, et ça fonctionne.

mais j'arrive pas a faire fonctionner ça ,quant je mis le code html ( formulaire avec request) et le code asp dans la même page. c'est à dire le menu deroulant en haut de la page et en bas le tableau qui suit le choix de menu deroulante.

merci d'avance

pc75 · 28/08/2007, 17h01

Re,

Peux tu essayer d'être un peu plus clair ?

Quand tu écris "j'arrive pas a faire fonctionner ça ", ça veut dire quoi ? il ne se passe rien, as-tu un message d'erreur ?

Donne nous plus de précisions.

kaiser59 · 29/08/2007, 17h25

Salut,

d'après ce que j'ai compris ce que tu souhaites c'est faire ceci :

Mapage.asp :

Code asp :

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
 
Response.write "<select name=""liste"" onChange=""location = this.options[this.selectedIndex].value"">"
'je sais pas si tu listes les tables manuellement ou avec le code mais avec le code c'est possible de les lister
Response.write "<option value=""tbl1"">table 1"
Response.write "<option value=""tbl2"">table 2</option>"
Response.write "</select>"
 
Response.write "<br/>"
 
'affichage seulement si une valeur est retournée
if request.querystring("liste") <> "" then
'connexion bd
'recordset
Sql="Select * from "& request.form("liste") &""
 
'affichage des champs
'fermeture bd
end if

27/08/2007, 16h41	#1
naouah Invité régulier Inscription : avril 2007 Messages : 52 Détails du profil Informations forums : Inscription : avril 2007 Messages : 52 Points : 7 Points : 7	Mettre le nom d'une table en variable Bonjour J'ai creé page ASP qui recupere des données depuis un fichier excel ou access, pour afficher un tableau lors de selection Select * from table1 j'ai une liste deroulante avec nom des table ( table1, table2 ...) et je voudrais déclaerer nom table en tant que varaible" Select * from Request.Form("nom dans form") est t'il possible de faire ça? et merci d'avance
	00

27/08/2007, 16h52	#2
marabout Membre émérite Consultant E-Learning Inscription : août 2006 Messages : 646 Détails du profil Informations personnelles : Sexe : Localisation : Belgique Informations professionnelles : Activité : Consultant E-Learning Informations forums : Inscription : août 2006 Messages : 646 Points : 812 Points : 812	Oui, tout à fait mais tu dois construire ta querystring: Code : Sélectionner tout - Visualiser dans une fenêtre à part strSQL="SELECT * FROM " & Request.Form("champForm")
	00

28/08/2007, 15h51	#5
naouah Invité régulier Inscription : avril 2007 Messages : 52 Détails du profil Informations forums : Inscription : avril 2007 Messages : 52 Points : 7 Points : 7	merci j'ai reussi a creer une page en html et qui envoie vers une page asp, et ça fonctionne. mais j'arrive pas a faire fonctionner ça ,quant je mis le code html ( formulaire avec request) et le code asp dans la même page. c'est à dire le menu deroulant en haut de la page et en bas le tableau qui suit le choix de menu deroulante. merci d'avance
	00

28/08/2007, 17h01	#6
pc75 Expert Confirmé Inscription : septembre 2004 Messages : 2 812 Détails du profil Informations personnelles : Âge : 56 Localisation : France, Paris (Île de France) Informations forums : Inscription : septembre 2004 Messages : 2 812 Points : 3 011 Points : 3 011	Re, Peux tu essayer d'être un peu plus clair ? Quand tu écris "j'arrive pas a faire fonctionner ça ", ça veut dire quoi ? il ne se passe rien, as-tu un message d'erreur ? Donne nous plus de précisions. __________________ Par principe, je ne réponds pas aux messages URGENT. Il n'y a pas de choses urgentes, il n'y a que des choses en retard. (un inconnu)
	00

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email