Hi
I have a couple of Access2000 applications, which I use in full-screen
mode
(main form is quite big). Through a workday, whenever I close one
application, and open next one (or same app again), it opens in
full-screen
mode. But every day, when I 1st time open any of my apps at morning, it
opens in half-sized window (full-size height, and half-size width,
positioned in right half of screen). I have to resize the window, and to
resize the main form of this app.
My computer remains logged on into domain for all night (all applications
are closed). Applications I use are situated on server.
I think the problem is in VBA script which runs every night. It opens an
Access application on server, and after some time closes it. When
application starts, a form is opened, and forms Open event refreshes some
data in certain table (delete and append queries).
When I run this script manually, the application ALWAYS opens in
half-sized
window. When I open this application without script, I can maximize the
window, and Access remembers this setting - until I run script again!
The script is:
Option Explicit
Dim objAccessApp, objAccessFile, strPath, strFile
strPath = "MyPath"
strFile = "MyApp.mdb"
Set objAccessFile=GetObject(strPath & strFile)
Set objAccessApp = objAccessFile.Parent
objAccessApp.Visible = True
WScript.Sleep(5000)
objAccessApp.Quit
How can I force the script to open the app in full window?
Thanks in advance!
--
Arvi Laanemets
( My real mail address: arvi.laanemets<at>tarkon.ee )
|
