Make Form Pop Up Over Other Apps

[TKnight]

Hi, I have a reminder DB that runs on a forms timer to check to see if tasks are overdue. The problem that I have is that when a task pops up the form containing it opens but only in the access application so users don't know it's overdue unless they keep checking the reminder DB. Is there any way I can get a form (or message box) to pop up over any application running at the time. I know I can play a sound or something but some users will have their sounds muted.
Thanks, Tom.

 

[namliam]

I am not sure but... setting the form as Modal might help...

Regards

 

[TKnight]

Thanks,
But it dosn't work.

 

[IMO]

Try setting the reminder form properties to Pop Up = Yes and Modal = Yes and minimize the Access window in the On Open event...

DoCmd.RunCommand acCmdAppMinimize
MsgBox "BLAH"

including a message box and restore it in the On Close event...

DoCmd.RunCommand acCmdAppRestore

this may do the trick. If not, I've got an example somewhere that works.

IMO

 

[TKnight]

Thanks IMO but that didn't work either. If i'm in another app when the reminder pops up you don't notice the Access window minimise because it is already minimised. If you are in access the focus just switches to another app.
If you could dig that eg out for me it'd be much appreciated, thanks, Tom.

 

[IMO]

Here you are, it's in A2K, let me know if you need 97. Just set the timer for 1 min and open another application.

IMO

 

[TKnight]

IMO thanks for that, the timer is prety cool... has given me some ideas of stuff to put in my own DB. Your example doesn't get round the problem that i've got though. Your "Times Up" message pops up over the top of the timer but if I'm working in Excel etc and it goes off, i won't know about it until I check the timer again (unless i've got sound turned on which is discouraged in our office)
What i'm after is a message box like the one that outlook gives you when you have a new e-mail (i.e. it pops up over everything else you've got open)
It might not be possible, just would be nice thats all... thanks for your help anyway, Tom.

 

[IMO]

I've tried it a couple of times and both the timer form and message popped up over the top of Excel when the countdown finished, maybe it depends on which Windows version is being used. Sorry it wasn't a great help, let me know if you succeed

IMO

 

[TKnight]

Yeah it could well be a windows issue, i'll keep you informed, nice one mate, Tom

 

[IMO]

Just another thought, couldn't you get the message to send an email to the user? That way you'd end up with the email message box (OutLook), an email and your message box! They'd have trouble missing all three!

IMO

 

[TKnight]

Yeah that's a wicked idea... unfortunately were on 2k here and it comes up with a message saying "this program is trying to send an e-mail on your behalf do you want to accept?"
Still at least it would do the job, if i don't manage to sort it any other way it's a good alternative
Cheers...

 

[IMO]

Do you use OutLook? If yes, this code won't produce that annoying little msg

Private Sub YourButton_Click() ' (Or On Open of your msgbox)

      Dim EmailApp, NameSpace, EmailSend As Object

      Set EmailApp = CreateObject("Outlook.Application")
      Set NameSpace = EmailApp.getNameSpace("MAPI")
      Set EmailSend = EmailApp.CreateItem(0)
      
      EmailSend.To = "email@wherever.bla"
      EmailSend.Subject = "Your Subject Here"
      EmailSend.Body = "Hello," & vbCrLf & vbCrLf & "Attached is the latest Snapshot"
      EmailSend.Attachments.Add "C:\Temp\Report1.snp"
      EmailSend.Send
      
      Set EmailApp = Nothing
      Set NameSpace = Nothing
      Set EmailSend = Nothing

End Sub

if you don't want to send an attachment, just take out that line. Hope this helps.

IMO

 

[TKnight]

Cool, that msg is really annoying, I didn't know how to pick up attachments using VB either so that will be handy... if you were in my office, id buy you a beer!
Thanks a lot...

 

[IMO]

I could do with a nice cold beer! LOL. Let me know how it turns out.

IMO

 

[vbaDev]

what i noticed is that when you open your app from the desktop location, it'll open behind other programs now on screen. if you double-click it directly from an open folder, it'll "popup" over other programs like it should.

still searching for the solutionk, though!

 

[aziz rasul]

IMO, which exact line of code gets rid of the annoying message?

 

[Soma_rich]

you can always turn warnings off in VB so the user is not prompted when sending your email.

docmd.setwarnings warningsoff

yourcodehere

docmd.setwarnings warningson

 

[aziz rasul]

I was referring to the Outlook's warning i.e. "this program is trying to send an e-mail on your behalf do you want to accept?"