Don't want "Importing" image pop-up...

[xhonzi]

I use a little VBA coding that is commonly found on this forum for grabbing a picture to go on the form with each record in the table.... (long breath)

Anyways, it pops up a little status bar that says, "Importing [image name]". It only shows up for a second or two... but I want to get rid of it. Anyone know how?

Xhonzi

 

[mustangcoupe]

try

Application.ScreenUpdating = False

'your import code here

Application.ScreenUpdating = True


--Todd


TechnicalUser pretending to be a programmer(shhh… the boss doesn’t know yet)

 

[xhonzi]

Hmmm.. I'm seeing an Application.Screen but not anything else that starts with screen....

Xhonzi

 

[mustangcoupe]

sorry about that. I thought it was there but it is only for DataAccessPages.

--Todd


TechnicalUser pretending to be a programmer(shhh… the boss doesn’t know yet)

 

[xhonzi]

Anyone else?

Xhonzi

 

[TheAceMan1]

How are ya xhonzi . . . . .

If whats coming up is a Modal Object, this wont help, but try:

[blue]   Application.Echo False
   [green]'Your Code[/green]
   Application.Echo True[/blue]

[purple]If that doesn't work, post the code . . . . .[/purple]

See Ya! . . . . . .

 

[xhonzi]

I'm getting a "Compile Error: Argument not optional" when I add that to my code.

I'll add a little snapshot of my code here.

    coverscan = [c_dir] & [issueid] + ".jpg"
    'Sets string "coverscan" to location of file on hard drive, unique for each issueid.
    coverscan = Dir(coverscan)
    'Does a dir scan to see if file exists.  If it does, it returns the name of the file (minus the path)
    If coverscan = "" Then
        'If the string is empty, then...
        Me![cover].Picture = [installdir] & "covers\nocover.jpg"
        Me![bcover].Picture = [installdir] & "covers\nocover.jpg"
        'show this "nocover.jpg"
    Else
        Me![cover].Picture = [c_dir] & [coverscan]
        Me!bcover.Picture = [c_dir] & [coverscan]
        'else show the unique picture in the cover field on the form
    End If

 

[TheAceMan1]

OK xhonzi . . . . .

Looking at the code, the problem has to do with the fact that [purple]your using .jpg[/purple] files. These are [blue]compressed graphic files[/blue] and have to [blue]decompressed when loaded[/blue]. What your seeing is a system related [blue]Progress Bar![/blue].

I ran across this back in my Access 97 days, and I've never found, heard of, or run across a method to supress it ([purple]as long as your using .jpg[/purple]).

To alleviate this you need to convert [purple].jpg[/purple] to [purple].bmp[/purple] (bitmap).

If you don't have a converter, IrfanView is a very good [green](free!)[/green] converter & file viewer!

See Ya! . . . . . .

 

[xhonzi]

Then my storage size will go from about 100 MB to more like a GB! Can't do that. There HAS to be a way to supress that progress bar.

I did get the Echo False/True thing to work (as a line of code, anyhow). I think it lessens the time the pop-up is displayed... but I'm not sure. It's different everytime.

Xhonzi