Voila j'ai une table prospect dans une base. Lorsqu'elle est vide,je demande
à saisir les élements de la table prospects et je me posais la question si
par l'intermediaire d'une commande apres le msgbox que j'ai créé si je
pouvais par un petit bout de code que je ne connais pas ouvrir directement
la table.
If rst.EOF Then
On Error Resume Next
MsgBox "Saisissez les champs de la table prospects", vbInformation,
"Attention !"
Exit Sub
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
Raymond [mvp]
Bonjour.
il n'est pas conseillé de travailler directement dans la table, mais dans un formulaire basé soit sur la table soit sur une requête basée sur la table. Le formulaire permet de faire des contrôles et de maîtriser la saisie. en début de séquence tu peux tester si la table est vide et dans ce cas ouvrir le formulaire de saisie en mode acdialog pour attendre sa fermeture pour continuer. exemple de code: If DCount("*", "prospects") = 0 Then MsgBox "Saisissez les champs de la table prospects", vbInformation, "Attention !" DoCmd.OpenForm "formprospects", acNormal, , , , acDialog End If
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"malabar" a écrit dans le message de news: 41e95859$0$7096$
Bonsoir tout le monde
Voila j'ai une table prospect dans une base. Lorsqu'elle est vide,je demande à saisir les élements de la table prospects et je me posais la question si par l'intermediaire d'une commande apres le msgbox que j'ai créé si je pouvais par un petit bout de code que je ne connais pas ouvrir directement la table.
If rst.EOF Then On Error Resume Next MsgBox "Saisissez les champs de la table prospects", vbInformation, "Attention !" Exit Sub End If
Merci tout le monde
Bonjour.
il n'est pas conseillé de travailler directement dans la table, mais dans un
formulaire basé soit sur la table soit sur une requête basée sur la table.
Le formulaire permet de faire des contrôles et de maîtriser la saisie.
en début de séquence tu peux tester si la table est vide et dans ce cas
ouvrir le formulaire de saisie en mode acdialog pour attendre sa fermeture
pour continuer.
exemple de code:
If DCount("*", "prospects") = 0 Then
MsgBox "Saisissez les champs de la table prospects", vbInformation,
"Attention !"
DoCmd.OpenForm "formprospects", acNormal, , , , acDialog
End If
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"malabar" <malabar@wanadoo.fr> a écrit dans le message de news:
41e95859$0$7096$8fcfb975@news.wanadoo.fr...
Bonsoir tout le monde
Voila j'ai une table prospect dans une base. Lorsqu'elle est vide,je
demande à saisir les élements de la table prospects et je me posais la
question si par l'intermediaire d'une commande apres le msgbox que j'ai
créé si je pouvais par un petit bout de code que je ne connais pas ouvrir
directement la table.
If rst.EOF Then
On Error Resume Next
MsgBox "Saisissez les champs de la table prospects", vbInformation,
"Attention !"
Exit Sub
End If
il n'est pas conseillé de travailler directement dans la table, mais dans un formulaire basé soit sur la table soit sur une requête basée sur la table. Le formulaire permet de faire des contrôles et de maîtriser la saisie. en début de séquence tu peux tester si la table est vide et dans ce cas ouvrir le formulaire de saisie en mode acdialog pour attendre sa fermeture pour continuer. exemple de code: If DCount("*", "prospects") = 0 Then MsgBox "Saisissez les champs de la table prospects", vbInformation, "Attention !" DoCmd.OpenForm "formprospects", acNormal, , , , acDialog End If
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"malabar" a écrit dans le message de news: 41e95859$0$7096$
Bonsoir tout le monde
Voila j'ai une table prospect dans une base. Lorsqu'elle est vide,je demande à saisir les élements de la table prospects et je me posais la question si par l'intermediaire d'une commande apres le msgbox que j'ai créé si je pouvais par un petit bout de code que je ne connais pas ouvrir directement la table.
If rst.EOF Then On Error Resume Next MsgBox "Saisissez les champs de la table prospects", vbInformation, "Attention !" Exit Sub End If
Merci tout le monde
malabar
Salut Raymond merci pour ta réponse je vais suivre ton conseil.
Amicalement Francisco et merci pour tout "Raymond [mvp]" a écrit dans le message de news: ecZmLCz%
Bonjour.
il n'est pas conseillé de travailler directement dans la table, mais dans un formulaire basé soit sur la table soit sur une requête basée sur la table. Le formulaire permet de faire des contrôles et de maîtriser la saisie. en début de séquence tu peux tester si la table est vide et dans ce cas ouvrir le formulaire de saisie en mode acdialog pour attendre sa fermeture pour continuer. exemple de code: If DCount("*", "prospects") = 0 Then MsgBox "Saisissez les champs de la table prospects", vbInformation, "Attention !" DoCmd.OpenForm "formprospects", acNormal, , , , acDialog End If
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"malabar" a écrit dans le message de news: 41e95859$0$7096$
Bonsoir tout le monde
Voila j'ai une table prospect dans une base. Lorsqu'elle est vide,je demande à saisir les élements de la table prospects et je me posais la question si par l'intermediaire d'une commande apres le msgbox que j'ai créé si je pouvais par un petit bout de code que je ne connais pas ouvrir directement la table.
If rst.EOF Then On Error Resume Next MsgBox "Saisissez les champs de la table prospects", vbInformation, "Attention !" Exit Sub End If
Merci tout le monde
Salut Raymond merci pour ta réponse je vais suivre ton conseil.
Amicalement Francisco et merci pour tout
"Raymond [mvp]" <XYZ.officesystem.access@free.fr> a écrit dans le message de
news: ecZmLCz%23EHA.4092@TK2MSFTNGP09.phx.gbl...
Bonjour.
il n'est pas conseillé de travailler directement dans la table, mais dans
un formulaire basé soit sur la table soit sur une requête basée sur la
table. Le formulaire permet de faire des contrôles et de maîtriser la
saisie.
en début de séquence tu peux tester si la table est vide et dans ce cas
ouvrir le formulaire de saisie en mode acdialog pour attendre sa fermeture
pour continuer.
exemple de code:
If DCount("*", "prospects") = 0 Then
MsgBox "Saisissez les champs de la table prospects", vbInformation,
"Attention !"
DoCmd.OpenForm "formprospects", acNormal, , , , acDialog
End If
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"malabar" <malabar@wanadoo.fr> a écrit dans le message de news:
41e95859$0$7096$8fcfb975@news.wanadoo.fr...
Bonsoir tout le monde
Voila j'ai une table prospect dans une base. Lorsqu'elle est vide,je
demande à saisir les élements de la table prospects et je me posais la
question si par l'intermediaire d'une commande apres le msgbox que j'ai
créé si je pouvais par un petit bout de code que je ne connais pas
ouvrir directement la table.
If rst.EOF Then
On Error Resume Next
MsgBox "Saisissez les champs de la table prospects", vbInformation,
"Attention !"
Exit Sub
End If
Salut Raymond merci pour ta réponse je vais suivre ton conseil.
Amicalement Francisco et merci pour tout "Raymond [mvp]" a écrit dans le message de news: ecZmLCz%
Bonjour.
il n'est pas conseillé de travailler directement dans la table, mais dans un formulaire basé soit sur la table soit sur une requête basée sur la table. Le formulaire permet de faire des contrôles et de maîtriser la saisie. en début de séquence tu peux tester si la table est vide et dans ce cas ouvrir le formulaire de saisie en mode acdialog pour attendre sa fermeture pour continuer. exemple de code: If DCount("*", "prospects") = 0 Then MsgBox "Saisissez les champs de la table prospects", vbInformation, "Attention !" DoCmd.OpenForm "formprospects", acNormal, , , , acDialog End If
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"malabar" a écrit dans le message de news: 41e95859$0$7096$
Bonsoir tout le monde
Voila j'ai une table prospect dans une base. Lorsqu'elle est vide,je demande à saisir les élements de la table prospects et je me posais la question si par l'intermediaire d'une commande apres le msgbox que j'ai créé si je pouvais par un petit bout de code que je ne connais pas ouvrir directement la table.
If rst.EOF Then On Error Resume Next MsgBox "Saisissez les champs de la table prospects", vbInformation, "Attention !" Exit Sub End If
