'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