Jangogo :
'获得一个PAZU对象,用于处理远程SC代码 Function GetPAZU(ByVal sSCPage As String, Optional stoneA As String, Optional includeA As String, Optional ByVal sSysCall As String, Optional ByVal strJSON As String ) as Object
sSCPage : 后台代码ID, 如 inventory.bill 表示 进销存模块的单据 stoneA : 要动态附加的SC代码
includeA : 要动态附件的后台代码ID
sSysCall : 在执行后台代码前先调用系统过程
strJSON: sSysCall 时附带的参数
如果执行sSysCall 后有结果返回,则这个结果放在PAZU对象的SysResultString属性中
如果sSysCall参数中包含"."(如:mySysClass.obj)则需要你自己实现一个 mySysClass.obj 的类,并实现一个方法:
VB
- Public Function exec(ByVal s As String, Session As object) As String
Session 是一个 Collection 对象,有以下键值对:
VB
- Session.add s, "CNStr"
- Session.add s, "UserID"
- Session.add s, "UserName"
- Session.add s, "DBType"
- Session.add bool, "isReg"
- Session.add s, "LikeAllChr"
- Session.add s, "AccYear"
- Session.add s, "AccType"
- Session.add s, "Arrow"
- Session.add s, "DateBrkt"
- Session.add s, "DateFormat"
- Session.add s, "AppPath"
文档中心