NEW2.03.01 · Released 7 August 2015
NEWfinPOWER Connect
Released in
2.03.01
7 August 2015
  1. Opened24 Jul
  2. Closed24 Jul
  3. Released7 Aug
Article 13138 Job J015965

Database Information; new function added to get SQL Server Information including Edition

A new Database function has been added to get SQL Server Information, including the full Version text and Edition information.

This information is shown on the Help, About and Tools, Utilities, Debug forms.

The Business Layer function is shown below. Note, you must have a Microsoft SQL Server database opened for this script to work.

  Dim EngineEdition As iseMSSqlServerEngineEdition
  Dim ProductEdition As String
  Dim Version As String

  ' Assume Success
  Main = True

  If DirectCast(finBL.Database.CurrentProviderUtilities, ISDatabaseProviderUtilitiesMSSqlServer).GetDatabaseInformation(Version, ProductEdition, EngineEdition) Then
    finBL.DebugPrint(Version)
    finBL.DebugPrint(ProductEdition)
    finBL.DebugPrint(EngineEdition.ToString())
  Else
    Main = False
  End If