为WMS添加按钮

---- 语言表
SELECT A.* ,A.ROWID FROM CFG_LANGUAGE A WHERE LID IN( 'TBSTOCKGOODS','TBWCS1','OPERATIONSNAVIGATOR','TBDATAVIEW','STOCKINYJM','STOCKOUTYJM','UPDATECHECKMAN','ARRIVECHECK');

--- 增加权限
SELECT A.*,A.rowid FROM SYS_PERMISSIONS A ,
(SELECT  * FROM SYS_USERPERMISSIONS) B where 
A.FORM_LID = B.BUTTONNAME(+)
AND A.BUTTON_LID IN( 'TBSTOCKGOODS','TBWCS1','OPERATIONSNAVIGATOR','TBDATAVIEW','STOCKINYJM','STOCKOUTYJM','UPDATECHECKMAN','ARRIVECHECK')
ORDER BY A.BUTTONNAME ,A.FORM_LID;

--- 角色权限
SELECT A.*,A.rowid FROM SYS_USERPERMISSIONS A where A.BUTTONNAME IN( 'TBSTOCKGOODS','TBWCS1','OPERATIONSNAVIGATOR','TBDATAVIEW','STOCKINYJM','STOCKOUTYJM','UPDATECHECKMAN','ARRIVECHECK')
AND GROUPID IN  ('XXZX' ,'ADMIN')
ORDER BY A.BUTTONNAME ,A.FORMCLASSNAME ;
;

--网页外挂地址
SELECT A.*,A.rowid FROM BASEDETAILMST A WHERE CODEID='WEB_TOOLS' ORDER BY NAME;

批量配置权限

---- 语言表
DELETE FROM CFG_LANGUAGE WHERE LID IN( 'TBSTOCKGOODS','TBWCS1','OPERATIONSNAVIGATOR','TBDATAVIEW','STOCKINYJM','STOCKOUTYJM','UPDATECHECKMAN','ARRIVECHECK');

insert into CFG_LANGUAGE (LID, CN, EN, JP, REMARK, LIDTYPE)
values ('ARRIVECHECK', '到货确认', '到货确认', '到货确认', null, null);

insert into CFG_LANGUAGE (LID, CN, EN, JP, REMARK, LIDTYPE)
values ('OPERATIONSNAVIGATOR', '操作导航', '操作导航', '操作导航', null, null);

insert into CFG_LANGUAGE (LID, CN, EN, JP, REMARK, LIDTYPE)
values ('STOCKINYJM', '入库药监码查看', '入库药监码查看', '入库药监码查看', null, null);

insert into CFG_LANGUAGE (LID, CN, EN, JP, REMARK, LIDTYPE)
values ('STOCKOUTYJM', '出库药监码查看', '出库药监码查看', '出库药监码查看', null, null);

insert into CFG_LANGUAGE (LID, CN, EN, JP, REMARK, LIDTYPE)
values ('TBDATAVIEW', '数据查看', '数据查看', '数据查看', null, null);

insert into CFG_LANGUAGE (LID, CN, EN, JP, REMARK, LIDTYPE)
values ('TBSTOCKGOODS', '库存查看', '库存查看', '库存查看', null, null);

insert into CFG_LANGUAGE (LID, CN, EN, JP, REMARK, LIDTYPE)
values ('TBWCS1', '立体库状态', '立体库状态', '立体库状态', null, null);

insert into CFG_LANGUAGE (LID, CN, EN, JP, REMARK, LIDTYPE)
values ('UPDATECHECKMAN', '修改验收人', '修改验收人', '修改验收人', null, null);


