![]()
等级：新手上路
财产：
经验：
魅力：
注册：2007-7-14
文章：2
鉴定：保密 ![]()
| | ![]()
    
 | 感谢大家帮帮忙，我做了个收费软件一台客户端打印收费小票，另一台就定格了
感谢大家帮帮忙，
我做了个收费软件一台客户端打印收费小票，另一台客户端屏幕就定格了，
我用的是PB7，ORALE817数据库
If dw_1.update() = 1 AND SQLCA.SQLCode = 0 Then
Commit Using SQLCA;
dw_print.retrieve(v_exam_no)
If dw_print.rowcount() > 0 Then
Long ll_job
ll_job = PrintOpen()
if ll_job = -1 then
messagebox("系统提示","打印机未准备好")
return
end if
printdatawindow(ll_job,dw_print)
printclose(ll_job)
Else
messagebox ("提示信息!","未检索到打印挂号信息，不能打印?")
End if
ELSE
RollBack Using SQLCA;
messagebox('提示信息！','当前挂号信息不能保存！A',StopSign!) Return
END IF | |
|
蓝色快车PB俱乐部论坛
浏览：感谢大家帮帮忙，我做了个收费软件一台客户端打印收费小票，另一台就定格了
顶端 
保密