RECHERCHER :
COMMUNAUTE MP
Identifiez vous ...
Devenir Membre
J'ai oublié mon MDP
DOMAINE MP
Bavardages
Langages Généraux
Langages Web
Langages DotNet
Autres langages
Dev. Jeux Video
Sécurité
Sys. Exploitation
Graphismes
Logiciels
Réseaux
Bases de données
Méthodologies
Emplois High-tech
Aide juridique
Articles juridiques
FORUM
Index des forums
Ajouter un sujet
Rechercher sujet
Contact Responsable
Devenir modérateur
CHAT MP IRC
Votre pseudo ...
Srv: irc.moteurprog.com
Chan: #MoteurProg
PARTICIPER
Plus de 3500 emplois.
Rechercher un job
Déposez votre CV
Emplois High-tech

Visiteur MP

 message au demarrage access

Forum : ACCESS
Sous Catégorie : Aucune
Type du sujet : Sujet Normale
FAQ : FAQ ACCESS

SUIVI DES SUJETS PAR MAIL

SUIVI PAR MAIL INACTIF

RESOLUTION DU SUJET SUJET NON RESOLU
BLOQUAGE DU SUJET SUJET ACTIF
APPARTENANCE A LA FAQ N'APPARTIENT PAS A LA FAQ


PAGE : [1]

POSTER UN NOUVEAU SUJET REPONDRE A CE SUJET

FORUM ACCESS

PREMIERE PAGE

PAGE PRECEDENTE

Page précedente

Page suivante

PAGE SUIVANTE

DERNIERE PAGE
mavel76
Nouveau membre
Inscrit : 12/08/2008
Messages : 3
Message
#155754
Posté le 12/08/08 à 01:52
Bonjour à tous,

voila j'explique, je viens de créer une base de données avec access, seulement il me manque juste une chose, que je n'arrive pas a faire, je souhaiterais qu'a l'ouverture de ma base, un message d'accueil du style "bienvenue" s'affiche pendant 10secondes pour laisser place au formulaire.
S'avez vous comment je peut faire?

merci d'avance de votre aide

HAUT DE PAGE

PROFIL MEMBRE LUI ECRIRE 

Publicité
Inscrit : X
Messages : X
Message
#Aucun

HAUT DE PAGE

  

francisHop
Membre régulier
Inscrit : 11/05/2008
Messages : 77
Message
#155789
Posté le 13/08/08 à 09:28
Bonjour et bienvenue,

mavel76 dit :
S'avez vous comment je peut faire?


Oui.

Cordialement.

****************************************************************

Oui je sais. C'est idiot.. Mais tellement tentant. Smiley


