Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

leer resultados de consola

14/05/2004 - 22:12 por Caio | Informe spam
Ayuda Hacer una pregunta
Hola gente.
Necesito ejecutar un comando de DOS y leer el resultado. Todo esto desde
Visual Basic

Por el moemtno lo estoy haciendo de la sgte forma_

Dim fHandle As Integer
Dim FileName As String
Dim Salida As String

'Obtenemos el directorio y lo mostramos en un archivo
Shell "command.com ipconfig > c:unt.txt"

fHandle = FreeFile
FileName = "c:unt.txt"
Open FileName For Input As fHandle
Salida = Input(LOF(fHandle), fHandle)
Close fHandle



El problema esta en que cada vez que ejecuto ese codigo, se abre una ventana
de consola y se cierra automaticamente.
Se puede hacer lo mismo pero sin que se abra la consola????

Agradeceria mucho si alguien me puede dar una mano.

Gracias
Caio
email Siga el debateRespuesta 1 respuestaRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Alejandro Campos Magencio [MS]
17/05/2004 - 09:42 | Informe spam
Yo recuerdo que escondía la consola así:

ShowWindow GetConsoleWindow(), SW_HIDE

donde

Public Const SW_HIDE = 0
Public Const SW_SHOW = 5

Public Declare Function GetConsoleWindow Lib "kernel32" () As Long

Public Declare Function ShowWindow Lib "user32" _
(ByVal hWnd As Long, ByVal nCmdShow As Long) As Long

Aunque a mi la consola me aparecía por motivos diferentes, por lo que no se
si a ti te servirá esto.
Un saludo,

Alejandro Campos Magencio [MS]

Este mensaje se proporciona "como está" sin garantías de ninguna clase, y no
otorga ningún derecho.
"Caio" wrote in message
news:uAUJl$
Hola gente.
Necesito ejecutar un comando de DOS y leer el resultado. Todo esto desde
Visual Basic

Por el moemtno lo estoy haciendo de la sgte forma_

Dim fHandle As Integer
Dim FileName As String
Dim Salida As String

'Obtenemos el directorio y lo mostramos en un archivo
Shell "command.com ipconfig > c:unt.txt"

fHandle = FreeFile
FileName = "c:unt.txt"
Open FileName For Input As fHandle
Salida = Input(LOF(fHandle), fHandle)
Close fHandle



El problema esta en que cada vez que ejecuto ese codigo, se abre una
ventana
de consola y se cierra automaticamente.
Se puede hacer lo mismo pero sin que se abra la consola????

Agradeceria mucho si alguien me puede dar una mano.

Gracias
Caio





Preguntas similares

 

Busqueda sugerida :