SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: ElNapster en Martes 28 de Octubre de 2008, 19:40

Título: Como ejecuto un JOB de SQL2005
Publicado por: ElNapster en Martes 28 de Octubre de 2008, 19:40
Hola como estan !!! como puedo ejecutar un job que esta en sql 2005 desde vb6 ?

Gracias amigos !
Título: Re: Como ejecuto un JOB de SQL2005
Publicado por: F_Tanori en Martes 28 de Octubre de 2008, 21:57
Yo lo utilizo de esta manera en SQL Server 2000 (y creo es valido para 2005) con : ADO 2.8

Código: Visual Basic
  1.  
  2. 'http://technet.microsoft.com/es-es/library/ms186757.aspx
  3. 'http://technet.microsoft.com/es-es/library/ms186757(SQL.90).aspx
  4.  
  5. Private Sub CmdJob_Click()
  6. On Error GoTo xError
  7.    Dim Cnn As New Connection
  8.    Dim Rs As New Recordset
  9.    Dim cnnStr As String
  10.    
  11.    
  12.    cnnStr = "Driver={SQL Server};Server=(local);Database=msdb;Uid=sa;Pwd=44444;"
  13.    
  14.    Cnn.Open cnnStr
  15.    Cnn.Execute "Exec sp_start_job 'dbWC01Bkp'", Cnn '// 'dbWC01Bkp' Nombre de la tarea
  16.    
  17. xError:
  18.     If Err.Number <> 0 Then
  19.         Select Case Err.Number
  20.             Case -2147352571
  21.                 MsgBox "La tarea se inicio con exito", vbInformation, "Exito"
  22.             Case Else
  23.                 MsgBox Err.Description, vbCritical, "Error: " & Err.Number
  24.         End Select
  25.         Err.Clear
  26.     End If
  27.    Rs.close
  28.    Cnn.close
  29.    Set Cnn=Nothing
  30.    Set Rs=Nothing
  31. End Sub
  32.  
  33.  
  34.  

Espero te sirva

Saludos
Título: Re: Como ejecuto un JOB de SQL2005
Publicado por: ElNapster en Martes 28 de Octubre de 2008, 22:51
uuuuuuuuuuuuuuuuuuuuuuy amigo !! gracias ! creo que si me servira y de mucho ....  :beer: