'InsertMsg ' End Sub

写完消息后，门户消息中心 刷新一次 会看到刚才增加的消息

第六步：消息中心联查单据

关闭 测试单据页签，到消息中心双击刚才增加的记录 “联查单据测试” 可以看到双击后门户自动打开了测试单据001

第七步：调用其他功能，如联查其他单据

Private Sub cmdViewSaleOrder_Click() 代码如下

Call g_business.ResetCallFunctionFlag Dim strNewCommandline As String strNewCommandline = \

销售订单

&&&SubSysID:SA&&&AuthID:SA03010104&&&CmdLine:\

Call g_business.RunCommand(strNewCommandline) End Sub