Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement ASP.Net Insertion valeur NULL lors d'une requete d'insert ou d'update

Insertion valeur NULL lors d'une requete d'insert ou d'update

6 réponses
Avatar
Thibault
Bonsoir à tous,

J'aimerais savoir comment insérer la valeur NULL lors d'une requete d'insert
ou d'update en vb.net ? Quelle est la synthaxe a utiliser ?

Merci
Signaler un problème avec ce contenu

6 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Mitsuru FURUTA [Ms]
Bonsoir,

La valeur à utiliser est: DBNull.Value.
Avec un paramètre ça donne donc par exemple:
command.Parameters("@field").Value = DBNull.Value

Bonne continuation,

--
Mitsuru FURUTA [Microsoft FRANCE]
mailto://
http://blogs.microsoft.fr/mitsufu/

Rencontres Accès aux données en janvier 2005:
http://www.microsoft.com/france/msdn/donnees/default.mspx


"Thibault" wrote in message
news:
Bonsoir à tous,

J'aimerais savoir comment insérer la valeur NULL lors d'une requete


d'insert
ou d'update en vb.net ? Quelle est la synthaxe a utiliser ?

Merci




Avatar
Thibault
Ca ne fonctionne pas, il me dit que :

Une valeur de type 'System.DBNull' ne peut pas être convertie en 'Date'

Voici mon code :

Dim mTickDtRelance As DateTime =
CType(TICK_DT_RELANCE.FindControl("myTextbox"), TextBox).Text
Dim mTickDtButoir As DateTime =
CType(TICK_DT_BUTOIR.FindControl("myTextbox"), TextBox).Text

If mTickDtRelance = "" Then
mTickDtRelance = DBNull.Value
End If

If mTickDtButoir = "" Then
mTickDtButoir = DBNull.Value
End If

Et en fait les deux variables sont destnées à ma requête.

Comment faire ?

"Mitsuru FURUTA [Ms]" wrote:

Bonsoir,

La valeur à utiliser est: DBNull.Value.
Avec un paramètre ça donne donc par exemple:
command.Parameters("@field").Value = DBNull.Value

Bonne continuation,

--
Mitsuru FURUTA [Microsoft FRANCE]
mailto://
http://blogs.microsoft.fr/mitsufu/

Rencontres Accès aux données en janvier 2005:
http://www.microsoft.com/france/msdn/donnees/default.mspx


"Thibault" wrote in message
news:
> Bonsoir à tous,
>
> J'aimerais savoir comment insérer la valeur NULL lors d'une requete
d'insert
> ou d'update en vb.net ? Quelle est la synthaxe a utiliser ?
>
> Merci
>
>





Avatar
Thibault
Voici mon code ça peut peut-être vous aider a comprendre ce que je souhaite
faire

Voici mon code, ça peut éventuellement vous aider a comprendre ce que je
souhaite faire :

Dim mTickDemandeur As String =
CType(TICK_DEMANDEUR.FindControl("myTextbox"), TextBox).Text
Dim mUtilLogin As String = "tlr"
Dim mCompteClientCompta As String =
CType(COMPTE_CLIENT_COMPTA.FindControl("myTextbox"), TextBox).Text
Dim mMode As String = Request.Form("DropDownListMode")
Dim mTickDtCreation As String =
CType(TICK_DT_CREATION.FindControl("myTextbox"), TextBox).Text
Dim mTickObjet As String = CType(TICK_OBJET.FindControl("myTextbox"),
TextBox).Text
Dim mTickDescription As String =
CType(TICK_DESCRIPTION.FindControl("myTextboxMultiLine"), TextBox).Text
Dim mTickReponse As String =
CType(TICK_REPONSE.FindControl("myTextboxMultiLine"), TextBox).Text
Dim mTickDtRelance As DateTime =
CType(TICK_DT_RELANCE.FindControl("myTextbox"), TextBox).Text
Dim mTickDtButoir As DateTime =
CType(TICK_DT_BUTOIR.FindControl("myTextbox"), TextBox).Text