--- 增加权限
DELETE FROM SYS_PERMISSIONS WHERE BUTTON_LID IN( 'TBSTOCKGOODS','TBWCS1','OPERATIONSNAVIGATOR','TBDATAVIEW','STOCKINYJM','STOCKOUTYJM','UPDATECHECKMAN','ARRIVECHECK');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'OUTSTOCKINFORMLISTFRM', 'ARRIVECHECK', null, 'OUTSTOCKINFORMLISTFRM', 'ARRIVECHECK', '1', 'MENUOUT');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INFORMLISTFRM', 'OPERATIONSNAVIGATOR', null, 'INFORMLISTFRM', 'OPERATIONSNAVIGATOR', '1', 'MENUIN');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INSTOCKFRM', 'OPERATIONSNAVIGATOR', null, 'INSTOCKFRM', 'OPERATIONSNAVIGATOR', '1', 'MENUIN');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INSTOCKPICKFRM', 'OPERATIONSNAVIGATOR', null, 'INSTOCKPICKFRM', 'OPERATIONSNAVIGATOR', '1', 'MENUIN');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INVENTORYCHANGELISTFRM', 'OPERATIONSNAVIGATOR', null, 'INVENTORYCHANGELISTFRM', 'OPERATIONSNAVIGATOR', '1', 'MYWMSINVENTORY');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INVENTORYQUALITYCHGDETAILFRM', 'OPERATIONSNAVIGATOR', null, 'INVENTORYQUALITYCHGDETAILFRM', 'OPERATIONSNAVIGATOR', '1', 'MYWMSINVENTORY');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INVENTORYSTOCKADJUSTFRM', 'OPERATIONSNAVIGATOR', null, 'INVENTORYSTOCKADJUSTFRM', 'OPERATIONSNAVIGATOR', '1', 'MYWMSINVENTORY');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'MASTERGOODSBATCHFRM', 'OPERATIONSNAVIGATOR', null, 'MASTERGOODSBATCHFRM', 'OPERATIONSNAVIGATOR', '1', 'MYWMSMASTER');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'OUTLOADINGDOCFRM', 'OPERATIONSNAVIGATOR', null, 'OUTLOADINGDOCFRM', 'OPERATIONSNAVIGATOR', '1', 'MENUOUT');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'OUTSTOCKINFORMLISTFRM', 'OPERATIONSNAVIGATOR', null, 'OUTSTOCKINFORMLISTFRM', 'OPERATIONSNAVIGATOR', '1', 'MENUOUT');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'OUTSTOCKPICKFRM', 'OPERATIONSNAVIGATOR', null, 'OUTSTOCKPICKFRM', 'OPERATIONSNAVIGATOR', '1', 'MENUOUT');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INSTOCKFRM', 'STOCKINYJM', null, 'INSTOCKFRM', 'STOCKINYJM', '1', 'MENUIN');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INSTOCKPICKFRM', 'STOCKINYJM', null, 'INSTOCKPICKFRM', 'STOCKINYJM', '1', 'MENUIN');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'OUTSTOCKPICKFRM', 'STOCKOUTYJM', null, 'OUTSTOCKPICKFRM', 'STOCKOUTYJM', '1', 'MENUOUT');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INFORMLISTFRM', 'TBDATAVIEW', null, 'INFORMLISTFRM', 'TBDATAVIEW', '1', 'MENUOUT');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INSTOCKFRM', 'TBDATAVIEW', null, 'INSTOCKFRM', 'TBDATAVIEW', '1', 'MENUIN');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INVENTORYCHANGELISTDETAILFRM', 'TBDATAVIEW', null, 'INVENTORYCHANGELISTDETAILFRM', 'TBDATAVIEW', '1', 'MYWMSINVENTORY');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INVENTORYCHANGELISTFRM', 'TBDATAVIEW', null, 'INVENTORYCHANGELISTFRM', 'TBDATAVIEW', '1', 'MYWMSINVENTORY');

insert into SYS_PERMISSIONS (APPLICATION, FORMCLASSNAME, BUTTONNAME, APP_LID, FORM_LID, BUTTON_LID, ACTIONFLG, FORMTYPE)
values ('MYWMSCLIENT', 'INVENTORYQUALITYCHGDETAILFRM', 'TBDATAVIEW', null, 'INVENTORYQUALITYCHGDETAILFRM', 'TBDATAVIEW', '1', 'MYWMSINVENTORY');


