老单打开指定BOS单
668次浏览
编辑于2016年11月17日 16:15:12
Set oDataSrv = CreateObject("K3ClassTpl.DataSrv")
oDataSrv.ClassTypeID = 200000014
Set obj = CreateObject("K3SingleClassBill.ClassInfoManager")
With obj
.DataSrv = oDataSrv
.ISNetControl = False
.ISCheckRight = False
.Show , , , dctdata
bOK = .IsOK
oDataSrv.ClassTypeID = 200000014
Set obj = CreateObject("K3SingleClassBill.ClassInfoManager")
With obj
.DataSrv = oDataSrv
.ISNetControl = False
.ISCheckRight = False
.Show , , , dctdata
bOK = .IsOK
推荐阅读
您的鼓励与嘉奖将成为创作者们前进的动力,如果觉得本文还不错,可以给予作者创作打赏哦!
请选择打赏金币数 *
10金币20金币30金币40金币50金币60金币
可用金币: 0