Autor Tema: Visor De Imagenes Y Fax (Leído 1387 veces)

carpanta · « **en:** Domingo 19 de Noviembre de 2006, 20:44 »

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

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 = &#34;C:&#092;DSC00540.jpg&#34; 'Ruta del archivo que se desea abrir
 
  ls_DirSistema = Environ(&#34;SystemRoot&#34;) 'Obtener el directorio del sistema
  ls_VisorImagenesRuta = &#34;rundll32.exe &#34; & ls_DirSistema & &#34;&#092;system32&#092;shimgvw.dll,ImageView_Fullscreen &#34; & ls_Archivo 'Generar instruccion a ejecutar
        
   Shell ls_VisorImagenesRuta, vbNormalFocus 'Abrir el archivo
End Sub

Tambien pudieras usar ShellExecute (Api) o tal vez haya una api para el propio visor

, no se pero esa funciona

Saludos

carpanta

Perfecto!!. Muchas gracias F_Tanori

SoloCodigo

Autor Tema: Visor De Imagenes Y Fax (Leído 1387 veces)

carpanta

Visor De Imagenes Y Fax

F_Tanori

Re: Visor De Imagenes Y Fax

carpanta

Re: Visor De Imagenes Y Fax