hacker


Ingresar con nombre de usuario, contraseña y duración de la sesión
| Portal Hacker | Editorial | Descargas | Ezine |
Inicio Ayuda Ingresar Registrarse
24 de Julio de 2008, 01:18:09
Noticias: ¿Buscas código fuente para Visual Basic? Haz clic
Para ver este enlace Registrate o Inicia Sesion
aquí

+  Foros pOrtal Hacker
|-+  Programacion
| |-+  Programación en general
| | |-+  Visual Basic (Moderadores: ranefi, crypto136, ziBboh, >> s E t H <<)
| | | |-+  ejecutar cualuier clase de archivo?
0 Usuarios y 1 Visitante están viendo este tema. « anterior próximo »
Páginas: [1] Ir Abajo Imprimir
Autor Tema: ejecutar cualuier clase de archivo?  (Leído 828 veces)
clipto boxw
NZ3
***
Desconectado Desconectado

Mensajes: 697


CBX


Ver Perfil WWW
« : 11 de Junio de 2006, 12:27:28 »

bueno creo que mi pregunta o duda lo describe todo. lo ue conosco es lo siguiente

Shell "cmd.exe /c start c:\archivo.txt"

shell "ejecutable"

shell "explorer " & pajinaweb

como aria para abrir cualquier clase de archivo. con codigos parecidos.

NOTA: porfabor no me digan que con el commondialog1 "esque ya lo estoy ultilizndo" y necesito otra forma.
En línea

HACKERSLIBRES. ES
porque negar la ayuda a alguien o esque acaso tu nunca la has necesitado. el proposito de esto es que todos sepamos ya que la informacion es libre y para todos. si no lo crees asi eres un estupido
Yngwie Maty
NZ2
**
Desconectado Desconectado

Mensajes: 272


La guitarra,causa y solución a todos mis problema


Ver Perfil WWW
« Respuesta #1 : 11 de Junio de 2006, 01:32:06 »

no te entiendo mucho, pero creo q te refieres a abrir archivos de cualqr extension...

Código:
Shell "rutaprogramaparaabrirelarchivo rutaarchivo"

por ejemplo
Código:
Shell "mspaint.exe c:\a.jpg" 'esto abre el archivo a.jpg cn paint, no pongo la ruta completa, ya q mspaint esta en c:\windows\system32 y esta es la ruta por defecto de cmd

salu2
En línea


Para ver este enlace Registrate o Inicia Sesion
M_BuRNeD
NZ3
***
Desconectado Desconectado

Mensajes: 504


Silencio....que todo llega


Ver Perfil
« Respuesta #2 : 11 de Junio de 2006, 01:50:05 »

A lo mejor se refiere a :
Código:
Open archivo for Input   as Integer
                        Output
                        Append
                        Binary
                        .....
     
En línea


Burning Freedom
clipto boxw
NZ3
***
Desconectado Desconectado

Mensajes: 697


CBX


Ver Perfil WWW
« Respuesta #3 : 11 de Junio de 2006, 02:25:59 »

bueno no me explique bien los codigos anteriores si abren los progrsamas es solo que antes de ejecutarlos salen dos mensaje uno que si desea guardar el archivo "si ya esta en micompu" y otro que si estoy seguro de abrirlo cuando estos son programas creados por micrsoft en algunos casos

y creo que tu codigo
Citar
Shell "rutaprogramapa raabrirelarchi vo rutaarchivo"
-----hace un poco de referencia a:

Citar
Shell "cmd.exe /c start c:\archivo.txt"

bueno espero me sigan ayudando.
En línea

HACKERSLIBRES. ES
porque negar la ayuda a alguien o esque acaso tu nunca la has necesitado. el proposito de esto es que todos sepamos ya que la informacion es libre y para todos. si no lo crees asi eres un estupido
Yngwie Maty
NZ2
**
Desconectado Desconectado

Mensajes: 272


La guitarra,causa y solución a todos mis problema


Ver Perfil WWW
« Respuesta #4 : 11 de Junio de 2006, 02:59:37 »

