Notify icon Script Task help...!!! help...!!!

  • My requirement is to show a balloon as notify icon tool tip or a message or content of a variable that was why enter the code below to no longer use a msgbox in a script task but apparently need something to display the value of the message.

    Attached is an image that I want to display instead of a msgbox the value of a variable in a notify icon.

    Thanks in advance for your support. 🙂

    Mi requerimiento es mostrar en un globo como tool tip o notify icon un mensaje o el contenido de una variable fue por eso que ingrese el código de abajo para ya no utilizar un msgbox en un script task pero al parecer falta algo para que se visualice el valor del mensaje.

    Adjunto una imagen que es la que quiero que se muestre en lugar de un msgbox el valor de una variable en un notify icon.

    De antemano Gracias por su apoyo. 🙂

    Imports System

    Imports Microsoft.SqlServer.Dts.Runtime

    Imports System.Data

    Imports System.Math

    Imports System.IO

    Imports System.Windows.Forms

    Imports System.Drawing

    Imports System.EventArgs

    Imports System.Object

    Imports System.Reflection

    Imports ST_6e1db1aeb859412887e4b7e71aac20bf.vbproj

    <System.AddIn.AddIn("ScriptMain", Version:="1.0", Publisher:="", Description:="")> _

    <System.CLSCompliantAttribute(False)> _

    Partial Public Class ScriptMain

    Inherits Microsoft.SqlServer.Dts.Tasks.ScriptTask.VSTARTScriptObjectModelBase

    Enum ScriptResults

    Success = Microsoft.SqlServer.Dts.Runtime.DTSExecResult.Success

    Failure = Microsoft.SqlServer.Dts.Runtime.DTSExecResult.Failure

    End Enum

    ' The execution engine calls this method when the task executes.

    ' To access the object model, use the Dts property. Connections, variables, events,

    ' and logging features are available as members of the Dts property as shown in the following examples.

    '

    ' To reference a variable, call Dts.Variables("MyCaseSensitiveVariableName").Value

    ' To post a log entry, call Dts.Log("This is my log text", 999, Nothing)

    ' To fire an event, call Dts.Events.FireInformation(99, "test", "hit the help message", "", 0, True)

    '

    ' To use the connections collection use something like the following:

    ' ConnectionManager cm = Dts.Connections.Add("OLEDB")

    ' cm.ConnectionString = "Data Source=localhost;Initial Catalog=AdventureWorks;Provider=SQLNCLI10;Integrated Security=SSPI;Auto Translate=False;"

    '

    ' Before returning from this method, set the value of Dts.TaskResult to indicate success or failure.

    '

    ' To open Help, press F1.

    'Declaration

    Dim NotifyIcon1 As NotifyIcon

    Dim e As System.EventArgs

    Dim sender As System.Object

    Public Sub Main()

    ' Add your code here

    '

    'NotifyIcon1.BalloonTipIcon = ToolTipIcon.Warning

    NotifyIcon1.Icon = New Icon("G:\Windows.ico")

    NotifyIcon1.BalloonTipIcon = ToolTipIcon.Info

    NotifyIcon1.BalloonTipTitle = "Titulo"

    NotifyIcon1.BalloonTipText = "texto"

    NotifyIcon1.ShowBalloonTip(10000)

    Dts.TaskResult = ScriptResults.Success

    End Sub

  • Duplicate post.

    Original thread with replies can be found here:

    http://www.sqlservercentral.com/Forums/Topic1362869-147-1.aspx

    Need an answer? No, you need a question
    My blog at https://sqlkover.com.
    MCSE Business Intelligence - Microsoft Data Platform MVP

Viewing 2 posts - 1 through 1 (of 1 total)

You must be logged in to reply to this topic. Login to reply