--- 角色权限
DELETE FROM SYS_USERPERMISSIONS  where BUTTONNAME IN( 'TBSTOCKGOODS','TBWCS1','OPERATIONSNAVIGATOR','TBDATAVIEW','STOCKINYJM','STOCKOUTYJM','UPDATECHECKMAN','ARRIVECHECK')
AND GROUPID IN  ('ADMIN' ,'ADMIN');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'OUTSTOCKINFORMLISTFRM', 'ARRIVECHECK');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INFORMLISTFRM', 'OPERATIONSNAVIGATOR');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INSTOCKFRM', 'OPERATIONSNAVIGATOR');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INSTOCKPICKFRM', 'OPERATIONSNAVIGATOR');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INVENTORYCHANGELISTFRM', 'OPERATIONSNAVIGATOR');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INVENTORYQUALITYCHGDETAILFRM', 'OPERATIONSNAVIGATOR');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INVENTORYSTOCKADJUSTFRM', 'OPERATIONSNAVIGATOR');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'MASTERGOODSBATCHFRM', 'OPERATIONSNAVIGATOR');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'OUTLOADINGDOCFRM', 'OPERATIONSNAVIGATOR');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'OUTSTOCKINFORMLISTFRM', 'OPERATIONSNAVIGATOR');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'OUTSTOCKPICKFRM', 'OPERATIONSNAVIGATOR');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INSTOCKFRM', 'STOCKINYJM');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INSTOCKPICKFRM', 'STOCKINYJM');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'OUTSTOCKPICKFRM', 'STOCKOUTYJM');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INFORMLISTFRM', 'TBDATAVIEW');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INSTOCKFRM', 'TBDATAVIEW');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INVENTORYCHANGELISTDETAILFRM', 'TBDATAVIEW');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INVENTORYQUALITYCHGDETAILFRM', 'TBDATAVIEW');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INVENTORYSTOCKADJUSTFRM', 'TBDATAVIEW');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'MASTERGOODSBATCHFRM', 'TBDATAVIEW');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'OUTLOADINGDOCFRM', 'TBDATAVIEW');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'OUTSTOCKINFORMLISTFRM', 'TBDATAVIEW');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'OUTSTOCKINFORMDETAILFRM', 'TBSTOCKGOODS');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'OUTSTOCKINFORMLISTFRM', 'TBSTOCKGOODS');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'OUTSTOCKPICKFRM', 'TBSTOCKGOODS');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'AWMSOUTSTOCKWORKFRM', 'TBWCS1');

insert into SYS_USERPERMISSIONS (GROUPID, APPLICATION, FORMCLASSNAME, BUTTONNAME)
values ('ADMIN', 'MYWMSCLIENT', 'INSTOCKFRM', 'UPDATECHECKMAN');

表增加选中列

SQL进行配置

UPDATE CFG_SPREADTBL 
SET VSCOL = VSCOL + 1 
WHERE FORMID = 'OUTSTOCKINFORMDETAILFRM';

--现有配置
SELECT A.*,A.rowid FROM CFG_SPREADTBL A WHERE  FORMID = 'OUTSTOCKINFORMDETAILFRM' ORDER BY VSCOL;

SELECT A.*,A.rowid FROM CFG_CUSTOMIZESPREADTBL A WHERE  FORMID = 'OUTSTOCKINFORMDETAILFRM'  ORDER BY VSCOL;


--添加新配置
insert into CFG_SPREADTBL (FORMID, VSINDEX, VSCOL, LID, COLUMNNAME, NAMEDSTYLE, VISIBLE, WIDTH, COMBOTYPE, INITVISIBLE, BASECODEID)
values ('OUTSTOCKINFORMDETAILFRM', 'SPREADLIST', 1, 'SELECTED', 'SELECTED', 'CHECKBOX', '1', 40, null, '1', null);


UPDATE CFG_CUSTOMIZESPREADTBL 
SET VSCOL = VSCOL + 1 
WHERE FORMID = 'OUTSTOCKINFORMDETAILFRM';

insert into CFG_CUSTOMIZESPREADTBL (USERID, FORMID, VSINDEX, VSCOL, COLUMNNAME, CUSTOMIZEVISIBLE, CUSTOMIZEWIDTH, OWNERID)
values ('CQP', 'OUTSTOCKINFORMDETAILFRM', 'SPREADLIST', 1, 'SELECTED', '1', 40, 'CQP');

代码进行编辑

在SetStatus 方法中 
Private Function SetStatus(ByVal nStatus As MCO002.SetMstStatusCode) As Boolean

 Case MCO002.SetMstStatusCode.SearchFinished

  '解锁Selected列，即勾选框列

Dim lockColumns As New List(Of String)
lockColumns.Add("SELECTED")
mclsDetail.LockColumns(False, lockColumns)
SetStatus = True

可以参考 OutStockPickFrm.vb 第341行 SetStatus 方法

语言

权限

用户权限

按钮图标配置

SELECT A.*,A.rowid FROM CFG_LANGUAGE A WHERE LID='HELPCENTER';

