À partir d'une descrioption de projet, j'ai une programmation qui cré un
fichier dans un répertoire. À l'occasion, les utilisateurs introduise un
caractère qui n'est pas accepter comme nom de fichier. Ma programmation
ci-dessous détecte ces caractères, sauf le caractère " guillemet
Comment introduire le symbole " dans ma programmation comme les symboles
: < > * etc
If InStr(1, Me!txtDescription, "\") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre
projet. "")"
ElseIf InStr(1, Me!txtDescription, "/") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet
"")"
ElseIf InStr(1, Me!txtDescription, ":") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet
"")"
ElseIf InStr(1, Me!txtDescription, "*") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet
"")"
ElseIf InStr(1, Me!txtDescription, "?") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet
"")"
ElseIf InStr(1, Me!txtDescription, "/") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet
"")"
ElseIf InStr(1, Me!txtDescription, "<") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet
"")"
ElseIf InStr(1, Me!txtDescription, ">") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet
"")"
End If
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
Marc ROBY
Bonjour,
Utilisez [= Chr(34)] pour faire votre test sur le caractère ["] Bien cordialement à vous, -- Marc ROBY - CAPCODE Conseil http://www.capcode-conseil.fr/
"Robert Parise" a écrit dans le message de news: 2GFef.32005$
À partir d'une descrioption de projet, j'ai une programmation qui cré un fichier dans un répertoire. À l'occasion, les utilisateurs introduise un caractère qui n'est pas accepter comme nom de fichier. Ma programmation ci-dessous détecte ces caractères, sauf le caractère " guillemet
Comment introduire le symbole " dans ma programmation comme les symboles : < > * etc
If InStr(1, Me!txtDescription, "") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet. "")" ElseIf InStr(1, Me!txtDescription, "/") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" ElseIf InStr(1, Me!txtDescription, ":") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" ElseIf InStr(1, Me!txtDescription, "*") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" ElseIf InStr(1, Me!txtDescription, "?") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" ElseIf InStr(1, Me!txtDescription, "/") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" ElseIf InStr(1, Me!txtDescription, "<") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" ElseIf InStr(1, Me!txtDescription, ">") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" End If
Merci de votre aide
Robert
Bonjour,
Utilisez [= Chr(34)] pour faire votre test sur le caractère ["]
Bien cordialement à vous,
--
Marc ROBY - CAPCODE Conseil
http://www.capcode-conseil.fr/
"Robert Parise" <robert.parise@videotron.ca> a écrit dans le message de
news: 2GFef.32005$k96.954753@weber.videotron.net...
À partir d'une descrioption de projet, j'ai une programmation qui cré un
fichier dans un répertoire. À l'occasion, les utilisateurs introduise un
caractère qui n'est pas accepter comme nom de fichier. Ma programmation
ci-dessous détecte ces caractères, sauf le caractère " guillemet
Comment introduire le symbole " dans ma programmation comme les symboles
: < > * etc
If InStr(1, Me!txtDescription, "") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre
projet. "")"
ElseIf InStr(1, Me!txtDescription, "/") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre
projet "")"
ElseIf InStr(1, Me!txtDescription, ":") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre
projet "")"
ElseIf InStr(1, Me!txtDescription, "*") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre
projet "")"
ElseIf InStr(1, Me!txtDescription, "?") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre
projet "")"
ElseIf InStr(1, Me!txtDescription, "/") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre
projet "")"
ElseIf InStr(1, Me!txtDescription, "<") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre
projet "")"
ElseIf InStr(1, Me!txtDescription, ">") > 0 Then
Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre
projet "")"
End If
Utilisez [= Chr(34)] pour faire votre test sur le caractère ["] Bien cordialement à vous, -- Marc ROBY - CAPCODE Conseil http://www.capcode-conseil.fr/
"Robert Parise" a écrit dans le message de news: 2GFef.32005$
À partir d'une descrioption de projet, j'ai une programmation qui cré un fichier dans un répertoire. À l'occasion, les utilisateurs introduise un caractère qui n'est pas accepter comme nom de fichier. Ma programmation ci-dessous détecte ces caractères, sauf le caractère " guillemet
Comment introduire le symbole " dans ma programmation comme les symboles : < > * etc
If InStr(1, Me!txtDescription, "") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet. "")" ElseIf InStr(1, Me!txtDescription, "/") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" ElseIf InStr(1, Me!txtDescription, ":") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" ElseIf InStr(1, Me!txtDescription, "*") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" ElseIf InStr(1, Me!txtDescription, "?") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" ElseIf InStr(1, Me!txtDescription, "/") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" ElseIf InStr(1, Me!txtDescription, "<") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" ElseIf InStr(1, Me!txtDescription, ">") > 0 Then Eval "MsgBox ("" Vous avez un symbole refusé dans le nom de votre projet "")" End If