|
|
Hi All,
I would like to have a welcome screen appears after the user log in and then
close and open the main screen (switchboard). the welcome screen will be open
for about 2 to 3 seconds (more or less).
Any suggestions on how this can be done?
Thanks!
--
Learning
|
|
On your logon form, have a close button, and add the code:
DoCmd.Close acForm, "frmLogon"
DoCmd.openform "frmWelcome"
Then, on your welcome form, set the timer interval - experiment with time
until you are happy
Private Sub Form_Load() 'on frmWelcome
Me.TimerInterval = 2000 ' This is like 2 secs
End Sub
Add this to form:
Private Sub Form_Timer()
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frmOpening"
DoCmd.openform stDocName, , stLinkCriteria
DoCmd.Close acForm, "frmWelcome"
End Sub
that's it!
Damon
"tracktraining" <tracktraining[ at ]discussions.microsoft.com> wrote in message
news:123B9F13-72F6-45CF-AF17-49C4657FA695[ at ]microsoft.com...
[Quoted Text] > Hi All,
>
> I would like to have a welcome screen appears after the user log in and
> then
> close and open the main screen (switchboard). the welcome screen will be
> open
> for about 2 to 3 seconds (more or less).
>
> Any suggestions on how this can be done?
>
> Thanks!
> --
> Learning
|
|
what is the stDocName = "frmOpening"? and Doccmd.openform stDocName, ,
stlinkCriteria?
--
Learning
"Damon Heron" wrote:
[Quoted Text] > On your logon form, have a close button, and add the code:
>
> DoCmd.Close acForm, "frmLogon"
> DoCmd.openform "frmWelcome"
>
> Then, on your welcome form, set the timer interval - experiment with time
> until you are happy
> Private Sub Form_Load() 'on frmWelcome
> Me.TimerInterval = 2000 ' This is like 2 secs
> End Sub
>
> Add this to form:
>
> Private Sub Form_Timer()
> Dim stDocName As String
> Dim stLinkCriteria As String
> stDocName = "frmOpening"
> DoCmd.openform stDocName, , stLinkCriteria
> DoCmd.Close acForm, "frmWelcome"
> End Sub
>
> that's it!
> Damon
>
>
> "tracktraining" <tracktraining[ at ]discussions.microsoft.com> wrote in message
> news:123B9F13-72F6-45CF-AF17-49C4657FA695[ at ]microsoft.com...
> > Hi All,
> >
> > I would like to have a welcome screen appears after the user log in and
> > then
> > close and open the main screen (switchboard). the welcome screen will be
> > open
> > for about 2 to 3 seconds (more or less).
> >
> > Any suggestions on how this can be done?
> >
> > Thanks!
> > --
> > Learning
>
>
>
|
|
will this work for Access 2007 runtime as well?
cuz i got an event procedure error with the on timer expression.
"the expression On timer you entered as the event property setting produced
the following error: The openform action was canceled."
i only get this error when I open .mde in access 2007 runtime.
any help or suggestion?
Thanks!
--
Learning
"Damon Heron" wrote:
[Quoted Text] > On your logon form, have a close button, and add the code:
>
> DoCmd.Close acForm, "frmLogon"
> DoCmd.openform "frmWelcome"
>
> Then, on your welcome form, set the timer interval - experiment with time
> until you are happy
> Private Sub Form_Load() 'on frmWelcome
> Me.TimerInterval = 2000 ' This is like 2 secs
> End Sub
>
> Add this to form:
>
> Private Sub Form_Timer()
> Dim stDocName As String
> Dim stLinkCriteria As String
> stDocName = "frmOpening"
> DoCmd.openform stDocName, , stLinkCriteria
> DoCmd.Close acForm, "frmWelcome"
> End Sub
>
> that's it!
> Damon
>
>
> "tracktraining" <tracktraining[ at ]discussions.microsoft.com> wrote in message
> news:123B9F13-72F6-45CF-AF17-49C4657FA695[ at ]microsoft.com...
> > Hi All,
> >
> > I would like to have a welcome screen appears after the user log in and
> > then
> > close and open the main screen (switchboard). the welcome screen will be
> > open
> > for about 2 to 3 seconds (more or less).
> >
> > Any suggestions on how this can be done?
> >
> > Thanks!
> > --
> > Learning
>
>
>
|
|
nm. I found the cuase of the error message. Thanks!
--
Learning
"tracktraining" wrote:
[Quoted Text] > will this work for Access 2007 runtime as well?
>
> cuz i got an event procedure error with the on timer expression.
>
> "the expression On timer you entered as the event property setting produced
> the following error: The openform action was canceled."
>
> i only get this error when I open .mde in access 2007 runtime.
>
> any help or suggestion?
>
> Thanks!
> --
> Learning
>
>
> "Damon Heron" wrote:
>
> > On your logon form, have a close button, and add the code:
> >
> > DoCmd.Close acForm, "frmLogon"
> > DoCmd.openform "frmWelcome"
> >
> > Then, on your welcome form, set the timer interval - experiment with time
> > until you are happy
> > Private Sub Form_Load() 'on frmWelcome
> > Me.TimerInterval = 2000 ' This is like 2 secs
> > End Sub
> >
> > Add this to form:
> >
> > Private Sub Form_Timer()
> > Dim stDocName As String
> > Dim stLinkCriteria As String
> > stDocName = "frmOpening"
> > DoCmd.openform stDocName, , stLinkCriteria
> > DoCmd.Close acForm, "frmWelcome"
> > End Sub
> >
> > that's it!
> > Damon
> >
> >
> > "tracktraining" <tracktraining[ at ]discussions.microsoft.com> wrote in message
> > news:123B9F13-72F6-45CF-AF17-49C4657FA695[ at ]microsoft.com...
> > > Hi All,
> > >
> > > I would like to have a welcome screen appears after the user log in and
> > > then
> > > close and open the main screen (switchboard). the welcome screen will be
> > > open
> > > for about 2 to 3 seconds (more or less).
> > >
> > > Any suggestions on how this can be done?
> > >
> > > Thanks!
> > > --
> > > Learning
> >
> >
> >
|
|
|