appversion reset auto

[DaveM]

All Help appreciated

application is in production now.
app version is set
app uses alpha security with more than a few users
app uses shadowing - set to force re-shadow when appversion changes upward
user never sees anything but the screens they need.

How can I cause the app version to change at the server level in the application without over writing the adb files?

I can get the new app number there easy enough, but the shadow will not allow a appversion change(would make it easy). I have one overwritten table with an update. I can place the new app version in there. I can use it to update. I just can't figure how to do it from the shadow. Maybe I am getting dense?

Any ideas would be helpful.

[DaveM]

Re: appversio reset auto

I thought a command line would work, but no.
I tried this with the tested code in a script

C:\alda12\alpha5.exe "c:\wswp\myapp.adb" -hide -nosplash -executeandexit -command=scriptplay("setver")
It opens the app, but does not execute the script then asks for a user name and password, and closes - never runs the script

another try
C:\alda12\alpha5.exe "c:\wswp\batchcommand" -hide -nosplash -executeandexit -command=scriptplay("setver")

You would swear this one worked, but no. Version remains the same.

Script is:

dim t as P
t = table.open("c:\winswap\aaap.dbf",FILE_RW_SHARED)
query.filter = "recno()="+1
query.order=""
query.options = "T"
qry = t.query_create
x = t.version   ' new one is 16.0321 and old one is 16.0319
y = A5_GetAppVersionNumber()
if x<>y then
A5_SetAppVersionNumber(x)
end if

Trialed in editor, this works fine every time.

[MoGrace]

Re: appversion reset auto

Hi Dave,
Check out this function in the Code Archive
I call it from the AutoExec: ShBldMgmt()

[DaveM]

Re: appversion reset auto

Thanks Robin

I already use that

The issue is that when I send them a new adb with the new version number, it overwrites their users.

The Idea is that I can send an update to their app that does NOT overwrite the adb and then on shadowed app start, update the adb version number. Once the version number is updated, shadow update happens on next start.


The problem is, I can't seem to get the version number to change except manually or by running the master directly as administrator. I can do that fine, but the clients cannot and I do not want them to. That would be a security breach possibility.

[MoGrace]

Re: appversion reset auto

I tried to do that too, but you can't from the shadow only from the developer.

[DaveM]

Re: appversion reset auto

Tom Cone gave me another idea.
Bypass it altogether.
I am sending a small encrypted table with old and new version numbers with the update. If they do not match, reshadow. and I can do that from the shadow.
It will completely by-pass the version control in the adb files.
But, you do what you have to do.

[DaveM]

Re: appversion reset auto

I got help from Tom cone for this idea.
I have 2 tables, one never gets overwritten with an update the other always does, so I can place the newest version number in the replaced table and checked against the old version number and shadow refreshed as needed. This only works from the shadow.

Hope it helps someone else!

' check for shadow
dim this_path as C
dim bare_path as C
dim app_path as C
dim shadowed as L
this_path=:a5.Get_Path()
bare_path=:a5.Get_Master_Path()
if len(alltrim(bare_path) ) = 0 then 'if zero, not shadowed
    shadowed =.F.
    goto theend   'if not shadow - goes to the end of script
else
    shadowed =.T.
end if

dim t as P
t = table.open("c:\wswp\aaap.dbf",FILE_RW_SHARED)   'holds the new version number
query.filter = "recno()="+1
query.order=""
query.options = "T"
qry = t.query_create
newver = t.version

dim tbl as p
tbl = table.open("p32",FILE_RW_EXCLUSIVE)  'holds the current version number
query.filter = "recno()="+1
query.order=""
query.options = "T"
qry = tbl.query_create
oldver = tbl.curver

dim reset as L
if oldver <> newver then
reset = .t.
tbl.change_begin()
tbl.curver = t.version
tbl.change_end()
else 
reset = .f.
end if
t.close()
tbl.close()

If reset = .t. then
	REFRESH_SHADOW()
end if
theend:

[DaveM]

Re: appversion reset auto

After all of this, I changed methods completely. Mainly, not wishing to get into the users names and passwords issues.

All of the adb part will not change and thus, did the code to aex file. The aex can be installed separately.

The version is kept in a file that always goes with and update and it has a logical code for the update.

On start of the shadow after an update that is only done to the "server" files, the logical is change and the shadow is refreshed.

Much simpler and easier to maintain.