Bonjour,
Ma problématique actuelle :
Je voudrais connaitre le nombre d'enregistrements modifiés par un UPDATE.
Actuellement, je fais un select, qui me donne le nb à modifier, puis l'UPDATE.
On peut sûrement mieux faire.
Au fil de mes lectures sur le Net, j'ai découvert le SQL%ROWCOUNT qui s'utilise avec l'Insert, l'Update et le Delete.
À priori, cela correspondrait exactement à mes besoins.
Exemple sur le Net :
Problème : Je ne sais pas du tout comment coder cela en VBScript.SQL> -- Implicit cursors: SQL%ROWCOUNT returns number of rows affected by SQL statement.
SQL>
SQL> BEGIN
2 UPDATE employee
3 SET salary = salary *2
4 WHERE id = '01';
5
6 DBMS_OUTPUT.PUT_LINE(SQL%ROWCOUNT);
7
8 END;
9 /
Comment adapter mon code ?
Quelqu'un aurait-il essayé (avec succès ;+)) ce SQL%ROWCOUNT en VBScript ?
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 Option Explicit Dim StrConnexion, OConnexion Set oConnexion = CreateObject("ADODB.Connection") oConnexion.ConnectionTimeout = 30 'Spécifie maximum time (seconds ) for db opening oConnexion.CommandTimeout = 30 'Spécifie maximum time (seconds ) for a request Dim OResultat strConnexion = "Driver={Microsoft ODBC for Oracle}; ..." oConnexion.Open strConnexion ' --- OResultat = oConnexion.Execute("UPDATE MOV SET MOV.JOURNAL='ODG' INTO SQL%ROWCOUNT WHERE MOV.JOURNAL='ODG'") '--- MSGBOX OResultat OResultat = oConnexion.Execute("UPDATE MOV SET MOV.JOURNAL='ODG' WHERE MOV.JOURNAL='ODG'") oConnexion.Close
Grand merci d'avance pour ce coup de main.
Cordialement.
Gilles Cartairade
Partager