那些年踩过的坑

记录那些踩过的坑,以防再踩

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

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

(加入日期:2001-6-21)

保存文章至硬盘】【打印文章】【字体:

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

声明API函数:
Function long FindWindowA (String lpClassName , String lpWindowName ) Library "user32.dll"
Function boolean IsWindow (Long hwnd ) Library "user32.dll"

调用:
ulong ll_handle
int li_loop

SetPointer(HourGlass!) //设置鼠标指针
//运行备份数据库程序dbbackup,并使其最小化
run("dbbackup -c ~"uid=dba;pwd=sql; dbf=D:\Sybase\Adaptive Server Anywhere 6.0\asademo.db~" d:\backup", Minimized!)

ll_handle = 0
//循环至dbbackup窗口打开
Do While ll_handle = 0
    ll_handle = FindWindowA("tty","dbbackup")
    yield() //
loop     
//等待dbbackup窗口关闭
Do While isWindow(ll_handle)
    Yield()
Loop
//应用执行完成
MessageBox("提示信息", "备份完成!")
阅读更多
个人分类: PowerBuilder
上一篇在PB中实现数据录入维持序号连续性的简单实现
下一篇在PB中实现ftp传输
想对作者说点什么? 我来说一句

PB控制运行其他程序(源码)

2007年12月19日 102KB 下载

没有更多推荐了,返回首页

关闭
关闭