在PB中调用外部程序并判断其运行结束

您正在看的Powerbuilder教程是:在PB中调用外部程序并判断其运行结束

在PB中经常要调用外部程序并等待此程序运行结束后显示相关信息如我们要备份Adaptive Server Anywhere 数据库在备份结束后显示备份完成！的提示信息如果在调用备份程序dbbackup后马上用messagebox显示提示信息那么程序运行时则会出现这种情况 dbbackup备份程序还在运行备份完成！的提示就已经显示了显然不符合我们的设想对于这种情况我们可以借助API函数FindWindowA()IsWindow()和PB本身函数yield()来解决

声明API函数

Function long FindWindowA (String lpClassName String lpWindowName ) Library userdll

Function boolean IsWindow (Long hwnd ) Library userdll

调用

ulong ll_handle

int li_loop

SetPointer(HourGlass!) //设置鼠标指针

//运行备份数据库程序dbbackup并使其最小化

run(dbbackup c ~uid=dba;pwd=sql; dbf=D:\Sybase\Adaptive Server Anywhere \asademodb~ d:\backup Minimized!)

ll_handle =

//循环至dbbackup窗口打开

Do While ll_handle =

ll_handle = FindWindowA(ttydbbackup)

yield() //

loop

//等待dbbackup窗口关闭

Do While isWindow(ll_handle)

Yield()

Loop

//应用执行完成

MessageBox(提示信息 备份完成!)