small vbs help please

[RabbieBurns]

Set objAccess = CreateObject("Access.Application")
objAccess.OpenCurrentDatabase "C:\Inetpub\wwwroot\s4\fpdb\s4.mdb"

Set objCommand = objAccess.DoCmd

objCommand.OpenReport "Boarding_Summary"

objAccess.CloseCurrentDatabase

How do I add a message box at the end of that script that just says "printed ok" or something with an OK button.

i had this

MsgBox("School Reports",65,"Reports sent to the printer...")

but get an error about parenthesis.

Any clues please?

Cheers.

[webman]

Try any of these:

MsgBox "School Reports",65,"Reports sent to the printer..."

or

Call MsgBox("School Reports",65,"Reports sent to the printer...")

[RabbieBurns]

cheers thats the one..

note to self: error about parenthesis? why not remove them and try again before posting.

[srochford]

cheers thats the one..

note to self: error about parenthesis? why not remove them and try again before posting.

Always easy after the event :-)

One of the things which really annoyed me when I started using BBC Basic was that it was much more fussy about closing quotes - other BASICs would cope with:

Print "Hello World
but BBC Basic gave a missing " error - I always wanted to scream at it "well, if you know it's missing, why can't you put it in?" - the same applies here. If it knows that there shouldn't be parentheses then why can't it take them out!

[altecsole]

cheers thats the one..

note to self: error about parenthesis? why not remove them and try again before posting.

MsgBox can use parenthesis. In that case you're calling a function which returns a value to indicate which button was clicked (you may have OK and Cancel for instance). So:

buttonClicked = MsgBox("School Reports",65,"Reports sent to the printer...")

would work and the value of buttonClicked value would tell you whether OK or Cancel was clicked (1 would be OK, 2 would be Cancel)

Using MsgBox without parenthesis calls a Sub, which doesn't return a value.