juaz, ahora si q no entiendo nada de nada...podrias expresarte mejor por favor...
salu2
En línea


Para ver este enlace Registrate o Inicia Sesion
clipto boxw
NZ3
***
Desconectado Desconectado

Mensajes: 697


CBX


Ver Perfil WWW
« Respuesta #5 : 13 de Junio de 2006, 08:47:40 »

mira me explico de nuevo.
esos codigos si abren los archivos, pero lo que psa es que al intentar abrirlos me manda dos mensajes "como si los archivos no estubieran en mi computador" un mensaje me dice que si deseo guardarlo o ejecutarlo "igual que cuando quieres descargar un archivo de internet y no tienes un gestor de descarga" y le doy no guardar e intenta abrir el archivo,  pero el otro mensaje me dice que si realmente estoy seguro de abrir el archivo" y le doy que si y lo abre.

en resumen lo que quiero es una forma de abrir los archivos sin que me salgan esos dos mensajes.
En línea

HACKERSLIBRES. ES
porque negar la ayuda a alguien o esque acaso tu nunca la has necesitado. el proposito de esto es que todos sepamos ya que la informacion es libre y para todos. si no lo crees asi eres un estupido
ranefi
Moderador Global
*****
Desconectado Desconectado

Mensajes: 1,232


SELECT * FROM guapos WHERE papito_chulo = 'ranefi'


Ver Perfil WWW
« Respuesta #6 : 13 de Junio de 2006, 11:27:44 »

Hola clipto boxw, buena tarde. Lo que necesitas es utilizar una API, aquí te dejo un ejemplo:

Agregar 1 control CommandButton e insertar el siguiente código

Código:

Private Declare Function WinExec Lib "kernel32" _
    (ByVal lpCmdLine As String, _
    ByVal nCmdShow As Long) As Long


Private Sub Command1_Click()
    Dim Ruta As String
   
    Ruta = "C:\Archivos de programa\Microsoft Office\Office10\"
   
    WinExec Ruta & "winword.exe c:\hola.doc", 10
End Sub


Nota que se asume que existe un documento de Word llamado hola.doc ubicado en la unidad C. También puedes abrir un archivo de texto, pero obviamente cambiando winword.exe por notepad.exe; si llegas a utilizar el bloc de notas no es necesario que declares la ruta de la aplicación, pues ésta ya se encuentra dada de alta en las variables de entorno de Windows. Espero esto te sirva. Nos vemos.


PD: No está de más decirte que si quieres abrir un documento de Word usando el mismo ejemplo de arriba, deberás asegúrarte de que tienes la misma versión que yo (nota que la carpeta se llama Office10), si no la tienes obviamente no funcionará (y deberás cambiar la ruta). Nos vemos.
En línea


SELECT * FROM mejores_batos_ del_mundo WHERE id = (SELECT DISTINCT id_guapo FROM los_mas_guapos _del_mundo WHERE papito_chulo = 'ranefi')
Abdarllazir
Visitante
« Respuesta #7 : 01 de Julio de 2006, 01:39:32 »

no se muy bien de lo ke ablan y disculpen mi ignorancia pero en algunos casos toka apelar al block de notas para algunos archivos
En línea
clipto boxw
NZ3
***
Desconectado Desconectado

Mensajes: 697


CBX


Ver Perfil WWW
« Respuesta #8 : 01 de Julio de 2006, 03:10:35 »

gracias ranefi por la informacion es de mucha ayuda... Grin
En línea

HACKERSLIBRES. ES
porque negar la ayuda a alguien o esque acaso tu nunca la has necesitado. el proposito de esto es que todos sepamos ya que la informacion es libre y para todos. si no lo crees asi eres un estupido
Páginas: [1] Ir Arriba Imprimir 
« anterior próximo »
Ir a:  


Ingresar con nombre de usuario, contraseña y duración de la sesión

Powered by SMF 1.1.5 | SMF © 2006-2008, Simple Machines LLC hacker

Juegos gratis - Articulos PHP - Juegos - Trucos - Letras - Juegos - Juegos Online