If mTickDtRelance = "" Then
mTickDtRelance = DBNull.Value <============ Valeur NULL a insérer (Cette
synthaxe ne fonctionne pas)
End If

If mTickDtButoir = "" Then
mTickDtButoir = DBNull.Value <============ Valeur NULL a insérer (Cette
synthaxe ne fonctionne pas)
End If

'Récupération de ma chaine de connexion
Dim strConnect As String =
ConfigurationSettings.AppSettings("CONNEXION_LOGISTICIEL")

'Ouverture d'une connexion
Dim mConn As New SqlConnection(strConnect)
mConn.Open()

'Creation de mon objet command
Dim mCmd As New SqlCommand

'Assignation de ma propriété connection a mon objet command
mCmd.Connection = mConn

'Creation d'une transaction
Dim mTrans As SqlTransaction

'Début de la transaction
mTrans = mConn.BeginTransaction

'Assignez l'objet de transaction pour une transaction locale en suspens
mCmd.Transaction = mTrans

Try

'Définition de la commande d'insertion
mCmd.CommandText = "INSERT INTO TICKET_TICK(UTIL_LOGIN, TAC_ID,
OPE_CODE, TICK_DT_CREATION, TICK_DEMANDEUR, COMPTE_CLIENT_COMPTA, TICK_MODE,
TICK_OBJET, TICK_DESCRIPTION, TICK_REPONSE, TICK_DT_RELANCE, TICK_DT_BUTOIR)
VALUES ('" & mUtilLogin & "', NULL,'INT211','" & mTickDtCreation & "','" &
mTickDemandeur & "','" & mCompteClientCompta & "','" & mMode & "','" &
Replace(mTickObjet, "'", "''") & "','" & Replace(mTickDescription, "'", "''")
& "','" & Replace(mTickReponse, "'", "''") & "','" & mTickDtRelance & "','" &
mTickDtButoir & "')"

mCmd.ExecuteNonQuery()

mTrans.Commit()

Catch ex As Exception

mTrans.Rollback()
'Affichage du détail de l'erreur
outError.Text = "<b>Message d'erreur : </b>" & ex.Message & "<br><br>"
outError.Text &= "<b>Source de l'erreur : </b>" & ex.Source & "<br><br>"
outError.Text &= "<b>Trace de l'erreur : </b>" & ex.StackTrace &
"<br><br>"

Finally

mConn.Close()

Response.Write("<body><script>window.opener.location.href='Tickets.aspx';window.close();</script></body>")

End Try





"Mitsuru FURUTA [Ms]" wrote:

Bonsoir,

La valeur à utiliser est: DBNull.Value.
Avec un paramètre ça donne donc par exemple:
command.Parameters("@field").Value = DBNull.Value

Bonne continuation,

--
Mitsuru FURUTA [Microsoft FRANCE]
mailto://
http://blogs.microsoft.fr/mitsufu/

Rencontres Accès aux données en janvier 2005:
http://www.microsoft.com/france/msdn/donnees/default.mspx


"Thibault" wrote in message
news:
> Bonsoir à tous,
>
> J'aimerais savoir comment insérer la valeur NULL lors d'une requete
d'insert
> ou d'update en vb.net ? Quelle est la synthaxe a utiliser ?
>
> Merci
>
>





Avatar
Joël Descombes
Pourquoi ne pas faire quelque chose comme : IIF( mTickDtRelance = "", "NULL",
mTickDtRelance ) , directement dans ta requete INSERT ?
ça serait plus simple et plus efficace je crois. System.DbNull est utile si
on utilise des parametres, ce qui n'est pas ton cas.

Joël Descombes
MCAD.Net

"Thibault" wrote:

Voici mon code ça peut peut-être vous aider a comprendre ce que je souhaite
faire

Voici mon code, ça peut éventuellement vous aider a comprendre ce que je
souhaite faire :

Dim mTickDemandeur As String =
CType(TICK_DEMANDEUR.FindControl("myTextbox"), TextBox).Text
Dim mUtilLogin As String = "tlr"
Dim mCompteClientCompta As String =
CType(COMPTE_CLIENT_COMPTA.FindControl("myTextbox"), TextBox).Text
Dim mMode As String = Request.Form("DropDownListMode")
Dim mTickDtCreation As String =
CType(TICK_DT_CREATION.FindControl("myTextbox"), TextBox).Text
Dim mTickObjet As String = CType(TICK_OBJET.FindControl("myTextbox"),
TextBox).Text
Dim mTickDescription As String =
CType(TICK_DESCRIPTION.FindControl("myTextboxMultiLine"), TextBox).Text
Dim mTickReponse As String =
CType(TICK_REPONSE.FindControl("myTextboxMultiLine"), TextBox).Text
Dim mTickDtRelance As DateTime =
CType(TICK_DT_RELANCE.FindControl("myTextbox"), TextBox).Text
Dim mTickDtButoir As DateTime =
CType(TICK_DT_BUTOIR.FindControl("myTextbox"), TextBox).Text

If mTickDtRelance = "" Then
mTickDtRelance = DBNull.Value <============ Valeur NULL a insérer (Cette
synthaxe ne fonctionne pas)
End If

If mTickDtButoir = "" Then
mTickDtButoir = DBNull.Value <============ Valeur NULL a insérer (Cette
synthaxe ne fonctionne pas)
End If

'Récupération de ma chaine de connexion
Dim strConnect As String =
ConfigurationSettings.AppSettings("CONNEXION_LOGISTICIEL")

'Ouverture d'une connexion
Dim mConn As New SqlConnection(strConnect)
mConn.Open()

'Creation de mon objet command
Dim mCmd As New SqlCommand

'Assignation de ma propriété connection a mon objet command
mCmd.Connection = mConn

'Creation d'une transaction
Dim mTrans As SqlTransaction

'Début de la transaction
mTrans = mConn.BeginTransaction

'Assignez l'objet de transaction pour une transaction locale en suspens
mCmd.Transaction = mTrans

Try

'Définition de la commande d'insertion
mCmd.CommandText = "INSERT INTO TICKET_TICK(UTIL_LOGIN, TAC_ID,
OPE_CODE, TICK_DT_CREATION, TICK_DEMANDEUR, COMPTE_CLIENT_COMPTA, TICK_MODE,
TICK_OBJET, TICK_DESCRIPTION, TICK_REPONSE, TICK_DT_RELANCE, TICK_DT_BUTOIR)
VALUES ('" & mUtilLogin & "', NULL,'INT211','" & mTickDtCreation & "','" &
mTickDemandeur & "','" & mCompteClientCompta & "','" & mMode & "','" &
Replace(mTickObjet, "'", "''") & "','" & Replace(mTickDescription, "'", "''")
& "','" & Replace(mTickReponse, "'", "''") & "','" & mTickDtRelance & "','" &
mTickDtButoir & "')"

mCmd.ExecuteNonQuery()

mTrans.Commit()

Catch ex As Exception

mTrans.Rollback()
'Affichage du détail de l'erreur
outError.Text = "<b>Message d'erreur : </b>" & ex.Message & "<br><br>"
outError.Text &= "<b>Source de l'erreur : </b>" & ex.Source & "<br><br>"
outError.Text &= "<b>Trace de l'erreur : </b>" & ex.StackTrace &
"<br><br>"

Finally

mConn.Close()

Response.Write("<body><script>window.opener.location.href='Tickets.aspx';window.close();</script></body>")

End Try





"Mitsuru FURUTA [Ms]" wrote:

> Bonsoir,
>
> La valeur à utiliser est: DBNull.Value.
> Avec un paramètre ça donne donc par exemple:
> command.Parameters("@field").Value = DBNull.Value
>
> Bonne continuation,
>
> --
> Mitsuru FURUTA [Microsoft FRANCE]
> mailto://
> http://blogs.microsoft.fr/mitsufu/
>
> Rencontres Accès aux données en janvier 2005:
> http://www.microsoft.com/france/msdn/donnees/default.mspx
>
>
> "Thibault" wrote in message
> news:
> > Bonsoir à tous,
> >
> > J'aimerais savoir comment insérer la valeur NULL lors d'une requete
> d'insert
> > ou d'update en vb.net ? Quelle est la synthaxe a utiliser ?
> >
> > Merci
> >
> >
>
>
>


Avatar
Mitsuru FURUTA [Ms]
Bonjour,

Ok, je vois ton problème, il me manquait quelques lignes de code...
La ligne qui ne va pas est la suivante:

mCmd.CommandText = "INSERT INTO TICKET_TICK(UTIL_LOGIN, TAC_ID,
OPE_CODE, TICK_DT_CREATION, TICK_DEMANDEUR, COMPTE_CLIENT_COMPTA,


TICK_MODE,
TICK_OBJET, TICK_DESCRIPTION, TICK_REPONSE, TICK_DT_RELANCE,


TICK_DT_BUTOIR)
VALUES ('" & mUtilLogin & "', NULL,'INT211','" & mTickDtCreation & "','" &
mTickDemandeur & "','" & mCompteClientCompta & "','" & mMode & "','" &
Replace(mTickObjet, "'", "''") & "','" & Replace(mTickDescription, "'",


"''")
& "','" & Replace(mTickReponse, "'", "''") & "','" & mTickDtRelance &


"','" &
mTickDtButoir & "')"



Il faut absolument éviter de construire ses requêtes SQL par concaténation
!!!

La classe Command contient une collection "Parameters" qui apporte beaucoup
d'avantages:

La requête ne contient plus de concaténation (&) mais des paramètres comme
ceci:

mCmd.CommandText = "INSERT INTO TICKET_TICK(UTIL_LOGIN, TAC_ID,
OPE_CODE, TICK_DT_CREATION, TICK_DEMANDEUR, COMPTE_CLIENT_COMPTA,
TICK_MODE,
TICK_OBJET, TICK_DESCRIPTION, TICK_REPONSE, TICK_DT_RELANCE,
TICK_DT_BUTOIR)
VALUES ('@mUtilLogin',
NULL,'INT211','@mTickDtCreation','@mTickDemandeur','@mCompteClientCompta'...
)"

