Formulaire access

j'ai esayer le code
Static ac As Access.Application:
Set ac = New Access.Application
ac.Visible = True
ac.OpenCurrentDatabase ("base.mdb")
ac.DoCmd.OpenForm notemat, acNormal, , False, acFormAdd, acWindowNormal
'ac.DoCmd.OpenForm ("notemat")
mais il m'affiche l'erreur suivant : la base et manquant ou ouvert en mod exclusive
je sais pas comment faire merci

Bonjour bou187,

Il y a tout ce qu'il faut dans la boîte à outil pour créer en pas-à-pas un bouton de commande.

Voilà les informations qui s'affichent lorsque l'on saisi {Bouton de commande} dans l'aide intuitive. Touche [F1].

http://www.cijoint.fr/cjlink.php?file=cj200906/cijmkBCV8S.doc

Cordialement

toujours le mem probleme il affiche le msg la bse est manquante ou ouvert aidez moi sv p

bou187,

Bonsoir
Si votre base est sous ACCESS 2000 vous pouvez, après l'avoir compressée, me la faire parvenir via
https://www.cjoint.com/

Après l'enregistrement dans ci-Joint.com, il vous suffira de copier/coller le lien qui vous sera fourni dans un nouveau message CCM afin que je puisse le télécharger et y jeter un coup d'oeil.

NB : Si vous avez une version ACCESS différente de la mienne, je ne peux malheureusement rien faire

Cordialement

La science ne fait que trouver ce qui existe depuis toujours.
REEVES Hubert.

merci bien moi j'utilise Acces 2003
est ce qu'il existe une fonction pour fermer la base de données avant d'ouvrir ou bien non

bou187,

Tout d'abord, faire une copie de la Base ACCESS 2003 existante (on n'est jamais trop prudent)

C'est cette copie qui est à me faire parvenir. De plus,
pour que je puis lire cette base il faut faire Outils/Utilitaires de Base de données/Convertir à la version précédente
(sinon je ne pourrai pas l'ouvrir)

Ceci fait compresser le tout et faire suivre via ci-joint

A+

merci d'avance toujour le meme probleme c'est que il suppose que la base est ouvert par plusieur utilisateur
il m'affiche le massage suivant " impossible d'afficher la base car il'est manquante ou ouvert par un autre utilistaur mais moi je sui en local "

bou187,

Pour en avoir le coeur net, cliquer sur le ? dans la barre des menus et activer : Détecter/réparer dans la liste déroulante
A+

merci j'ai creer le code suivant il s'ouvre mais il se ferme directement je sais pas d'ou vien le probleme aidez moi svp
le code est :
Dim ac As access.Application
Set ac = CreateObject("access.application")
'********Ouvrire **********'
ac.OpenCurrentDatabase App.Path & "\base.mdb", False
ac.Visible = True

bou187,

Je préconise de recourir à chemins explicites.

("Unité logique:\répertoire\Base.mdb")

Exemple :
ac.OpenCurrentDatabase ("c:\rep1\access.mdb")

Cordialement