Discussion :

[pc75]

Bonjour,

J'utilise OWC pour générer des graphs.

J'ai une balise select qui permet de choisir le type de graphe

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
 
<FORM action="chart.asp" method=post name=frmChooseOrg>
 
<p>Type de graphique : 
 
<SELECT name=Graphs>
<option <%if Request.Form("Graphs") = "1" then Response.Write "selected"%> value="1">chChartTypeColumnClustered</option>
<option <%if Request.Form("Graphs") = "2" then Response.Write "selected"%> value="2">chChartTypeBarClustered</option>
<option <%if Request.Form("Graphs") = "3" then Response.Write "selected"%> value="3">chChartTypeLine</option>
<option <%if Request.Form("Graphs") = "4" then Response.Write "selected"%> value="4">chChartTypeLineMarkers</option>
<option <%if Request.Form("Graphs") = "5" then Response.Write "selected"%> value="5">chChartTypeSmoothLine</option>
<option <%if Request.Form("Graphs") = "6" then Response.Write "selected"%> value="6">chChartTypeSmoothLineMarkers</option>
<option <%if Request.Form("Graphs") = "7" then Response.Write "selected"%> value="7">chChartTypePie</option>
<option <%if Request.Form("Graphs") = "8" then Response.Write "selected"%> value="8">chChartTypeArea</option>
<option <%if Request.Form("Graphs") = "9" then Response.Write "selected"%> value="9">chChartTypeDoughnut</option>
<option <%if Request.Form("Graphs") = "10" then Response.Write "selected"%> value="10">chChartTypeRadarLine</option>
<option <%if Request.Form("Graphs") = "11" then Response.Write "selected"%> value="11">chChartTypeRadarSmoothLine</option>
</SELECT>
 
<INPUT type="submit" value="Go"></p>
 
</FORM>

Et plus loin, j'ai ça :

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
 
.....
TypeGraph = Request.Form("Graphs")
 
' Add a chart and set parameters for the chart
oChart.Charts.Add
 
select case TypeGraph
	case "1"
		oChart.Charts(0).Type = oChart.Constants.chChartTypeColumnClustered
	case "2"
		oChart.Charts(0).Type = oChart.Constants.chChartTypeBarClustered
	case "3"
		oChart.Charts(0).Type = oChart.Constants.chChartTypeLine
	case "4"
		oChart.Charts(0).Type = oChart.Constants.chChartTypeLineMarkers
	case "5"
		oChart.Charts(0).Type = oChart.Constants.chChartTypeSmoothLine
	case "6"
		oChart.Charts(0).Type = oChart.Constants.chChartTypeSmoothLineMarkers
	case "7"
		oChart.Charts(0).Type = oChart.Constants.chChartTypePie
	case "8"
		oChart.Charts(0).Type = oChart.Constants.chChartTypeArea
	case "9"
		oChart.Charts(0).Type = oChart.Constants.chChartTypeDoughnut
	case "10"
		oChart.Charts(0).Type = oChart.Constants.chChartTypeRadarLine
	case "11"
		oChart.Charts(0).Type = oChart.Constants.chChartTypeRadarSmoothLine
end select
.....

Mais, pour que le nouveau choix soit pris en compte, il faut que j'actualise la page.

Quelqu'un(e) aurait-il déjà eu à résoudre ce problème ?

Merci.

[roro06]

Bonjour

un truc du genre :

Code html :

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

<SELECT name=Graphs onchange="this.form.submit();">

peut-être ?

[pc75]

Re,

Merci d'essayer de m'aider.

J'ai tenté le onchange, sans succès.

On dirait qu'il ne rafraichit pas la page.

Quand je fais un response.write request.form("Graphs"), il m'affiche bien la nouvelle valeur sélectionnée. Mais je suis obligé d'actualiser la page (F5) pour qu'il m'affiche le bon graphique.

Je pige plus là !

[roro06]

Re :

Un problème de cache, peut-être ?

rajoutes

<meta http-equiv="pragma" content="no-cache">

dans les entetes, a tous hasards. Ta page se nomme bien chart.asp ?

[pc75]

Re,

Pour le cache, j'avais déjà fait, et c'est toujours pareil.

PS : Oui, ma page s'appelle bien chart.asp.

[Poumtschak]

J'ai le même problème avec le composant LT Diagram Builder version ASP.

On ne peut malheureusement garantir la fraîcheur de l'affichage qu'en supprimant totalement le cache, mais au prix d'une dégradation très sensible des performances :

Code :

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

1
2
3
4
5
6
7
8
9
10
<META HTTP-EQUIV="PRAGMA" CONTENT="NO-CACHE">
<META HTTP-EQUIV="CACHE-CONTROL" CONTENT="NO-CACHE, NO-STORE, MUST REVALIDATE, MAX-AGE=0">
<%
Response.Expires = -1
Response.ExpiresAbsolute = Now() - 1
Response.CacheControl = "Private"
Response.CacheControl = "No-Cache"
Response.AddHeader "Pragma", "No-Cache"
Response.AddHeader "Cache-control", "No-Cache, No-Store, Must-Revalidate, Private"
%>