Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

ejecutar batch con visual basic

Estas en el tema de ejecutar batch con visual basic en el foro de Visual Basic clásico en Foros del Web. hola necesito ejecutar un archivo batch (.bat) alpusar un boton en visual basic ------------------------------------------------------------------------------- 1. he creado un editor de texto con visual basic con ...
  #1 (permalink)  
Antiguo 02/10/2008, 16:31
 
Fecha de Ingreso: febrero-2008
Mensajes: 52
Antigüedad: 16 años, 2 meses
Puntos: 0
ejecutar batch con visual basic

hola
necesito ejecutar un archivo batch (.bat)

alpusar un boton en visual basic

-------------------------------------------------------------------------------
1. he creado un editor de texto con visual basic con el editor de texto he escrito el contenido del fichero batch.
2. cree un boton para poder guadar este text en .bat

pero ahora no se como ejecutar este fichero credo (.bat) a pulsar un boton ejemplo:
(ejecutar bad )
eso es lo que quiero hacer ejecutar el fichero bat ya creado al pulsar un botn

ayuda por favor gracias de antemeno
  #2 (permalink)  
Antiguo 02/10/2008, 19:27
 
Fecha de Ingreso: junio-2008
Mensajes: 17
Antigüedad: 15 años, 10 meses
Puntos: 0
Respuesta: ejecutar batch con visual basic

bueno man xD primera ves que ayudo [ya que siempre pedi ayuda] xD

mira para ejecutar el bat solo lo haces con la instruccion "shell" te dejo el ejemplo

Código:
Private Sub EjecutarBat_Click()

'aca le das la ruta donde se encuentra el .bat
Shell ("c:\prueba.bat"), vbNormalFocus   

End Sub
Anexo: el NormalFocus Significa que se ejecutara la venatana en modo normal

Ojala te aya servido mi auyda man ;)
cualkier cosa avisas ;)

Saludos
Vicento
  #3 (permalink)  
Antiguo 05/10/2008, 08:48
 
Fecha de Ingreso: noviembre-2007
Mensajes: 141
Antigüedad: 16 años, 5 meses
Puntos: 2
Respuesta: ejecutar batch con visual basic

Puedes ejecutar el batch como bien dice Vicento atraves de Shell
Pero creo que se el codigo estaría mejor asi:
Si lo que quieres es realizar un comando de batch te recomiendo que uses lo siguiente:

Shell("cmd.exe /c comando")
Ejemplo:
Shell("cmd.exe /c netstat -a")

Pero si lo que quieres es ejecutar un batch si o si y la ruta puede ser dinamica pero el archivo que guardas siempre esta donde el programa utiliza esto

Dim Ruta As String
Ruta = My.Application.Info.DirectoryPath & "\batch.bat"
Shell (Ruta, vbNormalFocus)

Espero que te haya servido.
  #4 (permalink)  
Antiguo 05/10/2008, 12:40
 
Fecha de Ingreso: julio-2008
Mensajes: 22
Antigüedad: 15 años, 9 meses
Puntos: 0
Respuesta: ejecutar batch con visual basic

emm :P
tambien mi primera ves en que ayudo a alguien xD

bueno mira eso es facil :P
me pregunto??? tas asiendo un editorm de batchs: P
yo tbm ise uno :P
y pss le agrege la opcion de "Testear Bat"
:P mira
lo unico que tienes que hacer es
que al momento de guardar el .Bat
guarde la direccion de donde se guardo
usando un CommonDialog1
y un label :P

Al Momento de guardar el archivo digamos asi:

Código:
  With Commondialog
   .CancelError = True
      .DialogTitle = "Guardar Archivo"
      .Filter = Formatos2   
      .ShowSave
      If .FileName = "" Then Exit Sub
        If .FilterIndex = 2 Then
            RichTextBox.SaveFile .FileName
        Else
            RichTextBox.SaveFile .FileName, rtfText
            
                  Label1.Caption = .FileName
Label3.Caption = .FileTitle

      End If
   End With
Asi Yo Lo Tengo, Utilizo Un RichTextBox

Lo Que Tienes Que Agregarle Por Si Lo Tienes Digamos

Código:
Label1.Caption = CommonDialog1.FileName
Lo Que Es .Filename
Hace Que El Label1 Guarde La Direccion Del Bat :P

Ahora, Creamos Un Boton
Y Le Pondremos Esto:

Código:
Dim res As Long
If Label1.Caption = "" Then
MsgBox ("Porfavor, Busca La Direccion Del Archivo (.bat) Que Desea Testear.")
Else
 res = ShellExecute(Me.hwnd, "Open", Label1.Caption, "", "", 1)
 End If
Bueno Y Si Quieres Que Al Momento De Dale Click A Testear Bat
Que Lo Guarde... Pss Agrega:

Código:
'Guardar
With Commondialog
            RichTextBox.SaveFile .FileName, rtfText
   End With
'Guardar
Quedaria Asi:

Código:
'Guardar
With Commondialog
            RichTextBox.SaveFile .FileName, rtfText
   End With
'Guardar


Dim res As Long
If Label1.Caption = "" Then
MsgBox ("Porfavor, Busca La Direccion Del Archivo (.bat) Que Desea Testear.")
Command4.Enabled = False
Else
 res = ShellExecute(Me.hwnd, "Open", Label1.Caption, "", "", 1)
 End If
Te Recomiendo Que Uses El Richtextbox :P
y si lo usas pss :D
te funcionara de maravilla
alguna duda mandame un pm :)
adios...
  #5 (permalink)  
Antiguo 05/10/2008, 19:03
 
Fecha de Ingreso: junio-2008
Mensajes: 17
Antigüedad: 15 años, 10 meses
Puntos: 0
Respuesta: ejecutar batch con visual basic

No es en mala onda muchachos, estan buenos sus codes de ejemplos

pero creo que el lo unico que pide es ejecutar un .BAT,
Creo que el creador del post, tendria que responder si les sirve o no las respuestas, por que si nos ponemos a pensar que podemso hacer con el BAT serian muchas las opciones..

saludos!
  #6 (permalink)  
Antiguo 06/10/2008, 07:46
 
Fecha de Ingreso: noviembre-2007
Mensajes: 141
Antigüedad: 16 años, 5 meses
Puntos: 2
Respuesta: ejecutar batch con visual basic

Si solo es ejecutar un bat yo le recomiendo esto:

Código:
Dim Ruta As String
Ruta = My.Application.Info.DirectoryPath & "\batch.bat"
Shell (Ruta, vbNormalFocus)
Pero recuerda que batch.bat debe estar en el mismo sitio donde se ejecute la aplicación.
  #7 (permalink)  
Antiguo 02/11/2008, 11:56
 
Fecha de Ingreso: febrero-2008
Mensajes: 52
Antigüedad: 16 años, 2 meses
Puntos: 0
Respuesta: ejecutar batch con visual basic

estube fuera pero todos esto voy a ver si mi sirve ya que remote mi proyecto hoy :)
lo siento por no haber respondido antes
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 03:16.