Programación General > Visual Basic 6.0 e inferiores

 Visor De Imagenes Y Fax

(1/1)

carpanta:
Hola. A ver si alguno me podeis ayudar. Estoy haciendo una aplicacion que maneja fotografias y me gustaria saber como llamo al visor de imagenes de XP desde vb6.

Gracias de antemano :kicking:

F_Tanori:
Hola

Mira esta es una manera de abrir un archivo con el Visor de Imagenes



--- Código: Text --- Private Sub CmdVisor_Click()Dim ls_VisorImagenesRuta As String, ls_Archivo, ls_DirSistema   ls_Archivo = "C:\DSC00540.jpg" 'Ruta del archivo que se desea abrir   ls_DirSistema = Environ("SystemRoot") 'Obtener el directorio del sistema  ls_VisorImagenesRuta = "rundll32.exe " & ls_DirSistema & "\system32\shimgvw.dll,ImageView_Fullscreen " & ls_Archivo 'Generar instruccion a ejecutar           Shell ls_VisorImagenesRuta, vbNormalFocus 'Abrir el archivoEnd Sub 
Tambien pudieras usar ShellExecute (Api) o tal vez haya una api para el propio visor  :ph34r: , no se pero esa funciona ;)


Saludos

carpanta:
Perfecto!!. Muchas gracias F_Tanori

Navegación

[0] Índice de Mensajes