How to update current application and maintain the current version? (1 Viewer)

[amorosik]

I have a procedure that I'll call procedure10.accde, which is normally launched from a desktop icon whose properties contain the path and name of Procedure10.accde
Procedure10.accde (and possibly subsequent versions) are connected to data on a database server via an ODBC driver
A function within it allows you to check for updates on a remote website, such as whether procedure11.accde is available
If the most recent file is available, the local file is downloaded and a warning is displayed

The question is: how can I use INTERNAL CODE to procedure10.accde to:
1. Update procedure11.accde to link to external tables.
2. Create a new desktop icon with a modified name and properties to launch procedure11.accde.
3. Start procedure11.accde.

 

[arnelgp]

1. procedure11.accde should have a startup form/routine to
create the necessary Link table, via dsn-less connection.
2. creating desktop link , you can google the vba/script for it.
3. using shell, you can run procedure11.accde and close the current db, procedure10.accde.

 

[amorosik]

1. yes, I hadn't thought about having the latest version do the work directly

2.

Dim WshShell As Object
Dim oLink As Object
Dim percorsoDesktop As String

Set WshShell = CreateObject("WScript.Shell")
percorsoDesktop = WshShell.SpecialFolders("Desktop")
Set oLink = WshShell.CreateShortcut(percorsoDesktop & "\" & nome_file_link)
oLink.TargetPath = target_path
oLink.WorkingDirectory = working_directory
oLink.IconLocation = icon_location
oLink.Description = descizione
oLink.Save

3 Yes, that was easy.