Discussion :

[tibtibby]

bonjour,

Lorsque j'update un champs de ma base de données, en faisant un test sur les erreurs, le gestionnaire d'erreur m'indique une erreur, mais ma base est bien updatée !... savez vous ce que cette erreur signifie et comment la supprimer .?

voici mon code :

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
'on récupere les anciennes valeur
	Set RS = Server.CreateObject("ADODB.RecordSet")
	RS.CursorType = 2
	RS.LockType = 3
	sql = "select * from users where login ='" & trim(oldLogin) & "'"
	RS.Open sql, Session("objConn")
 
	oldName = trim(RS("user_name"))
	oldSurname = trim(RS("user_surname"))
 
 
	'récupération des nouvelles valeurs
	newLogin = trim(Request("newLogin"))
	newName = trim(Request("newName"))
	newSurname = trim(Request("newSurname"))
 
 
		'pour la surveillance d'erreur
		on error resume next
 
                if not oldLogin = newLogin then RS.Fields("login") = newLogin
		if not oldName = newName then RS.Fields("user_name") = newName
		if not oldSurname = newSurname then RS.Fields("user_surname") = newSurname
 
		RS.Update
		RS.Clone
 
		Set RS = nothing
 
		'Affichage de l'erreur
		If Err Then
				Response.Write "Erreur : " & Err.number & " -- " & Err.Description & "<br>"
				Response.Write "<a href=""modifUtil.asp"">retour</a><BR>"
		Else
			Response.Write  "Cet enregistrement a bien été ajouté<br>"
			Response.Write "<a href=""consulter.asp?utilisateurs=on&action=Consulter"">consulter</a>"
		End If
 
		on error goto 0

et l'erreur

Erreur : 3251 -- Le jeu d'enregistrements en cours ne prend pas en charge les signets. Il s'agit peut-être d'une limitation du fournisseur ou du type de curseur sélectionné.

[tibtibby]

hop ok, j'ai trouvé en relisant mon post... autant pour moi !!
j'ai mis RS.Clone au lieu de RS.Close .. saleté d'éditeur qui finit les mots tout seul