如何在PB中调用数据管道
1个回答
展开全部
//database_source为源数据库的事务对象
//database_destination为目标数据库的事务对象
// dw_errors为显示错误信息的数据窗口控件
// u_pipe_exchange为已经存在的管道
interger pipe_start_result
u_pipe_exchange iuo_pipe_exchange
iuo_pipe_exchange=CREATE u_pipe_exchange
pipe_start_result=iuo_pipeline_exchange.Start(database_source,database_destination,&
dw_errors)
choose case pipe_start_result
case 1
Beep(1)
MessageBox(“程序运行错误”，”管道打开失败”, Exclamation!)
Return
case 3
Beep(1)
MessageBox(“程序运行错误”，”pipe_user_table01表已经存在”, Exclamation!)
Return
Case 4
Beep(1)
MessageBox(“程序运行错误”，”pipe_user_table01表不存在”, Exclamation!)
Return
End choose
//database_destination为目标数据库的事务对象
// dw_errors为显示错误信息的数据窗口控件
// u_pipe_exchange为已经存在的管道
interger pipe_start_result
u_pipe_exchange iuo_pipe_exchange
iuo_pipe_exchange=CREATE u_pipe_exchange
pipe_start_result=iuo_pipeline_exchange.Start(database_source,database_destination,&
dw_errors)
choose case pipe_start_result
case 1
Beep(1)
MessageBox(“程序运行错误”，”管道打开失败”, Exclamation!)
Return
case 3
Beep(1)
MessageBox(“程序运行错误”，”pipe_user_table01表已经存在”, Exclamation!)
Return
Case 4
Beep(1)
MessageBox(“程序运行错误”，”pipe_user_table01表不存在”, Exclamation!)
Return
End choose
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
