Tambien puedes publicar tus dudas en:

Autor Tema: Ejecutar comandos de Ms-DOS con VB  (Leído 18316 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado Frugulletti

  • Me das tu IP?
  • *
  • Mensajes: 32
  • Sexo: Masculino
  • Member, pOrtal HAcker
    • Ver Perfil
Ejecutar comandos de Ms-DOS con VB
« en: 25 Mayo 2007, 03:53:17 pm »
Hola buenos días, alguien tiene idea de como ejecutar comandos de Ms-DOS con Visual Basic ? comandos como un ping por ejemplo -se que lo hay, casualmente tenia un procedimiento para ello pero lo extravié- en estos momento necesito obtener la hora del servidor de mi base de datos, tengo un comando que lo hace pero en consola "Net Time" se que hay que hacer uso de shell pero no conozco la sintaxis, quisiera usarlo desde visual, si alguien me puede dar una mano se lo agradesco…
« última modificación: 25 Mayo 2007, 03:58:49 pm por Frugulletti »

Desconectado ranefi

  • CPH's CEO
  • adm
  • *****
  • Mensajes: 1,300
  • Sexo: Masculino
  • SELECT * FROM guapos WHERE papito_chulo = 'ranefi'
    • Ver Perfil
    • Saulo rechaza a Dios
Re: Ejecutar comandos de Ms-DOS con VB
« Respuesta #1 en: 25 Mayo 2007, 05:48:55 pm »
Hola buenos días, alguien tiene idea de como ejecutar comandos de Ms-DOS con Visual Basic ? comandos como un ping por ejemplo -se que lo hay, casualmente tenia un procedimiento para ello pero lo extravié- en estos momento necesito obtener la hora del servidor de mi base de datos, tengo un comando que lo hace pero en consola "Net Time" se que hay que hacer uso de shell pero no conozco la sintaxis, quisiera usarlo desde visual, si alguien me puede dar una mano se lo agradesco…

Buena tarde Frugulletti. Lo que necesitas es hacer lo siguiente.

Agregar 1 control, 1 CommandButton e insertar el siguiente código en un...

Formulario
Código: [Seleccionar]

Private Sub Command1_Click()
    Shell "cmd.exe /c NET TIME>C:\caca.txt"
End Sub


Con eso ejecutas cualquier comando MS-DOS y para comprobar que se ejecutó de forma correcta pasamos la información consultada en un archivo de texto ubicado en la unidad C. Nos vemos.

SELECT
   Guapos.NombreDelGuapo AS Nombre,
   Guapos.Conquistas AS Conquistas,
   Listos.IQ AS IQ,
   Carismaticos.CuantosLoAman AS LosQueMeAman,
   Modestos.Grado AS GradoModestia
FROM
   PapitosChulos.LosMasGuapos Guapos
      JOIN PapitosChulos.LosMasListos Listos
         ON Guapos.PapiID = Listos.PapiID
      JOIN PapitosChulos.LosMasCarismati cos Carismaticos
         ON Guapos.PapiID = Carismaticos.PapiID
      JOIN PapitosChulos.LosMasModestos Modestos
         ON Guapos.PapiID = Modestos.PapiID
WHERE
   Guapos.NombreDelGuapo = 'ranefi'
AND
   Guapos.FechaGuapoDelMomento = GETDATE()

Desconectado djjonex

  • Me das tu IP?
  • *
  • Mensajes: 3
    • Ver Perfil
Re: Ejecutar comandos de Ms-DOS con VB
« Respuesta #2 en: 04 Junio 2007, 07:40:24 am »
gracias  no sabia este comando!!! jejeje ya se me daño la mente! jaja!

Desconectado mdelcampo

  • Me das tu IP?
  • *
  • Mensajes: 2
    • Ver Perfil
Re: Ejecutar comandos de Ms-DOS con VB
« Respuesta #3 en: 19 Diciembre 2009, 07:00:23 pm »
Hola,


tengo una duda sobre esto el codigo que estoy usando es asi

    TxtDir = "\\SERVER\Carpeta compartida"

    Shell "cmd.exe /c start " & Chr(34) & "TITULO" & Chr(34) & " " & Chr(34) & TxtDir & Chr(34), vbMinimizedNoFocus

funciona pero tiene que ingresar el usuario al servidor para tener acceso, si alguno me pudiera ayudar para enviar el usuario y la contraseña para que esta no sea pedida.

hace tiempo algo leí que se ponía "usuario:password" pero ya probé y no funciona y eh encontrado de nuevo la información o saber en que lugar se pone   saludos.

Desconectado mDrinky

  • Si te metes con CPH
    te metes conmigo
  • ****
  • Mensajes: 2,842
    • Ver Perfil
Re: Ejecutar comandos de Ms-DOS con VB
« Respuesta #4 en: 19 Diciembre 2009, 07:36:45 pm »
Es un tema viejo... cerraran el tema seguramente...  abre otro post nuevo para tu duda.... y recuerda leer las reglas...

salu2!