Il faudra ensuite que tu crées les paramètres que tu peux typer ! :
mCmd.Parameters.Add("@mUtilLogin", type)
et ensuite passer les valeurs: mCmd.Parameters("@mUtilLogin").Value mUtilLogin
mCmd.Parameters("@mUtilLogin").Value accepte la valeur DBNull.Value.

L'avantage est que tu ne t'occupes pas du formattage de la valeur. En plus
toute attaque par injection sql est impossible.

Bonne continuation,

--
Mitsuru FURUTA [Microsoft FRANCE]
mailto://
http://blogs.microsoft.fr/mitsufu/

Rencontres Accès aux données en janvier 2005:
http://www.microsoft.com/france/msdn/donnees/default.mspx





"Thibault" wrote in message
news:
Voici mon code ça peut peut-être vous aider a comprendre ce que je


souhaite
faire

Voici mon code, ça peut éventuellement vous aider a comprendre ce que je
souhaite faire :

Dim mTickDemandeur As String > CType(TICK_DEMANDEUR.FindControl("myTextbox"), TextBox).Text
Dim mUtilLogin As String = "tlr"
Dim mCompteClientCompta As String > CType(COMPTE_CLIENT_COMPTA.FindControl("myTextbox"), TextBox).Text
Dim mMode As String = Request.Form("DropDownListMode")
Dim mTickDtCreation As String > CType(TICK_DT_CREATION.FindControl("myTextbox"), TextBox).Text
Dim mTickObjet As String = CType(TICK_OBJET.FindControl("myTextbox"),
TextBox).Text
Dim mTickDescription As String > CType(TICK_DESCRIPTION.FindControl("myTextboxMultiLine"), TextBox).Text
Dim mTickReponse As String > CType(TICK_REPONSE.FindControl("myTextboxMultiLine"), TextBox).Text
Dim mTickDtRelance As DateTime > CType(TICK_DT_RELANCE.FindControl("myTextbox"), TextBox).Text
Dim mTickDtButoir As DateTime > CType(TICK_DT_BUTOIR.FindControl("myTextbox"), TextBox).Text

