Skip to main content
cancel
Showing results for 
Search instead for 
Did you mean: 
RSvebeck
Specialist
Specialist

Push a dynamic message to the "on open" event

Hi

Sometimes, because of ERP bugs or whatever, we discover mayor or minor "errors" in the data on published applications.

Sometimes, this takes some hours to fix, and during this, it would be great to make an anouncement to inform users of this discovered error.

What I'm looking for is a pushed message that appears when a user is opening a Qlikview document. I know there is a way to post a Message in the Access Point - but many of our users are not accessing a document thought the access point - they are using bookmarks or direct links from other places.

Has anyone done any great solutions to dynamically create a "Alert" on "open"? There could perhaps be some possibilites to do this with the "Alert function" or "On open trigger" - in combination with partial reload or something?

Best Regards,

Robert S


Svebeck Consulting AB
1 Solution

Accepted Solutions
RSvebeck
Specialist
Specialist
Author

To do a dynamic dolution, I solved it by creating the folowing macro:

sub ShowSystemMessage
    On Error Resume Next
    Dim oFSO, oTxtFile,InfoString
    InfoString = ""
    Set oFSO = CreateObject("Scripting.FileSystemObject")    
    If oFSO.FileExists("\\Sharename\QlikviewInfo.txt")  then
  Set oTxtFile = oFSO.OpenTextFile("\\Sharename\QlikviewInfo.txt", 1)
  InfoString = oTxtFile.ReadAll
  oTxtFile.Close
     if len(trim(InfoString)) > 0 then msgbox InfoString,,"Information"
    End If
end sub

Then, as on the OnOpen trigger call this macro.

The result is that the document will always show the message stored in the text file, and if the file is empty it will not show any message.

Best Regards,

Robert

Svebeck Consulting AB

View solution in original post

2 Replies
Siva_Sankar
Master II
Master II

Robert,

Following link will help.

http://community.qlik.com/thread/71488

Regards.

Siva

RSvebeck
Specialist
Specialist
Author

To do a dynamic dolution, I solved it by creating the folowing macro:

sub ShowSystemMessage
    On Error Resume Next
    Dim oFSO, oTxtFile,InfoString
    InfoString = ""
    Set oFSO = CreateObject("Scripting.FileSystemObject")    
    If oFSO.FileExists("\\Sharename\QlikviewInfo.txt")  then
  Set oTxtFile = oFSO.OpenTextFile("\\Sharename\QlikviewInfo.txt", 1)
  InfoString = oTxtFile.ReadAll
  oTxtFile.Close
     if len(trim(InfoString)) > 0 then msgbox InfoString,,"Information"
    End If
end sub

Then, as on the OnOpen trigger call this macro.

The result is that the document will always show the message stored in the text file, and if the file is empty it will not show any message.

Best Regards,

Robert

Svebeck Consulting AB