Power Builder - PARA OSCAR Y OTROS

Por un lado tengo una aplic pb en donde guardo en variable un nombre y la ubicacion .... y por otro lado tengo un software para scanear (no es pb) ..."HP PRECISION SCAN PRO"...
estando en el sofware de scaner le doy grabar y me pide un nombre y ubicación... podria yo mandarle el nombre y ubicacion que tengo guardado en powerbuilder....??????
espero que me hayas entendido ......gracias..

Alejandro.

Crearemos una "ventana espia" que permanece invisible, y cada segundo averiguará si está abierta la ventana "Guardar como". En el momento que ésta se abre, le enviaremos pulsaciones de teclas (tu variable y la tecla ENTER)

1. En Global External Functions, declaras:
FUNCTION ULong FindWindowA(ULong classname, String windowname) LIBRARY "user32.dll"
SUBROUTINE Sleep(Long lMilliSec) LIBRARY "Kernel32.dll"

2. Evento Open de la w_espia
//Verifica cada 1 segundo
Timer(1)

3. Evento Timer de la w_espia:
Ulong l_handle
//Titulo de la ventana que buscará
//(distingue mayus de minus)
l_handle = FindWindowA(0,"Guardar como")

//Si encuentra
If l_handle > 0 then

oleobject wsh
long ll_rc

wsh = CREATE oleobject
ll_rc = wsh.ConnectToNewObject("WScript.Shell")
//Volvemos a activar la ventana
wsh.AppActivate( "Guardar como")

//Enviamos teclas:Ejemplo, pulsamos TAB hasta llegar al foco
//donde se escribe el nombre del archivo
Sleep (100)
wsh.SendKeys( "{TAB}")
Sleep (100)
wsh.SendKeys( "{TAB}")
Sleep (100)
wsh.SendKeys( "{TAB}")
Sleep (100)
//Luego escribimos la ruta completa
wsh.SendKeys( "C:\logo.jpg")
//Enter
wsh.SendKeys( "{ENTER}")

wsh.DisconnectObject()
DESTROY wsh
End IF
//-----Fin------
Nota: Tu w_espia la puedes ejecutar, por ejemplo en el evento open de tu aplicación.
open(w_main)
open(w_espia)