Pour faire patienter l'usager généralement on fait un écran de démarrage (splash screen) durant quelques secondes tandis que "la machine" se met en place.
En effet, c'est à ce moment qu'il vaut mieux ouvrir en mode invisible quelques objets, l'utilisateur acceptant plus facilement un délai d'attente au début, ce qui ne sera pas le cas en cours de traitement. (Il suffira, au moment opportun de rendre visible les objets... En réseau on voit la différence)
Cet écran de démarrage est sans aucune source
(pas d'enregistrements-->recordset), d'ou chargement rapide.
Généralement on y insère une image, Les principales propriétés d'affichage du formulaire :

Affichage par défaut--->Mode simple
Affichage autorisé--->Formulaire
Menu Contextuel--->Non
Barres de défilement--->Aucune
Sélecteur d'enregistrement--->Non
Boutons de déplacement--->Non
Diviseurs d'enregistrements--->Non
Auto centrer--->Oui
Style bordure--->Aucun
Boite contrôle--->Non
Boutons MinMax--->Aucun
Bouton Fermer--->Non
Bouton Aide--->Non
Barre de menus--->=1

On va utiliser l'événement Sur minuterie avec la propriété Intervalle minuterie du formulaire pour le fermer après quelques secondes.
La valeur d' Intervalle minuterie est en millisecondes
1 seconde-->1000 millisecondes
Après avoir "peaufiné" notre formulaire; désirant le voir s'afficher pendant 10 secondes on inscrit dans intervalle minuterie--->10000; Et, toujours selon nos désirs voir s'ouvrir à sa fermeture notre formulaire répondant au doux nom de "frm_Suivant" nous inscrivons sur minuterie--> Procédure événementielle :

Private Sub Form_Timer() DoCmd.Close DoCmd.OpenForm "frm_Suivant" End Sub


On va vouloir ouvrir ce formulaire au démarrage de l'application.
2 méthodes :

1-->menu Outils--> Démarrage. Définir la propriété Afficher Formulaire/Page.

2-->Créer une macro nommée--> AutoExec
Action-->OuvrirFormulaire
Nom Formulaire-->Notre formulaire de démarrage

Cordialement.

__________________________
Le peu que je sais, c'est à mon ignorance que je le dois. Sacha Guitry

HAUT DE PAGE

PROFIL MEMBRE LUI ECRIRE 

mavel76
Nouveau membre
Inscrit : 12/08/2008
Messages : 3
Message
#155812
Posté le 13/08/08 à 20:16
merci beaucoup pour ta réponse aussi rapide, c'est merveilleux cela fonctione... merci encoreSmiley

HAUT DE PAGE

PROFIL MEMBRE LUI ECRIRE 

mavel76
Nouveau membre
Inscrit : 12/08/2008
Messages : 3
Message
#155828
Posté le 14/08/08 à 15:36
Une autre petite question, seriez vous éclairer ma lanterne:

je souhaiterais mettre un son au demarrage d'un formulaire, est il possible? si oui comment faire

merci d'avance

HAUT DE PAGE

PROFIL MEMBRE LUI ECRIRE 

francisHop
Membre régulier
Inscrit : 11/05/2008
Messages : 77
Message
#155837
Posté le 14/08/08 à 23:23
Bonsoir,

Une nouvelle question = un nouveau Post
Ceci pour éviter la confusion. On essaye de traiter sujet par sujet.

Pour un son wav il faut créer un nouveau module-->bas_son et coller dedans :

Private Declare Function PlaySound& Lib "winmm.dll" _ (ByVal lpszName As String, ByVal hModule As Long, _ ByVal dwFlags As Long) Public Sub SonMultimédia(Chemin As String) PlaySound Chemin, 0&, Son_Async End Sub

Dans un autre module-->bas_Fichier on colle :

Option Explicit Dim I As Integer Dim Réponse As String Public Function Chercher(NomDuChemin As String, NomDuFichier As String, Sous_répertoires As Boolean) As String On Error Resume Next Réponse = "" With FileSearch .NewSearch .LookIn = NomDuChemin .FileName = NomDuFichier .SearchSubFolders = Sous_répertoires If .Execute() > 0 Then For I = 1 To .FoundFiles.Count Réponse = Réponse & .FoundFiles(I) & ";" Next I End If End With Chercher = Réponse End Function

Et sur ce fameux formulaire de démarrage :

Private Sub Form_Close() SonMultimédia "c:/WINDOWS/MEDIA/tada.wav" End Sub Private Sub Form_Open(Cancel As Integer) SonMultimédia "C:\WINDOWS\Media\Windows XP Démarrage.wav" End Sub '(Ou alors le chemin de tes sons .wav)


Cordialement.

Si tu veux quelque chose d'un peu plus élaboré,
genre mp3-->Nouveau Post.

Cordialement.
__________________________
Le peu que je sais, c'est à mon ignorance que je le dois. Sacha Guitry

HAUT DE PAGE

PROFIL MEMBRE LUI ECRIRE 
POSTER UN NOUVEAU SUJET REPONDRE A CE SUJET

PREMIERE PAGE

PAGE PRECEDENTE Page précédente

Page suivante

PAGE SUIVANTE DERNIERE PAGE

FORUM ACCESS



    PAGE : [1]



.: Site Web développé par Julien Pichot et l'équipe MPWG avec www.evolvia-web.com :.