GetPAZU
（创建时间：2010年11月18日 00:21:00）
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
  1. Public Function exec(ByVal s As String, Session As object) As String  

 

Session 是一个 Collection 对象,有以下键值对：

 

VB
  1. Session.add s, "CNStr"  
  2. Session.add s, "UserID"  
  3. Session.add s, "UserName"  
  4. Session.add s, "DBType"  
  5. Session.add bool, "isReg"  
  6. Session.add s, "LikeAllChr"  
  7. Session.add s, "AccYear"  
  8. Session.add s, "AccType"  
  9. Session.add s, "Arrow"  
  10. Session.add s, "DateBrkt"  
  11. Session.add s, "DateFormat"  
  12. Session.add s, "AppPath"  
2010年11月18日 00:21
回复(0)分类(1)转发(0)全文打开
文档中心