RootsLabs

Vous avez besoin lors du développement de faire un log, déboguer ou tracer un script, surtout dans le cas de l’utilisation d’une Tâche de Script.

Dans le cadre d’un script en langage VB.Net :

Public Sub Main()
  Dim FireAgain As Boolean
  FireAgain = True
  Dts.Events.FireInformation(0, "Title", "Description", String.Empty, 0, FireAgain)
  Dts.TaskResult = ScriptResults.Success
End Sub

Et cela vous permettra de sortir une information dans l’onglet « Progression » :

Sinon vous pouvez l’améliorer en choisissant le type d’évènement :

Public Sub Main()
	Dim FireAgain As Boolean
	FireAgain = True
	Dts.Events.FireInformation(0, "TitleInfo", "DescriptionInfo", String.Empty, 0, FireAgain)
	Dts.Events.FireWarning(0, "TitleWarning", "DescriptionWarning", String.Empty, 0)
	For i As Integer = 0 To 10
		Dts.Events.FireProgress("DescriptionProgress", i * 10, 0, 0, "TitleProgress", True)
	Next
	Dts.Events.FireError(0, "TitleError", "DescriptionError", String.Empty, 0)
	Dts.TaskResult = ScriptResults.Success
End Sub

Avec une sortie de ce type :

La précesence d’un Dts.Events.FireError définira automatiquement la tâche en échec.