![](https://img-blog.csdnimg.cn/20201014180756923.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
金蝶K3插件
消失了的灰色
这个作者很懒,什么都没留下…
展开
-
金蝶K/3插件 - 单个单据显示
Private Sub viewBill(ByVal BillTYPE As Long, ByVal lBillID As Long)Dim oBj As ObjectDim oDataSrv As ObjectOn Error GoTo CatchSet oDataSrv = m_BillInterface.K3Lib.CreateK3Object("K3ClassTpl.Data...原创 2018-09-14 10:45:50 · 1887 阅读 · 0 评论 -
金蝶K/3 查询SQL及单据显示
Private Sub viewContract(ByVal strContractID As String) Dim objLookup As Object Dim obj As Object Dim dFilter As KFO.Dictionary Dim rs As ADODB.Recordset Dim oDataSrv As Object ...转载 2018-09-14 11:00:44 · 3172 阅读 · 1 评论 -
金蝶K/3接口事件顺序
金蝶接口事件调用顺序转载 2018-09-14 13:31:55 · 1151 阅读 · 0 评论 -
金蝶WISE弹出框显示单据并返回被选单据
'当单机头触发点击事件时,显示 ClassTypeID=200000005 的单据,并返回选中的单据信息Private Sub m_BillInterface_HeadCtlClick(ByVal ctl As Object, ByVal dctHead As KFO.IDictionary) Dim oDataSrv As Object Dim objLookup As Ob...原创 2018-09-15 15:19:19 · 1448 阅读 · 1 评论