Visual Basic - VB desde tarea programada

Life is soft - evento anual de software empresarial
   
Vista:

VB desde tarea programada

Publicado por HDM (3 intervenciones) el 31/12/2009 11:24:10
Hola a todos.

Quiero realizar una tarea programada en la que se ejecuta un codigo VB para capturar la pantalla y guardar la imagen en disco para su posterior analisis. El codigo VB funciona correctamente desde windows o en un batch desde el 'simbolo de sistema' pero no es el caso cuando se ejecuta desde 'tareas programadas'. He comprobado que efectivamente se ejecuta (no da error) pero parte del codigo no funciona, p.e. la captura de pantalla (no copia el contenido al portapapeles). Alguien me puede ayudar ?
Saludos,
HDM

el programa :

<<
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim MyStartupArguments() _
As String
Dim intCount As Integer
Dim activeWindow As Boolean
Dim save As Boolean
Dim fileName = "default.bmp"

MyStartupArguments = _
System.Environment.GetCommandLineArgs
For intCount = 0 To UBound(MyStartupArguments)
If MyStartupArguments(intCount).ToString = "active" Then
activeWindow = True
ElseIf MyStartupArguments(intCount).ToString = "saveas" Then
If UBound(MyStartupArguments) > intCount Then
save = True
fileName = MyStartupArguments(intCount + 1).ToString

End If
End If
Next

If activeWindow Then
Windows.Forms.SendKeys.SendWait("{PRTSC}")
Else
Windows.Forms.SendKeys.SendWait("+{PRTSC}")

End If

My.Computer.Audio.PlaySystemSound(System.Media.SystemSounds.Asterisk)
If save Then
Dim d As IDataObject = Clipboard.GetDataObject()
Dim counter As Integer = 0
While Not d.GetDataPresent(DataFormats.Bitmap) And counter < 10
System.Threading.Thread.Sleep(500)
counter = counter + 1

End While

If (d.GetDataPresent(DataFormats.Bitmap)) Then
Dim b As Bitmap = d.GetData(DataFormats.Bitmap)
b.Save(fileName)
End If
End If
Me.Dispose()
Application.Exit()
End Sub
>>
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Visual Basic
- Código fuente de Visual Basic
- Cursos de Visual Basic
- Temas de Visual Basic
- Chat de Visual Basic
información
Códigos de Visual Basic
- Manejo de Vectores
- Codigo de Barras
- Paint

RE:VB desde tarea programada

Publicado por juan carlos (518 intervenciones) el 04/01/2010 02:44:50
llamame a
mega.juca@hotmail.es
y te doy un programa que hice para capturar la pantalla
con todo y codigo fuente
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:VB desde tarea programada

Publicado por HDM (3 intervenciones) el 04/01/2010 17:41:11
Gracias por tu respuesta Juan Carlos.
He intentado en viarte un correo a la dirección que me indicas pero recibo un error del servidor de correo y no puedo contactar contigo.

Saludos,
HDM
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:VB desde tarea programada

Publicado por juan carlos (518 intervenciones) el 06/01/2010 04:50:28
apuntame tu correo aqui y te lo mando
no se que paso
escribiste asi
mega.juca@hotmail.es
escribiste el punto despues de mega
le pusistes la extension es
apuntamela aqui y te lo envio
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:VB desde tarea programada

Publicado por HDM (3 intervenciones) el 08/01/2010 09:33:59
Hola de nuevo Juan Carlos.
Mi correo es hdunkelm@terra.es
Gracias y ya te informaré si me funciona.

Saludos,
HDM
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar