别人用excel表格做的管理系统怎么查看此管理系统的源码?

别人用excel表格做的管理系统怎么查看此管理系统的源码?,第1张

新建excel文件,alt+F11进入VBA编辑器,插入模块,输入以下代码:

Sub MoveProtect()

Dim FileName As String

 FileName = Application.GetOpenFilename("Excel文件(*.xls &*.xla),*.xls*.xla", , "VBA破解")

 If FileName = CStr(False) Then

    Exit Sub

 Else

    VBAPassword FileName, False   '  引用下面的自定义函数

 End If

End Sub

Private Function VBAPassword(FileName As String, Optional Protect As Boolean = False)

   If Dir(FileName) = "" Then

      Exit Function

   Else

      FileCopy FileName, FileName &".bak"

   End If

   Dim GetData As String * 5

   Open FileName For Binary As #1

   Dim CMGs As Long

   Dim DPBo As Long

   For i = 1 To LOF(1)

       Get #1, i, GetData

       If GetData = "CMG=""" Then CMGs = i

       If GetData = "[Host" Then DPBo = i - 2: Exit For

   Next

   If CMGs = 0 Then

      MsgBox "请先对VBA编码设置一个保谨迹灶护密码...", 32, "提示"

      Exit Function

   End If

   If Protect = False Then

      Dim St As String * 2

      Dim s20 As String * 1                                         '取得一个0D0A十祥扮六进制字串

      Get #1, CMGs - 2, St                                          '取得一个20十六制字串

Get #1, DPBo + 16, s20     '替换加密部份机码

      For i = CMGs To DPBo Step 2

          Put #1, i, St

      Next                                                                   '加入不配对符号

      If (DPBo - CMGs) Mod 2 <>0 Then

         Put #1, DPBo + 1, s20

      End If

      MsgBox "文件解密成州团功......", 32, "提示"

   Else

      Dim MMs As String * 5

      MMs = "DPB="""

      Put #1, CMGs, MMs

      MsgBox "对文件特殊加密成功......", 32, "提示"

   End If

   Close #1

End Function

2. 运行上面的代码,选择你的文件,移除密码成功后打开文件,按alt+F11查看源码:

开玩笑吧?

源代码这里可贴不开

1、ERP的概念

企业资源计划(EnterpriseResourcePlanning,简称ERP)系统是一种主要面向制造行业进行物质资源、资金资源和信李碰息资源集成一体化管理的企业信息管理系统。通过运用ERP,企业能够利用计算机对企业的资金、货物、人员和信息等资源进行自动化管理,具有制造,办公 *** 作,供应链管理,人力资源管理,项目管理,财务与管理,客户服务,销售与市场营销等商业功能。企业资源计划对于在企业高度普及计算机辅助管理,实现企业管理信息化和自动化,提高工作效率和增强快速反应能力,都具有十分重要的意义。

2、ERP的时代背景

在信息时代,企业所处的商业环境己经发生了根本性变化。顾客需求瞬息万变、技术创新不断加速、产品生命周期不断缩短、市场竞争日趋激烈,这些构成了影响现代企业生存与发展的三大力量:顾客、竞争和变化(3C)。工业时代依靠规模化竞争的企业,“层级制”的管理模式和以MRPII应用为主的管理手段已经不再适用于今天企业的发展。为了适应“顾客、竞争和变化”的外部环境,企业必须进行管理思想上的革命(Revolution)、管理模式与流程上的重组()和管理技术手段上的更新(Reform)(3R),从而在全球范围内,引发了一场以企业再造(BPR)为主要内容的管理模式革命和以企业资源计划(ERP)系统应用为主体的管理手段革命。

3、ERP的由来

工业时代的竞争是产品生产成本的竞争,规模化大生产是降低生产成本的有效方式。大生产给制造业带来了许多困难,主要问题就是要解决库存积压与短缺的矛盾。为解决这个关键问题,l957年,美国生产与库存控制协会成立,开始进行生产与库存控制方面的研究与理论推广。随着60年代计算机的商哪巧谈业化应用,第一套物料需求计划MRP(Materialplanning)软件面世,在企业物料管理工作中应用。

在企业管理中,生产管理不仅涉及物流,还涉及资金流。这要求把财务子系统与生产子系统结合到一起,建立整体化的管理系统,实现资金流与物流的统一管理。80年代,人们把制造、财务、销售宽做、采购和工程技术等各个子系统集成为一体化的系统,称为制造资源计划(ResourcePlanning)系统,英文缩写仍是MRP。为了区别MRP,而称作MRPⅡ。

90年代中后期,企业所处的时代背景与竞争环境发生了根本性变化,企业资源计划系统(ERP)应运而生。ERP在MRPⅡ基础上进一步发展了企业信息管理系统,扩展了管理范围,把企业与客户、供应商和经销商等因素整合在一起,形成一个完整的企业供应链系统,并对供应链上的所有环节进行有效管理,包括订单、采购、库存、计划、生产制造、质量控制、运输、分销、服务与维护,以及企业财务、人事、实验室和项目管理等诸多方面。ERP系统主要应用于供应链管理。


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/tougao/12272588.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-24
下一篇 2023-05-24

发表评论

登录后才能评论

评论列表(0条)

保存