Discussion :

[Webman]

Bonjour,

Par le biais d'un formulaire les utilisateurs rentrent des données dans une base SQL Server. Ils peuvent aussi par ce même formulaire uploader des fichiers sur le serveur. Mon problème se situe dans la gestion de ces fichiers. En effet quand un utilisateur rentre des infos elles sont stockées par fiches avec un identifiant unique qui est une clé primaire. Je voudrais renommer le fichier qui est uploadé avec ce formuaire avec le numéro identifiant de la fiche à laquelle il est associé. Ainsi si l'utilsiateur crée la fiche 255 et bien le fichier qu'il a uploadé sera renommé 255.doc

En fait là où j'ai besoin de vous c'est de savoir comment récupérer l'identifiant qui est associé à l'enregistrement que je crée car l'opération de création de la fiche et d'upload du fichier se réalise en une seule fois...
Est-ce que je suis obligé de passer par une procédure stockée pour retourner cette valeur (l'identifiant de la fiche crée) ou y a t'il une autre solution ?

Merci par avance de votre aide !

PS: Si je n'ai pas été clair n'hésitez pas à demander des précisions

[Keihilin]

Tu n'est pas obligé de passer par une procédure stockée...

Avec SQL Server, tu peux faire :

Code :

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

1
2
 
SELECT   Ident_Current('tableName')

Cette requête te renvoit le dernier Id automatique insérer dans une table...

Sinon, tu peux aussi utiliser

Code :

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

1
2
 
SELECT   @@Identity

qui va te renvoyer le dernier Id auto généré au niveau de la base.

Tu peux utiliser l'une ou l'autre de ces requête juste après ton insert, mais attention, si tu n'es pas dans une transaction, tu n'as pas la garantie que la veleur retournée soit effectivement celle que tu souhaites traiter...un autre insert peut s'intercaller...

[Webman]

Ok merci beaucoup c'est nickel ! Dans un premier temps ca va me premettre de me passer de la procédure stockée qui est plus lourde à mettre en oeuvre... De toute façon la probailité que deux enregistrement soient crées au même moment est proche de zéro... sachant qu'il n'y aura pas plus de 5 utilisateurs...

Une fois que j'aurais fini le reste je me mettrais en place la procédure stockée et la gestion de transactions ca sera quand même plus "propre" et plus robuste !

Encore une petit question, les fonctions que tu m'a donné vont bien me renvoyer la clé primaire (qui est un ID auto incrémenté par SQL Server) de mon enregistrement crée ? Et pas un identifiant propre à SQL Server ?

Merci encore de ton aide et de ta réponse ultra rapide

[Webman]

C'est bon j'ai eu accès à mon serveur SQL Server et ca m'a permis de faire un test ca me renvoi bien la clé primaire c'est parfait

Encore merci
Webman

[Webman]

J'ai encore une question suite à un problème qui se pose dans la récup de cet ID.

Quel est le type de la donnée renvoyée par cette requete ? Car j'essaye de la récupérer aprés la requete et ca plante...

Voilà le code qui pose problème:

Code :

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

1
2
3
4
5
6
 
Dim DS2 As SQLDataReader = maRequete2.ExecuteReader()
 
     do while (DS2.Read())
            ID = DS2.GetString(0)
     loop

Voilà l'erreur:

Code :

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

System.InvalidCastException: Specified cast is not valid.

Et voilà la requête:

Code :

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

maRequete2 = New SQLCommand("SELECT Ident_Current('Courrier')", maConnexionSQLsrv2)

J'ai essyé GetString(0) mais c'est pareil... je ne comprends pas...

Webman

[Keihilin]

Essais d'utiliser ExecuteScalar au lieu de ton reader...

A priori, il devrait renvoyé un numeric.

[Webman]

Voilà le code complet de ma "fonction"... j'ai modifié avec ExecuteScalar, mais j'ai toujours la même erreur... voilà le code d'origine.

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
 
     Dim maConnexionSQLsrv2 As SQLConnection
     Dim maRequete2 As SQLCommand
     Dim ID As Integer
 
 
     Dim ConnexionSQL2 As String
     ConnexionSQL2 = ConfigurationSettings.AppSettings("ConnectionString")
     maConnexionSQLsrv2 = New SqlConnection(ConnexionSQL2)
 
     maRequete2 = New SQLCommand("SELECT Ident_Current('Courrier')", maConnexionSQLsrv2)
 
 
     maConnexionSQLsrv2.Open()
 
 
     Dim DS2 As SQLDataReader = maRequete2.ExecuteReader()
 
 
     do while (DS2.Read())
            ID = DS2.GetInt32(0)
     loop
 
 
     maConnexionSQLsrv2.Close()

[Johan31]

Effectivement Keihilin a raison...
Je te conseille pour faire simple de faire schématiquement et un peu en c# désolé...


string requeteAjout = "Insert ....... ; Select @@identity;";

puis

début transaction

try

Code :

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

int idGenere = Int32.Parse(maCommand.ExecuteScalar().ToString())

commit;
catch
rollback


ExecuteScalar renvoie un objet.

[Webman]

Je suis également tout à fait d'accord le problème est que je voudrais avoir un exemple fonctionnel avant de me lancer dans les transactions et tout ce qui va avec... C'est pour ca que cette solution me paraissait la meilleure pour le moment, je suis d'accord que c'est trés lourd et pas "propre" du tout !

[Johan31]

Ok pour les transcations mais je te donne aussi la soluce

remplace

Code :

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

1
2
3
4
5
6
 
Dim DS2 As SQLDataReader = maRequete2.ExecuteReader() 
 
     do while (DS2.Read()) 
            ID = DS2.GetInt32(0) 
     loop

par en c# toujours

Code :

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

int IdGENERE = Int32.Parse(maRequete2.ExecuteReader().ToString() );

où la requete de la commande et ton insertion + ";" + "select @@identity;" ou "SELECT Ident_Current('Courrier');" peu importe!

[Webman]

Merci beaucoup c'est trés sympa là je dois bosser sur un autre truc urgent mais d'ici moins d'une heure je suis de retour et je mets ca en pratique !!! Merci de ton aide

[Keihilin]

Essais avec cette petite modification :

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
 
 
Dim maConnexionSQLsrv2 As SQLConnection 
Dim maRequete2 As SQLCommand 
Dim ID As Integer 
 
Dim ConnexionSQL2 As String 
ConnexionSQL2 = ConfigurationSettings.AppSettings("ConnectionString") 
maConnexionSQLsrv2 = New SqlConnection(ConnexionSQL2) 
 
maRequete2 = New SQLCommand("SELECT Ident_Current('Courrier') AS Result", maConnexionSQLsrv2) 
 
 
maConnexionSQLsrv2.Open() 
 
Dim Result as Long = CType(maRequete2.ExecuteScalar(), long)
 
maConnexionSQLsrv2.Close()

[Webman]

Me voilà de retour, mais manque de chance le serveur de l'herbergeur où sont mes fichiers de tests vient de tomber... Donc pour le moment je n'ai accès qu'a mon serveur local mais qui ne contient pas les pages que je veux... Je teste ca dès que ca revient Merci à tous les deux pour votre aide ! avoir deux version c'est toujours plus agréable qu'une seule ! et puis ca me permet d'apprendre des techniques diverses Je vous tiens au courant quand à l'application de vos solutions.


Webman

[Webman]

Pour le moment le code de Keihilin fonctionne, j'ai une erreur avec celui de Johan:

Code :

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

1
2
3
4
5
6
7
8
Exception Details: System.FormatException: Input string was not in a correct format.
 
Source Error: 
Line 94:     
Line 95:     
Line 96:          Dim IdGENERE As Integer = Int32.Parse(maRequete2.ExecuteReader().ToString())
Line 97:     
Line 98:

Je vais essayer de voir si je trouve d'où va vient, j'ai surement du faire une erreur...

Voilà le code avec la solution de Johan:

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
 
     Dim maConnexionSQLsrv2 As SQLConnection
     Dim maRequete2 As SQLCommand
     Dim ID As Integer
 
     Dim ConnexionSQL2 As String
     ConnexionSQL2 = ConfigurationSettings.AppSettings("ConnectionString")
     maConnexionSQLsrv2 = New SqlConnection(ConnexionSQL2)
 
     maRequete2 = New SQLCommand("SELECT Ident_Current('Courrier')", maConnexionSQLsrv2)
 
     maConnexionSQLsrv2.Open()
 
 
     Dim IdGENERE As Integer = Int32.Parse(maRequete2.ExecuteReader().ToString())
 
 
     maConnexionSQLsrv2.Close()