Abrir imagen en el paint con VBS

Foro de elhacker.net

Programación

Programación General

.NET (C#, VB.NET, ASP)

Programación Visual Basic (Moderadores: LeandroA, seba123neo)

Abrir imagen en el paint con VBS

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

Páginas: [1]

Autor

Tema: Abrir imagen en el paint con VBS (Leído 5,467 veces)

santizuche

Desconectado

Mensajes: 21

Abrir imagen en el paint con VBS

« en: 11 Diciembre 2014, 01:58 am »

Hola buenas noches,
Parece tonto pero me esta matando y no se como resolverlo, en fin
No se si este tema va en esta sección. Lo que yo busco es copiar el código para solucionar esto en un bloc de notas con la terminación .vbs y aprender.
::--------------------Problema
Yo tengo una carpeta que se llama "Imagen" esta contiene un archivo llamado "perro.png" , esta carpeta se encuentra en el escritorio con el archivo .VBS
Creo que la ruta seria esta ( ".\Imagen\perro.png" )
La cuestion es que yo se abrir el paint, pero no puedo abrir la imagen en el mismo

::----------MiCodigo
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run ("mspaint") , 9
::----------MiCodigo

::--------------------Problema
Gracias por verlo e intentar ayudarme, saludos

Si no llego a ser claro, estoy atento para responder


« Última modificación: 12 Diciembre 2014, 01:25 am por santizuche »	En línea

LeandroA

Moderador

Desconectado

Mensajes: 760

www.leandroascierto.com

Re: Abrir imagen en el paint con VBS

« Respuesta #1 en: 11 Diciembre 2014, 05:33 am »

Hola mira creo que asi:
hay dos formas una tomando como base la misma ruta que el .vbs y la otra utilizando la ruta del escritorio.

Código:

Set WshShell = WScript.CreateObject("WScript.Shell")
'WshShell.Run "%windir%\system32\mspaint.exe " & chr(34) & left(WScript.ScriptFullName,instrrev(WScript.ScriptFullName,"\")) & "Imagen\35737.png" & chr(34) 
WshShell.Run "%windir%\system32\mspaint.exe " & chr(34) & WshShell.SpecialFolders("Desktop") & "\Imagen\35737.png" & chr(34)


	En línea

http://leandroascierto.com/blog/

santizuche

Desconectado

Mensajes: 21

Re: Abrir imagen en el paint con VBS

« Respuesta #2 en: 12 Diciembre 2014, 01:24 am »

Gracias por responder!
Me funciono, lo cambie un poco tenias un error en el primero que no andaba pero lo corregí tenia un (') de mas, quedo asi:

::----------------------------------Solución

Código:

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "mspaint.exe " & chr(34) & left(WScript.ScriptFullName,instrrev(WScript.ScriptFullName,"\")) & "Archivo\perro.png" & chr(34)

::----------------------------------Solución


	En línea

Páginas: [1]

Ir a:

Mensajes similares
	Asunto	Iniciado por	Respuestas	Vistas	Último mensaje
	no puedo abrir el corel paint shop pro photo x2 Diseño Gráfico	zay	3	6,627	15 Marzo 2008, 18:05 pm por zay
	Duda sobre quitar imagen en paint Diseño Gráfico	Senior++	7	9,932	17 Octubre 2013, 05:25 am por tincopasan
	Resolver el conflicto de copiar una imagen de Paint/Word a Flash. Diseño Gráfico	Tachikomaia	2	4,945	15 Abril 2024, 07:34 am por Tachikomaia
	Abrir PNG rápido con Chrome aunque esté configurado con Paint. Windows	Tachikomaia	5	12,013	24 Junio 2025, 16:18 pm por EdePC
	Lograr que Paint muestre la imagen a más de 800%. Windows	Tachikomaia	5	2,050	15 Mayo 2026, 17:28 pm por EdePC