Discussion :

[yoda_style]

Bonjour,

je suis loin d'être une flèche en ASP et je n'arrive pas à updater ma BD

En fait, je récupére une valeur modifiée dans un formulaire au préalable (etablissement).--> part1

Cette valeur est plusieur fois dans ma BD mais avec un id unique. Je recherche ces différents id --> part2

Je fais un while not pour parcourir ma colonne des id et récupérer tout les id où établissement est présent et dans la foulée, je cherche à updater autant de fois le champ AdminEtablissement qu'il y a de id par la variable etablissement (qui à été modifiée avant) --> part3

Le script ne met aucune erreur, j'ai fait des test et les id sont bien présent. j'ai aussi vérifié et revérifié mes tables et il est censé updater au bon endroit.

Bref, je ne vois pas d'où vient l'erreur.

Merci d'avance pour votre aide

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
<%
'PART1
 
etablissement = request.QueryString("etablissement")
 
 
Set ConGR = Server.CreateObject("ADODB.Connection")
Set rst = Server.CreateObject("ADODB.Recordset")
Set Rs = Server.CreateObject("ADODB.Recordset")
 
conGR.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../")&"/Databases/GR.mdb;"
 
'PART2
Sql="Select id From exploitation where AdminEtablissement='" & etablissement & "'"
rst.Open Sql, ConGR, 3, 3
 
'PART3
while not rst.eof
	  			response.Write(rst("id")&",")
				sId = rst("id")
				sId = cLng(sId)
				RequeteSQL = "Update Exploitation Set AdminEtablissement='"&etablissement&"' WHERE id= "&sId&";"
				Rs.Open RequeteSQL , conGR
			rst.moveNext
			  wend%>

[roots_man]

En fait, je récupére une valeur modifiée dans un formulaire au préalable (etablissement).--> part1

Dans ton code tu fait un request.querystring() pour récupérer une valeur d'un formulaire , ca serait pas plutot un request.form() ??

Sinon le reste ca m'a l'air correct !!

[yoda_style]

C'est vrai, mais je ne sais pas pourquoi, mais quand je fais un request.form, il ne prends pas les champs. Par contre, comme la page précédente est un formulaire et que je l'envoi, tout passse par URL et je fais le request.querystring pour les récupérer comme l'autre méthode ne fonctionne pas.

Je sais c'est bizarre, je ne me l'explique pas non plus.
Cela dit, la variable etablissement n'est pas vide et renferme la valeur du champ du formulaire correctement formatée

[roots_man]

bizarre l'histoire de ton request.form qui ne fonctionne pas.. mais moi je ferais comme ca :

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
<% 
'PART1 
etablissement = request.QueryString("etablissement") 
 
Set ConGR = Server.CreateObject("ADODB.Connection")  
conGR.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../")&"/Databases/GR.mdb;" 
 
'PART2 
Sql="Select id From exploitation where AdminEtablissement='" & etablissement & "'" 
set rst = conGR.execute(sql)
 
'PART3 
do while not rst.eof 
	sId = rst("id") 
	sId = cLng(sId) 
	RequeteSQL = "Update Exploitation Set AdminEtablissement='"&etablissement&"' WHERE id= " & sId
	conGR.execute(sqlRequeteSQL)
rst.moveNext 
Loop%>

Pis t'es sur que tu n'a aucun message d'erreur ?? il t'affiche une page blanche ou koi ?

++

[pc75]

Bonjour,

Juste un petit commentaire :

Request.Form permet de récupérer les valeurs d'un formulaire via la méthode POST. Cad, un formulaire avec Action="Page2.asp" et un submit

Request.QueryString pour récupérer des valeurs passées par l'Url. Cad href="Mapage.asp?Val1=1&Val2=2 ...

Sinon, à la place de faire un

Code :

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

1
2
 
Rs.Open RequeteSQL , conGR

Essaie un truc du genre

Code :

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

1
2
 
conGR.Execute(RequeteSQL)

[yoda_style]

MAAAAAAAH,

ça ne peut pas marcher mon truc, si je me base sur la variable modifiée pour trouver mes id.

Code :

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

Sql="Select id From exploitation where AdminEtablissement='" & etablissement & "'"

Si la variable n'est pas modifiée en amont, il me trouve des id, mais update la même valeur. Par contre, si la variable à été modifiée, il ne trouve pas d'id et par conséquent n'update pas


HUM,

Comment je peux faire maintenant ?

[yoda_style]

:trouve:

Merci, mais j'ai trouvé, c'était bien ça. J'ai mis en champs caché la valeur établissement et je me base sur elle pour chercher mes id

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
<%
etablissement = request.QueryString("etablissement")
etablissement_cache = request.QueryString("etablissement_cache")
 
Set ConGR = Server.CreateObject("ADODB.Connection")
Set rst = Server.CreateObject("ADODB.Recordset")
Set Rs = Server.CreateObject("ADODB.Recordset")
 
conGR.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../")&"/Databases/GR.mdb;"
 
Sql="Select id From exploitation where AdminEtablissement='" & etablissement_cache & "'"
rst.Open Sql, ConGR, 3, 3
 
while not rst.eof
	  			response.Write(rst("id")&",")
				sId = rst("id")
				sId = cLng(sId)
				RequeteSQL = "Update Exploitation Set AdminEtablissement='"&etablissement&"' WHERE id= "&sId&";"
				Rs.Open RequeteSQL , conGR
			rst.moveNext
			  wend%>

Merci à vous