Re: SQL Server Agent Job vs Stored Packages

Tech-Archive recommends: Speed Up your PC by fixing your registry

Hi again,
I know it goes "yellow" beacuse the job dosn't fail or completes. It just
says Processing...
The script starts another script(Plink_auto.sh) with Plink on the unix. And
this triggers the (start_dialogue.pl) pearl script.


Here's the script:
(some of the text is in Norwegian)


Imports System
Imports System.Data
Imports System.Math
Imports Microsoft.SqlServer.Dts.Runtime
Imports System.Diagnostics

Public Class ScriptMain
Public Sub Main()
Try
Dim RC As Boolean = start_dialogue_pl()
If RC = False Then
Dts.TaskResult = Dts.Results.Failure
Else
Dts.TaskResult = Dts.Results.Success
End If
Catch ex As Exception
Dts.TaskResult = Dts.Results.Failure
End Try
End Sub
Private Function start_dialogue_pl() As Boolean
Dim myRC As String = ""
Dim myResponse As String = ""
Dim myMessage As String = ""
Dim myError As String = ""
Dim myMelding As String = ""
Dim myProcess As New Process
myProcess.StartInfo.FileName = "D:\Automatisering\Tools\plink.exe"
myProcess.StartInfo.Arguments = "-pw XXXXXX
USERNAME@xxxxxxxxxxxxx:23 /fs/dialogue/SB1_Liv/dialtsb1/Plink_auto.sh"
myProcess.StartInfo.UseShellExecute = False
myProcess.StartInfo.WindowStyle = ProcessWindowStyle.Normal
myProcess.StartInfo.CreateNoWindow = True
myProcess.StartInfo.RedirectStandardInput = True
myProcess.StartInfo.RedirectStandardOutput = True
myProcess.StartInfo.RedirectStandardError = True
myProcess.StartInfo.StandardOutputEncoding =
System.Text.Encoding.Default
myProcess.StartInfo.StandardErrorEncoding =
System.Text.Encoding.Default
myProcess.Start()
' myProcess.StandardInput.WriteLine(myMessage.ToCharArray)
'Thread.Sleep(3000)
myProcess.WaitForExit()
myResponse = myProcess.StandardOutput.ReadToEnd.ToString
myError = myProcess.StandardError.ReadToEnd.ToString
myRC = myProcess.ExitCode.ToString
myProcess.Close()
If myRC = "0" Then
myMelding = myResponse.Replace(vbLf, vbCrLf)
' MsgBox(myMelding)
Return True
Else
myMelding = "Feil i start av start_dialogue.pl i testdialgoue på
unix! " & myError
' MsgBox(myMelding)
Return False
End If
End Function

End Class


"Allan Mitchell" wrote:

Hello OysteinNorway@xxxxxxxxxxxxxxxxxxxxxxxxx,


Quick question.

When you execute a package as a job , how do you see the tasks turn yellow?

Could you also tell us what the Script Task actually Does?


Allan

Hi!
I got a package with a Script task(VB) that runs OK when executing
under
Stored Packages, File system but fails(stays "yellow") under SQL
server Agent
Jobs. I've secured the package with "EncryptAllWithPassword". I guess
it
might be a security issue in Sql server agent. Anyone know how to fix
this.
Thanks,

Oystein




.

Relevant Pages

  • Script: Remote shutdown of all domain computers
    ... I'v searched through the newsgroups for a complete script but to no result. ... I'v also found a script to search trough AD for the computers and added the ... Public Function AllComputersAs String() ... 'Dim sArray() As String ...
    (microsoft.public.windows.server.scripting)
  • Re: Script: Remote shutdown of all domain computers
    ... Also with this script: What if the IPadress of the PC changed recently? ... 2000 or above and allow shutdown, ... Dim strBase, strFilter, strAttributes, strQuery, objRecordSet ... Public Function AllComputersAs String() ...
    (microsoft.public.windows.server.scripting)
  • Re: Script: Remote shutdown of all domain computers in spec. OU
    ... I'v searched through the newsgroups for a complete script but to no ... I'v also found a script to search trough AD for the computers and added ... Public Function AllComputersAs String() ... 'Dim sArray() As String ...
    (microsoft.public.scripting.vbscript)
  • Making Global Code to reuse in DTS packages
    ... ' Visual Basic ActiveX Script ... Dim objFile ... Dim strScript ... Microsoft Data Transformation Services Package ...
    (microsoft.public.sqlserver.dts)
  • Script: Remote shutdown of all domain computers in spec. OU
    ... I'v searched through the newsgroups for a complete script but to no result. ... I'v also found a script to search trough AD for the computers and added the ... Public Function AllComputersAs String() ... 'Dim sArray() As String ...
    (microsoft.public.scripting.vbscript)