connect using i_dst; If i_dst.sqlcode $#@60;$#@62; 0 then Messagebox("目标数据库连接错误",i_dst.sqlerrtext) Return End If 在窗口中放置一个按钮用来运行数据管道,在此按钮的Clicked事件中写入如下语句: i_pipe=create u_pipe_sample i_pipe.read=st_read i_pipe.written=st_written i_pipe.error=st_error i_pipe.dataobject="Pipe_Sample"