If mTickDtRelance = "" Then
mTickDtRelance = DBNull.Value <============ Valeur NULL a insérer


(Cette
synthaxe ne fonctionne pas)
End If

If mTickDtButoir = "" Then
mTickDtButoir = DBNull.Value <============ Valeur NULL a insérer


(Cette
synthaxe ne fonctionne pas)
End If

'Récupération de ma chaine de connexion
Dim strConnect As String > ConfigurationSettings.AppSettings("CONNEXION_LOGISTICIEL")

'Ouverture d'une connexion
Dim mConn As New SqlConnection(strConnect)
mConn.Open()

'Creation de mon objet command
Dim mCmd As New SqlCommand

'Assignation de ma propriété connection a mon objet command
mCmd.Connection = mConn

'Creation d'une transaction
Dim mTrans As SqlTransaction

'Début de la transaction
mTrans = mConn.BeginTransaction

'Assignez l'objet de transaction pour une transaction locale en suspens
mCmd.Transaction = mTrans

Try

'Définition de la commande d'insertion
mCmd.CommandText = "INSERT INTO TICKET_TICK(UTIL_LOGIN, TAC_ID,
OPE_CODE, TICK_DT_CREATION, TICK_DEMANDEUR, COMPTE_CLIENT_COMPTA,


TICK_MODE,
TICK_OBJET, TICK_DESCRIPTION, TICK_REPONSE, TICK_DT_RELANCE,


