Update de la ligne X

**ekinoxe** · 19/01/2006, 15h39

Bonjour j'aurai aimé savoir si il était possible de faire un requete update a partir d'un numéro de ligne. J'ai un bout de code pour le début de ma requete mais des que j'arrive au "where" je voit pas trop comment faire

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
 
<% 'récupération de la valeur du bouton :
dim ligne : ligne= Request("ligne") %>
 
<body>
modification de la ligne n°<%=+ligne%><br><br>
il y a <%= request.form.count-1 %> champs <br>
	<% For each item in request.form 
		if item <> "BoutonValiderFormulaireModif" then %>
			<%=item%> à pour valeur : <%=request.form(item)%><br>
		<% end if %>
	<%next%>
 
<%'création de lobjet de connection 
	set objConn = server.CreateObject("ADODB.Connection")
	base = "DRIVER={SQL Server};" & "SERVER=;UID=sa; pwd=; DATABASE=QUALIPSO"
	objConn.Open base
	Req1 = "UPDATE testtable SET " 
	For each item in request.form 
		if item <> "BoutonValiderFormulaireModif" then
		Req2 = Req2 & item &" = "& request.form(item)&", "
		end if
	next
	Req = Req1 & Req2
	response.write "<br>"&Req
	set rs = server.CreateObject("ADODB.RecordSet")	
	on error resume next 
	rs.Open Reqp,objConn 
	rs.close 
	set rs = Nothing 
 
	if err then 
	    response.write err.description 
	end if 
 
	on error goto 0 
%>
</body>

d'avance merci

**Immobilis** · 19/01/2006, 22h53

Salut,

Normalement chacune de tes lignes devrait etre identifiée par un numéro "Auto", un identifiant. Ensuite, tu fais simplement :

Code :

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

connexion.execute "UPDATE matable SET () VALUES () WHERE monid = " & ID

A+

**ekinoxe** · 20/01/2006, 10h28

Je sais bien que chaque table est repérérer par un identifiant, seulement chaque table n'a pas le meme nom d'identifiant et il n'est pas au meme endroit. En fait l'utilisateur choisi d'abord sa table

TABLE 1
ID NOM Prenom
1 abv abvprenom
2 cdf cdfprenom
3 gft oznnbsq

TABLE 2
Num NOM Prenom
a1 abvsd ab2vprenom
b2 cdfq cd2fprenom
c3 gftrz o2znnbsq

ensuite quant l'utilisateur clique sur la deuxieme ligne, les donnée de cette ligne apparaissent dans un formulaire. Et une fois que l'on a changé ces donné et que l'on valide il faut mettre a jour seulement la ligne modifier. Le problème c'est que l'identifiant change entre les table donc je ne peut pas le fixer dans la requete

**Pymm** · 20/01/2006, 10h52

Salut,
Tu crées un chaine pour ta requete et pour les noms des champs tu les mets en fonction de la table sélectionnées

Code :

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

1
2
3
4
5
6
RSQL="update "  & Request.Form("TableSelect")
If Request.Form("TableSelect")="Table1" Then
   RSQL=RSQL & "..."
Else
   RSQL=RSQL & "..."
End If

**ekinoxe** · 20/01/2006, 10h59

Le problème c'est que si on rajoute une table il faut aussi remodifier le code pour rajouter une autre possibilité

voici mon code actuel

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
Req1 = "UPDATE ('"&table&"') SET " 
	on error resume next
	max= request.form.count-1
	j=0
	for each item in request.form 
		if j = max then
		Req2 = Req2 & item &" = '"&request.form(item)&"' "
		else
		Req2 = Req2 & item &" = '"&request.form(item)&"', "
		response.write j & max
		end if
		j=j+1
	next
		response.write "<br>"&req2&"<br>"
	Req3 = "where EmployeeID='1'"
	Req = Req1 & Req2 & Req3

le problème se trouve au niveau du WHERE
Il faudrait trouver un truc du genre "where 'cléprimaire'='valeurAvantModif'

**Pymm** · 20/01/2006, 11h58

Oui mais le problème existera toujours si pour la nouvelle table le nom du champ est différent.
Regarde au niveau des requetes système. Tu peux récupérer la liste de tes tables mais surement aussi la liste de tes champs pour une table donnée

Update de la ligne X

ASP

Discussions similaires

Partager

Partager