none
Mostrar número de licencias de Crystal Reports 8.5 en uso RRS feed

  • Pregunta

  • Hola buenas.

    Estoy trabajando con una Intranet hecha en ASP y tienen un paquete de 5 licencias de Crystal Reports 8.5 instalada en el servidor web.

    En ocasiones son más de 5 usuarios los que se conectan y el cliente me ha pedido que en el index se muestre las licencias en uso en tiempo real.

    ¿Hay alguna manera de mostrar el número de licencias en uso de Crystal Reports 8.5 mediante ASP?

    Un saludo y gracias de antemano.


    Antonio López Atienza
    Microsoft Community Contributor
    .NET Developer
    Code examples
    http://www.lopezatienza.es

    lunes, 6 de mayo de 2013 10:03

Respuestas

  • Buenas me respondo a mí mismo.

    El código necesario para acceder a esto que comento se encuentra en un fichero en la carpeta de instalación de Crystal Reports 8.5 Developer:

    C:\Archivos de programa\Seagate Software\Shared\Design Time Control\ASP\license_info.asp

    Saco de este fichero lo importante que son estas funciones:

    <% 
         Response.ExpiresAbsolute = now()-1 
         dim oApp
         dim nLicensed
         dim nActive
         dim bIsActive
         Set oApp = Server.CreateObject("CrystalRuntime.Application") 
         bIsActive = oApp.GetLicenseStatus (nLicensed, nActive)
         set oApp = nothing
    
         Function GetNLicensed
              if nLicensed = 2147483647 then
                   GetNLicensed = "Unlimited"
              else
                   GetNLicensed = nLicensed
              end if
         End function
    
         Function GetNActive
              if bIsActive = True then
                   GetNActive = nActive-1
              else
                   GetNActive = nActive
              end if
         End function
    %>

    Ya en nuestra página accederemos a la las siguientes funciones:

    Obtener el número de licencias:

    <%=GetNLicensed%>

    Obtener el número de licencias en uso:

    <%=GetNActive%>

    Un saludo.


    Antonio López Atienza
    Microsoft Community Contributor
    .NET Developer
    Code examples
    http://www.lopezatienza.es

    • Marcado como respuesta lopezatienza lunes, 6 de mayo de 2013 17:10
    lunes, 6 de mayo de 2013 17:09