Discussion :

[julien_33]

Bonjour,

j'utilise des requêtes paramétrées pour interagir avec SQL Server. J'utilise une interface pour récupérer mes données utilisateur mais certains champs peuvent rester vide. Ces dits-champs sont bien en facultatif dans la base de données.

Cependant lors de l'exécution de ma requète, j'ai une erreur de conversion de type de données car j'ai laissé un champs vide. Commentpuis-je le gérer ?
Faut-il que je crée une requête pour chaque cas de figure ?

Merci d'avance pour votre aide

Voici le code utilisé :

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
 
req3 = "INSERT INTO T_TestErgo (Date, Temps500, Temps1000, Temps1500, Temps2000, Watts, NumRameur, TempsGeneral, CadenceMoy, TempsMoy) VALUES (@Date, @Temps500, @Temps1000, @Temps1500, @Temps2000, @Watts, @NumRameur, @TempsGene, @Cadence, @TempsMoy)"
 
Using query1 As New SqlCommand(req3, Maconnexion)
                    query1.Parameters.Add("@NumRameur", SqlDbType.Int).Value = NumRameur
                    query1.Parameters.Add("@Date", SqlDbType.Date).Value = DateTest.Text
                    query1.Parameters.Add("@Temps500", SqlDbType.Time).Value = TxtErgo500.Text
                    query1.Parameters.Add("@Temps1000", SqlDbType.Time).Value = TxtErgo1000.Text
                    query1.Parameters.Add("@Temps1500", SqlDbType.Time).Value = TxtErgo1500.Text
                    query1.Parameters.Add("@Temps2000", SqlDbType.Time).Value = TxtErgo2000.Text
                    query1.Parameters.Add("@TempsMoy", SqlDbType.Time).Value = TxtErgoTempsMoy.Text
                    query1.Parameters.Add("@TempsGene", SqlDbType.Time).Value = TxtErgoTemps.Text
                    query1.Parameters.Add("@Watts", SqlDbType.Int).Value = TxtErgoWatts.Text
                    query1.Parameters.Add("@Cadence", SqlDbType.Int).Value = TxtErgoCadence.Text
                    If query1.ExecuteNonQuery() Then
                        MsgBox("Les données ont bien été ajoutée", MsgBoxStyle.Information, "Status")
                    Else
                        MsgBox("Les données n'ont pas pu être ajoutée", MsgBoxStyle.Critical, "Status")
                    End If
                End Using

[dkmix]

Bonjour,

query1.Parameters.Add("@Date", SqlDbType.Date).Value = DateTest.Text

L'erreur ne viendrait pas de là ? dateTime != text
ou de la :

query1.Parameters.Add("@Watts", SqlDbType.Int).Value = TxtErgoWatts.Text
query1.Parameters.Add("@Cadence", SqlDbType.Int).Value = TxtErgoCadence.Text

int != text

quelquechose comme ceci devrait aider :

Code :

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

1
2
3
 
query1.Parameters.Add("@Watts", SqlDbType.Int).Value =String.IsNullOrEmpty(TxtErgoWatts.Text)?0:Int.Parse(TxtErgoWatts.Text)
query1.Parameters.Add("@Cadence", SqlDbType.Int).Value =String.IsNullOrEmpty(TxtErgoCadence.Text)?0:Int.Parse(TxtErgoCadence.Text)

[julien_33]

Bonsoir,

Je te remercie pour ta réponse. Je pense que tu as raison, car mon message d'erreur est un message de problème de conversion de genre mais uniquement si le champs de saisie est vide sinon ca ne pose pas de problème vu qu'il y a une valeur dans la propriété .text correspondant au type du champs de la base SQL.

Par contre, j'ai essayé d'intégrer le code que tu m'as donné il n'accepte pas le ?
As tu une idée de ce qui lui déplait ?

Merci d'avance pour ton aide

[Pol63]

il t'a mis du c#, il y a des convertisseurs vers vb.net sur le net
le ? équivaut au iif(condition, true value, false value)

si tu veux mettre NULL dans sql server, il faut mettre system.dbnull.value dans le value du parameter

[julien_33]

Bonjour,

Cela fonctionne correctement. Merci à tous les deux pour votre aide.