TICK_DT_BUTOIR)
VALUES ('" & mUtilLogin & "', NULL,'INT211','" & mTickDtCreation & "','" &
mTickDemandeur & "','" & mCompteClientCompta & "','" & mMode & "','" &
Replace(mTickObjet, "'", "''") & "','" & Replace(mTickDescription, "'",


"''")
& "','" & Replace(mTickReponse, "'", "''") & "','" & mTickDtRelance &


"','" &
mTickDtButoir & "')"

mCmd.ExecuteNonQuery()

mTrans.Commit()

Catch ex As Exception

mTrans.Rollback()
'Affichage du détail de l'erreur
outError.Text = "<b>Message d'erreur : </b>" & ex.Message & "<br><br>"
outError.Text &= "<b>Source de l'erreur : </b>" & ex.Source &


"<br><br>"
outError.Text &= "<b>Trace de l'erreur : </b>" & ex.StackTrace &
"<br><br>"

Finally

mConn.Close()




Response.Write("<body><script>window.opener.location.href='Tickets.aspx';win
dow.close();</script></body>")

End Try





"Mitsuru FURUTA [Ms]" wrote:

> Bonsoir,
>
> La valeur à utiliser est: DBNull.Value.
> Avec un paramètre ça donne donc par exemple:
> command.Parameters("@field").Value = DBNull.Value
>
> Bonne continuation,
>
> --
> Mitsuru FURUTA [Microsoft FRANCE]
> mailto://
> http://blogs.microsoft.fr/mitsufu/
>
> Rencontres Accès aux données en janvier 2005:
> http://www.microsoft.com/france/msdn/donnees/default.mspx
>
>
> "Thibault" wrote in message
> news:
> > Bonsoir à tous,
> >
> > J'aimerais savoir comment insérer la valeur NULL lors d'une requete
> d'insert
> > ou d'update en vb.net ? Quelle est la synthaxe a utiliser ?
> >
> > Merci
> >
> >
>
>
>


Avatar
Thibault
Bonjour et merci pour votre réponse, étant pris par le temps j'ai fait
différement au moyen d'une procédure stockée mais je garde précieusement vos
informations car elles peuvent me servir par la suite.

"Mitsuru FURUTA [Ms]" a écrit :

Bonjour,

Ok, je vois ton problème, il me manquait quelques lignes de code...
La ligne qui ne va pas est la suivante:

> mCmd.CommandText = "INSERT INTO TICKET_TICK(UTIL_LOGIN, TAC_ID,
> OPE_CODE, TICK_DT_CREATION, TICK_DEMANDEUR, COMPTE_CLIENT_COMPTA,
TICK_MODE,
> TICK_OBJET, TICK_DESCRIPTION, TICK_REPONSE, TICK_DT_RELANCE,
TICK_DT_BUTOIR)
> VALUES ('" & mUtilLogin & "', NULL,'INT211','" & mTickDtCreation & "','" &
> mTickDemandeur & "','" & mCompteClientCompta & "','" & mMode & "','" &
> Replace(mTickObjet, "'", "''") & "','" & Replace(mTickDescription, "'",
"''")
> & "','" & Replace(mTickReponse, "'", "''") & "','" & mTickDtRelance &
"','" &
> mTickDtButoir & "')"

Il faut absolument éviter de construire ses requêtes SQL par concaténation
!!!

La classe Command contient une collection "Parameters" qui apporte beaucoup
d'avantages:

La requête ne contient plus de concaténation (&) mais des paramètres comme
ceci:

mCmd.CommandText = "INSERT INTO TICKET_TICK(UTIL_LOGIN, TAC_ID,
OPE_CODE, TICK_DT_CREATION, TICK_DEMANDEUR, COMPTE_CLIENT_COMPTA,
TICK_MODE,
TICK_OBJET, TICK_DESCRIPTION, TICK_REPONSE, TICK_DT_RELANCE,
TICK_DT_BUTOIR)
VALUES ('@mUtilLogin',
NULL,'INT211','@mTickDtCreation','@mTickDemandeur','@mCompteClientCompta'...
)"

Il faudra ensuite que tu crées les paramètres que tu peux typer ! :
mCmd.Parameters.Add("@mUtilLogin", type)
et ensuite passer les valeurs: mCmd.Parameters("@mUtilLogin").Value > mUtilLogin
mCmd.Parameters("@mUtilLogin").Value accepte la valeur DBNull.Value.

L'avantage est que tu ne t'occupes pas du formattage de la valeur. En plus
toute attaque par injection sql est impossible.

Bonne continuation,

--
Mitsuru FURUTA [Microsoft FRANCE]
mailto://
http://blogs.microsoft.fr/mitsufu/

Rencontres Accès aux données en janvier 2005:
http://www.microsoft.com/france/msdn/donnees/default.mspx





"Thibault" wrote in message
news:
> Voici mon code ça peut peut-être vous aider a comprendre ce que je
souhaite
> faire
>
> Voici mon code, ça peut éventuellement vous aider a comprendre ce que je
> souhaite faire :
>
> Dim mTickDemandeur As String > > CType(TICK_DEMANDEUR.FindControl("myTextbox"), TextBox).Text
> Dim mUtilLogin As String = "tlr"
> Dim mCompteClientCompta As String > > CType(COMPTE_CLIENT_COMPTA.FindControl("myTextbox"), TextBox).Text
> Dim mMode As String = Request.Form("DropDownListMode")
> Dim mTickDtCreation As String > > CType(TICK_DT_CREATION.FindControl("myTextbox"), TextBox).Text
> Dim mTickObjet As String = CType(TICK_OBJET.FindControl("myTextbox"),
> TextBox).Text
> Dim mTickDescription As String > > CType(TICK_DESCRIPTION.FindControl("myTextboxMultiLine"), TextBox).Text
> Dim mTickReponse As String > > CType(TICK_REPONSE.FindControl("myTextboxMultiLine"), TextBox).Text
> Dim mTickDtRelance As DateTime > > CType(TICK_DT_RELANCE.FindControl("myTextbox"), TextBox).Text
> Dim mTickDtButoir As DateTime > > CType(TICK_DT_BUTOIR.FindControl("myTextbox"), TextBox).Text
>
> If mTickDtRelance = "" Then
> mTickDtRelance = DBNull.Value <============ Valeur NULL a insérer
(Cette
> synthaxe ne fonctionne pas)
> End If
>
> If mTickDtButoir = "" Then
> mTickDtButoir = DBNull.Value <============ Valeur NULL a insérer
(Cette
> synthaxe ne fonctionne pas)
> End If
>
> 'Récupération de ma chaine de connexion
> Dim strConnect As String > > ConfigurationSettings.AppSettings("CONNEXION_LOGISTICIEL")
>
> 'Ouverture d'une connexion
> Dim mConn As New SqlConnection(strConnect)
> mConn.Open()
>
> 'Creation de mon objet command
> Dim mCmd As New SqlCommand
>
> 'Assignation de ma propriété connection a mon objet command
> mCmd.Connection = mConn
>
> 'Creation d'une transaction
> Dim mTrans As SqlTransaction
>
> 'Début de la transaction
> mTrans = mConn.BeginTransaction
>
> 'Assignez l'objet de transaction pour une transaction locale en suspens
> mCmd.Transaction = mTrans
>
> Try
>
> 'Définition de la commande d'insertion
> mCmd.CommandText = "INSERT INTO TICKET_TICK(UTIL_LOGIN, TAC_ID,
> OPE_CODE, TICK_DT_CREATION, TICK_DEMANDEUR, COMPTE_CLIENT_COMPTA,
TICK_MODE,
> TICK_OBJET, TICK_DESCRIPTION, TICK_REPONSE, TICK_DT_RELANCE,
TICK_DT_BUTOIR)
> VALUES ('" & mUtilLogin & "', NULL,'INT211','" & mTickDtCreation & "','" &
> mTickDemandeur & "','" & mCompteClientCompta & "','" & mMode & "','" &
> Replace(mTickObjet, "'", "''") & "','" & Replace(mTickDescription, "'",
"''")
> & "','" & Replace(mTickReponse, "'", "''") & "','" & mTickDtRelance &
"','" &
> mTickDtButoir & "')"
>
> mCmd.ExecuteNonQuery()
>
> mTrans.Commit()
>
> Catch ex As Exception
>
> mTrans.Rollback()
> 'Affichage du détail de l'erreur
> outError.Text = "<b>Message d'erreur : </b>" & ex.Message & "<br><br>"
> outError.Text &= "<b>Source de l'erreur : </b>" & ex.Source &
"<br><br>"
> outError.Text &= "<b>Trace de l'erreur : </b>" & ex.StackTrace &
> "<br><br>"
>
> Finally
>
> mConn.Close()
>
>
Response.Write("<body><script>window.opener.location.href='Tickets.aspx';win
dow.close();</script></body>")
>
> End Try
>
>
>
>
>
> "Mitsuru FURUTA [Ms]" wrote:
>
> > Bonsoir,
> >
> > La valeur à utiliser est: DBNull.Value.
> > Avec un paramètre ça donne donc par exemple:
> > command.Parameters("@field").Value = DBNull.Value
> >
> > Bonne continuation,
> >
> > --
> > Mitsuru FURUTA [Microsoft FRANCE]
> > mailto://
> > http://blogs.microsoft.fr/mitsufu/
> >
> > Rencontres Accès aux données en janvier 2005:
> > http://www.microsoft.com/france/msdn/donnees/default.mspx
> >
> >
> > "Thibault" wrote in message
> > news:
> > > Bonsoir à tous,
> > >
> > > J'aimerais savoir comment insérer la valeur NULL lors d'une requete
> > d'insert
> > > ou d'update en vb.net ? Quelle est la synthaxe a utiliser ?
> > >
> > > Merci
> > >
> > >
> >
> >
> >