|
Imports Microsoft.VisualBasic
Imports System.Runtime.Serialization.Formatter
Imports System.Resources
<Serializable()> _
Public Class HashPageCode
Private Shared _HashPageCode As New Hashtable
Private Shared _ObjHashPageCode As HashPageCode = Nothing
Private Sub New()
'自社用
'################自社用 BEGIN##############################
'_HashPageCode.Add("ControlEdit.aspx","01")
'################自社用 END################################
'
'################顧客 BEGIN################################
_HashPageCode.Add("Topics.aspx","02")
'################顧客 END ################################
End Sub Public Shared Function GetInstance() As Hashtable If _ObjHashPageCode Is Nothing Then _ObjHashPageCode = New HashPageCode() End If Return _HashPageCode End FunctionEnd Class （编辑：李大同）
【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!
|
