i_sel="SELECT table_bom_mx_end.fld_th, table_bom_mx_end.fld_th_mc FROM table_bom_mx_end where fld_th not in (select wlb.old_wl_th from wlb using trans_xs) using sqlca "
i_sel="SELECT table_bom_mx_end.fld_th, table_bom_mx_end.fld_th_mc FROM table_bom_mx_end where fld_th not in (select wlb.old_wl_th from wlb using trans_xs) using sqlca "
i_sel="SELECT table_bom_mx_end.fld_th, table_bom_mx_end.fld_th_mc FROM table_bom_mx_end where fld_th not in (select wlb.old_wl_th from wlb using trans_xs) using sqlca "
这个要是可行,那叫神话呢,一个SQL语句是不可能链接两个事务的。
if sqlca.sqlcode <> 0 then
messagebox('错误:','连接数据库失败!')
return
end if
if trans_xs.sqlcode <> 0 then
messagebox('错误:','连接数据库失败!')
return
end if
Debug一下,看看sqlca.sqlcode和trans_xs.sqlcode的返回值,先这么检查,看连接数据库成功没有。