Deano wrote:
Thought it might be a cool feature to allow my users to click a button,
and connect to a webpage that would tell them if a more recent version
was available.
I can create a button that opens a webpage but it would be nice if it
could compare what they have with what I say is available, so I can say
something like "You have version 1.2. Version 1.3 is now available".
Any ideas?
When I "build" I create/update a Current Project "CurrentBuild" property
as follows:
'*******
With CurrentProject.Properties
CurrentBuild = .Item("CurrentBuild") + 1
.Add "CurrentBuild", CurrentBuild
.Item("CurrentBuild").Value = CurrentBuild
End With
'*******
I also update the htm page:
'*******
Private Sub UpdateCurrentBuildFile(ByVal cb As Long)
Dim FileNumber As Integer
Dim HTML As String
On Error GoTo UpdateCurrentBuildFileErr
FileNumber = FreeFile()
HTML = String(FileLen(CurrentBuildTemplatePath), vbNullChar)
Open CurrentBuildTemplatePath For Binary As #FileNumber
Get #FileNumber, , HTML
Close #FileNumber
Kill CurrentBuildPath
FileNumber = FreeFile()
Open CurrentBuildPath For Binary As #FileNumber
Put #FileNumber, , Replace(HTML, "number", CStr(cb))
Close #FileNumber
UpdateCurrentBuildFileExit:
Close
Exit Sub
UpdateCurrentBuildFileErr:
With Err
MsgBox .Description, vbCritical, "Error # " & .Number
End With
Resume UpdateCurrentBuildFileExit
End Sub
' *******
and the code of my form to check the build is
'*******
Private Sub Form_Load()
With DoCmd
.Restore
.RunCommand acCmdSizeToFitForm
End With
Me.Caption = "The build number of the current file is " &
CurrentProject.Properties("CurrentBuild").Value & "."
End Sub
Private Sub Form_Open(Cancel As Integer)
Me.wbHDSBHelp.Navigate "http://ffdba.com/ESO/CurrentBuild.htm"
End Sub
' *******
wbHDSBHelp is a web browser control
--
--
Lyle
--
From ADO28.chm
Deprecated Components
Each of the following components is considered obsolete. While these
components are still supported in this release of the Microsoft® Data
Access Components (MDAC), they may be removed in the future. When
writing new applications, you should avoid using these deprecated
components. When modifying existing applications, you are strongly
encouraged to remove any dependency on these components.
.....
Jet and Replication Objects (JRO)
The Microsoft Jet OLE DB Provider and other related components were
removed from MDAC 2.6. Microsoft has deprecated the Microsoft Jet
Engine, and plans no new releases or service packs for this component.
As a result, the Jet and Replication Objects (JRO) is being deprecated
in this release and will not be available in any future MDAC releases.
.....