SELECT A.*,A.rowid FROM CFG_BUTTON_IMG A WHERE 1=1  AND A.CONTROLID='HELPCENTER';

SELECT A.*,A.rowid FROM CFG_FORM_CONTROL_CAPTION A WHERE  FORMID = 'MENU' AND  A.CONTROLID='HELPCENTER';

--获取图标sql
  SELECT B.FORMID,A.CONTROLID,A.MOUSEENTER,A.MOUSELEAVE, A.SHORTKEYS,B.LID,C.CN,C.EN,C.JP, D.EN EN2,D.CN CN2,D.JP JP2
    FROM CFG_BUTTON_IMG A
         INNER JOIN CFG_FORM_CONTROL_CAPTION B   ON  A.CONTROLID = B.CONTROLID
         LEFT JOIN CFG_LANGUAGE C ON B.LID = C.LID
         LEFT JOIN CFG_LANGUAGE D ON B.LID2 = D.LID
  WHERE B.FORMID = 'MENU'  AND   A.CONTROLID='HELPCENTER'  ORDER BY B.FORMID,A.CONTROLID

对项目重新编译（重要）

VB.NET一个打开网页界面的代码（示例）

#Region "库存查看"
    Private Function tbStockGoods()

        Dim dtHead As DataTable
        Dim dtDetail As DataTable
        Dim dsInData As New DataSet
        Dim info As BusinessObj = New BusinessObj
        Dim i As Integer
        Try
            Me.Cursor = System.Windows.Forms.Cursors.WaitCursor
            dtHead = mclsHead.ReadData
            dtHead.TableName = OutstockInformTbl_F.TABLE_NAME
            dsInData.Tables.Add(dtHead)

            dtDetail = mclsDetail.SelectedRow2DataTable()
            If dtDetail.Rows.Count < 1 Then
                PubShare.Msg.ShowMsgEx(mdlLanguage.Msg_FrmOutStockPick_NotSelectDetail.Value, "", MsgIcon.IconError)
                Exit Function
            End If

            Dim StockID As String = PubShare.mcGlobal.mstrNoGlobaCustomerStock

            '--创建状态的订单调用 订单审核库存
            If Me.CBOSTATUS.Value = mcGlobal.BaseCode("SYS_ORDERSTATUS", "ORDERSTATUS_CREATE") Then
                Dim OUTSTOCKINFORMID As String = dtDetail.Rows(i).Item(OutstockInformDtTbl_F.OUTSTOCKINFORMID_FIELD)
                Dim url As String = String.Format(BaseParaValue("WEB_TOOLS", "订单审核库存"), OUTSTOCKINFORMID, StockID)
                Process.Start("msedge.exe", url)
            End If

            '--审核状态的订单调用 创建波次库存
            If Me.CBOSTATUS.Value = mcGlobal.BaseCode("SYS_ORDERSTATUS", "ORDERSTATUS_AUDIT") Then

                For i = 0 To dtDetail.Rows.Count - 1
                    Dim OUTSTOCKINFORMID As String = dtDetail.Rows(i).Item(OutstockInformDtTbl_F.OUTSTOCKINFORMID_FIELD)
                    Dim GoodsID As String = dtDetail.Rows(i).Item(OutstockInformDtTbl_F.GOODSID_FIELD)
                    Dim url As String = String.Format(BaseParaValue("WEB_TOOLS", "创建波次库存"), OUTSTOCKINFORMID, GoodsID, StockID)
                    Process.Start("msedge.exe", url)
                Next
            End If
        Catch myEx As myException
            PubShare.Msg.ShowMsgEx(mdlLanguage.gc_QueryFailed.Value, myEx.ErrInfo, MsgIcon.IconError)
            Return False
        Catch ex As Exception
            PubShare.Msg.ShowMsgEx(mdlLanguage.gc_QueryFailed.Value, ex.Message, MsgIcon.IconError)
            Return False
        Finally
            Me.Cursor = System.Windows.Forms.Cursors.Default
        End Try
        Return True
    End Function
#End Region

附件

20230714土主打印服务相关SQL.txt

文档更新时间: 2024-09-05 17:02 作者：周骏

WMS 增加按钮

为WMS添加按钮

批量配置权限

表增加选中列

SQL进行配置

代码进行编辑

语言

权限

用户权限

按钮图标配置

对项目重新编译（重要）

VB.NET一个打开网页界面的代码（示例）