客户信息管理系统-设计报告
中国人寿保险公司客户服务信息管理系统设计方案课程设计
广州市广播电视大学《企业信息管理》课程课题名称：中国人寿保险公司客户服务信息管理系统设计方案目录前言……………………………………………………………………………………一、可行性分析报告……………………………………………………………………1、目前状况描述……………………………………………………………………2、可行性分析…………………………………………………………………………2、1经济上可行……………………………………………………………………2、2技术上可行……………………………………………………………………2、3管理上可行……………………………………………………………………二、需求分析说明书……………………………………………………………………1、系统功能结构图（HIPO图）………………………………………………………2、系统功能说明……………………………………………………………………3、现有系统的业务流程图及说明…………………………………………………4、新系统的业务流程图及说明………………………………………………………附、课程设计任务书…………………………………………………………………课程小组成员一览表……………………………………………………………中国人寿保险公司客户服务信息管理系统设计方案一、可行性分析报告1、目前状况描述中国人寿保险公司可以过几十多年的发展，客户数量与日俱增。
由原来的一百多人到现在已经有将几万人了。
公司由原来小小的一间办公室变成今天的高楼大厦，每一层都为不同的客户提供不同的需求和安排，宗旨就是让客户得到最好的保障。
而现在公司的客户服务管理方面出现了一些问题：首先随着业务量、业务种类的增多，业务员的工作量也随之而增多和繁琐起来，经常性地出现了跟进工作做得不到位甚至遗漏，投诉意见未能及时反映和处理等等，量重要的是当发生人员流动的时候，新接手的业务员不能把营业额提高起来，而且还会流失一些旧的客户。
火车票订票管理系统设计报告
4.1主窗口界面
4.2旅客信息窗口
4.3车次信息窗口
4.4取票及退票窗口
第五章系统的实现
总结与展望
致谢
参考文献
需求分析
需求分析的任务
调查机票预定系统应用领域涉及的内容，对涉及到领域的各个应用的信息要求和操作要求进行详细分析，形成需求分析说明书。最重要的是调查、收集信息、分析购票人信息和火车预定流程。处理要求、数据的安全性与完整性要求。
统计功能：
按火车票统计买票人数
按姓名统计火车票数
②旅客购票需求
交费功能：
交费
退费
③取票需求
通知功能：
通知旅客取票
统计功能：
统计通过验证的人数
统计可以取票的人
统计未通过验证的人数
查询功能：
购票旅客查询
购票旅客姓名
购票旅客身份证号
购票旅客订单号
④列车车次信息需求
查询功能：
车次
始发站
终点站
始发时间
系统框架
在调查完了用户需求之后，就要开始分析用户需求。在此，我们们采用自顶向下的结构化分析方法（SA方法）。首先，定义全局概念结构的框架，如图2.2所示。
图2.2火车票预定系统总框架图
各子系统需要进一步细化。旅客信息系统为例进一步细化，如图2.3所示。
crm客户管理系统课程设计DFD
crm客户管理系统课程设计DFD一、教学目标本课程旨在让学生了解和掌握CRM客户管理系统的原理、架构和应用，培养学生运用CRM系统提升企业市场竞争力的能力。
具体目标如下：1.知识目标：•掌握CRM客户管理系统的定义、发展历程和分类。
•理解CRM系统的核心功能和应用场景。
•熟悉CRM系统的架构和关键技术。
•了解CRM系统在我国企业中的应用现状和发展趋势。
2.技能目标：•能够运用CRM系统进行客户信息管理、销售管理、市场营销和客户服务。
•能够根据企业需求设计和实施CRM解决方案。
•能够对CRM系统进行性能评估和优化。
3.情感态度价值观目标：•培养学生对客户管理的重视，增强服务意识。
•培养学生运用信息技术提升企业竞争力的意识。
•培养学生团队协作和不断创新的精神。
二、教学内容本课程的教学内容主要包括以下几个部分：1.CRM客户管理系统概述：介绍CRM的定义、发展历程、分类和应用场景。
2.CRM系统核心功能：详细讲解客户信息管理、销售管理、市场营销和客户服务等内容。
3.CRM系统架构和关键技术：分析CRM系统的架构，讲解关键技术如数据库、数据挖掘、等。
4.CRM系统应用案例：分析我国企业CRM系统的应用现状，分享成功案例，探讨发展趋势。
5.CRM系统实施与评估：讲解如何设计和实施CRM解决方案，以及如何对CRM系统进行性能评估和优化。
三、教学方法为了提高教学效果，本课程将采用以下教学方法：1.讲授法：讲解CRM客户管理系统的相关概念、原理和关键技术。
2.案例分析法：分析实际案例，让学生了解CRM系统在企业中的应用和价值。
3.讨论法：学生分组讨论，培养学生的团队协作能力和创新思维。
4.实验法：安排实验室实践环节，让学生动手操作，巩固所学知识。
四、教学资源为实现教学目标，我们将提供以下教学资源：1.教材：选用国内权威、实用的CRM客户管理系统教材。
2.参考书：提供相关领域的研究资料和案例分析，丰富学生的知识体系。
银行管理系统设计报告样板
银行管理系统设计报告样板一、引言银行作为金融机构，在现代经济社会中扮演着重要的角色。
为了提高银行的运营效率和服务质量，开发一个高效、安全的银行管理系统具有重要意义。
本设计报告旨在对银行管理系统进行设计，并提供详细的功能需求和系统设计方案。
二、功能需求1.客户管理：包括客户信息的录入、修改、查询和删除，客户分类管理，以及客户关系管理等功能。
2.账户管理：包括账户的开户、销户、查询、修改、冻结和解冻等功能。
3.存款管理：支持定期存款、活期存款和整存整取等多种存款方式，并提供存款、取款、存款利息计算等功能。
4.贷款管理：支持个人贷款和企业贷款，包括贷款申请、审批、放款和还款等功能。
5.资金调拨：支持资金的转移、划账和转账功能，确保账户之间的资金流转安全可靠。
6.对账管理：对账系统能够自动对账，及时发现错误和异常交易，并提供异常交易处理功能。
7.报表生成与分析：能够根据需求生成各类报表，并提供数据分析功能，为银行决策提供参考。
8.安全管理：包括用户权限管理、数据备份和恢复、系统日志管理等功能，确保系统的安全性和稳定性。
三、系统设计方案为了满足上述功能需求，我们将采用分层架构进行系统设计，主要分为以下几个层次：1.用户界面层：提供给用户直观友好的界面，包括图形化界面和命令行界面。
用户界面层将与业务逻辑层进行交互，接收用户输入，并将结果展示给用户。
2.业务逻辑层：负责处理用户请求，调用相应的服务层进行业务处理。
该层将实现客户管理、账户管理、存款管理、贷款管理等各部分的业务逻辑，并对请求进行相应的验证和处理。
3.服务层：封装底层的数据存取和业务逻辑，暴露接口供业务逻辑层调用。
服务层将提供客户管理服务、账户管理服务、存款管理服务、贷款管理服务等。
4.数据访问层：负责与数据库进行交互，实现数据的读写。
将提供客户数据、账户数据、存款数据、贷款数据等访问接口。
四、系统流程1.用户通过用户界面层发送请求，请求被业务逻辑层接收。
MIS课程设计报告书
MIS课程设计报告书学院：课程名称： MIS课程设计—客户管理系统适用班级：学生：导师：MIS课程设计学期：摘要：随着信息技术在管理上越来越深入而广泛的应用，管理信息系统的实施在技术上已逐步成熟。
管理信息系统是一个不断发展的新型学科，企业要生存要发展，要高效率地把企业活动有机地组织起来，就必须加强企业管理，即加强对企业部的各种资源（人、财、物等）的有效管理，建立与自身特点相适应的管理信息系统。
本文介绍了在Visual FoxPro6.0环境下采用“自上而下地总体规划，自下而上地应用开发”的策略开发一个管理信息系统的过程。
通过分析公司客户人工管理的不足，创建了一套行之有效的计算机管理客户的方案。
文章介绍了客户管理信息系统的系统分析部分，包括可行性分析、业务流程分析等；系统设计部分主要介绍了系统功能设计和数据库设计及代码设计；系统实现部分说明了几个主要模块的算法，并附带了一些主要的窗口和程序。
本系统界面友好，操作简单，比较实用。
【关键字】管理信息系统、客户管理系统、Visual Foxpro应用。
一、前言随着电子计算机和通信技术的发展，人类已经逐渐地进入信息化社会。
信息和材料、能源一样成为一种社会的基本生产资料，在人类的社会生产活动中发挥着重要的作用。
同时人们对信息和数据的利用与处理也已进入自动化、网络化和社会化的阶段，因此，开发相关的管理信息系统已经成为各行各业的必要和必需了，管理信息系统作为一门边缘学科，集管理科学、信息科学、系统科学、现代通信技术和电子计算机技术于一体，可以解决企业或组织所面临的问题，对来看，可以提高工作效率；对外来看，获得竞争优势。
管理信息系统的开发方法有生命周期法、原型法和面向对象的开发方法等。
基于以上三种方法的特点和各自的优缺点，本客户管理系统利用软件工程化思想和方法，总体上是采用结构化生命法进行系统分析和设计的，而系统实现等步骤则采用了原型法和面对对象的方法。
管理信息系统的开发是一个开发周期长、技术要求高、影响因素多的复杂系统工程，因此制定一个完善、可行、合理的开发计划，不仅是系统开发成功的保证，而且可以提高效率、节省时间、降低成本。
管理信息系统课程设计报告25473
《管理信息系统》课程设计报告企业名称：光明家具公司企业背景：光明家具公司是一家拥有产品研发、设计、生产、销售一体的多元的家具制造和销售企业，产品涵盖办公家具、餐厅家具、酒店以及宾馆家具。
光明家具拥有从意大利引进的家具生产流水线和诸多专业的家具设计师、优秀的质控人员及技术工人。
在规范而严密的企业管理下，公司的产品无论从设计、生产、销售乃至售后的任何一个环节都具备稳定可靠的质量保障。
为了更多地配合宏大的国内市场需要，提供更完善的服务，维护广大贵客的权益，陈列中心，在争激烈的今天，不断充实AUROND自创品牌的产品阵容，强化全国销售据点，提高国际竞争力。
公司除为客户提供多元化及灵活组合的选择之外，光明更为您提供了较完美的服务，包括空间设计、整体设计、全套安装、妥善保养等。
令客户在布置办公空间的间隔和摆设时更感称心。
为客户提供独具品味的办公室意境。
“一如既往，永创最佳，力求发展，挑战未来”是光明永恒的奋斗目标，在成功的管理体系下，光明还不断努力开拓市场，以真心和真诚服务你的事业，本着以信待人，以质服人的原则，愿同各界朋友携手共进，共创美好的明天。
摘要: 企业物资管理系统，以计算机软件技术为基础，利用VisualFoxpro编程技术进行编程设计的软件系统。
采用系统结构化开发方法，设计过程主要部分：企业背景调查、需求分析与可行性研究、企业业务流程图绘制、数据结构与数据库设计、数据字典编制、数据流程图绘制，系统总体结构设计。
完成信息的显示代码设计输入/输出设计、模块功能与处理过程设计、系统维护、信息系统安全设计、系统实施、系统运行管理制度、网络系统方案设计。
包括输入、输出、查找、配送等功能。
此系统具有检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长的优点是一个成本低的现代管理信息系统。
最后通仿真验证企业物资管理信息系统对输入信号进行完整解调。
一·现行系统概念光明家具公司急需建立一个检索迅速、查找方便、可靠性高、存储量大、保密性好、寿命长、成本低的现代管理信息系统。
管理信息系统课程设计报告范文免费
管理信息系统课程设计报告范文免费（实用版）编制人：__________________审核人：__________________审批人：__________________编制单位：__________________编制时间：____年____月____日序言下载提示：该文档是本店铺精心编制而成的，希望大家下载后，能够帮助大家解决实际问题。
文档下载后可定制修改，请根据实际需要进行调整和使用，谢谢!并且，本店铺为大家提供各种类型的教育资料，如工作总结、工作计划、心得体会、演讲稿、条据文书、作文大全、合同范文、教案大全、祝福语、其他范文等等，想了解不同资料格式和写法，敬请关注!Download tips: This document is carefully compiled by this editor.I hope that after you download it, it can help you solve practical problems. The document can be customized and modified after downloading, please adjust and use it according to actual needs, thank you!Moreover, this store provides various types of educational materials for everyone, such as work summaries, work plans, experiences, speeches, written documents, complete essays, contract samples, lesson plans, blessings, and other sample articles. If you want to learn about different data formats and writing methods, please pay attention!管理信息系统课程设计报告范文免费目前国内物流人才的短缺，并不是总量上的短缺，而是掌握现代物流管理技术的实用型人才的短缺，也就是懂得建立在信息系统平台上物流供应链管理的综合性人才的短缺。
中石化客户关系管理系统的设计与实施中期报告
中石化客户关系管理系统的设计与实施中期报告一、项目概述中石化客户关系管理系统是针对中石化公司客户管理的需求而设计的一套订制化系统，主要功能包括客户信息管理、订单管理、销售管理、报价管理、合同管理、服务管理等。
这个系统设计可以提高中石化公司与客户之间的沟通效率、提高客户满意度、减少营销成本、增加收入等。
二、设计过程1、需求分析阶段在需求分析阶段，我们首先开展了资料调研，了解中石化公司之前的客户管理模式，发现原有的模式存在沟通效率低、信息更新不及时、数据安全性低等问题。
同时，我们还会研究行业竞争情况，以便开发出更具有市场竞争力的系统；另外，我们还与中石化的相关岗位人员进行沟通，更加深入地了解他们在客户管理方面的实际情况和需求。
2、系统设计阶段根据需求分析的结果，我们设计了详细的系统草案，确定系统架构、功能模块和数据流程等。
在这个阶段，我们还会绘制出系统的流程图和界面原型图，明确实现方式和运作规则。
3、程序开发阶段在程序开发阶段，我们采用了面向对象的程序设计风格，开发了系统的前端和后端模块。
前端采用了比较流行的Web技术，保证了系统的稳定性和运行效率。
4、系统部署阶段在程序开发结束之后，我们进行全面的测试和调试，确保系统能够稳定运行。
随后将系统部署到中石化所提供的服务器上，与现有的业务支持系统进行集成，并进行数据迁移。
在系统上线之前，我们还会为系统用户提供相关的培训和技术支持，确保系统执行效果最佳。
三、实施效果实施效果表明，我们的中石化客户关系管理系统实现了中石化公司的目标，增加了客户管理效率、优化了客户体验、减少了营销成本，提高了公司的收入。
同时，该系统还为公司决策提供了更加准确的经营数据，降低了经营风险。
四、总结思考客户关系管理系统的设计和实施需要根据各种因素灵活处理。
设计中应完善需求分析，仔细分析客户和公司的数据价值，制定合理的应对策略，从而使得整个系统开发过程顺利安排。
此外，还需要考虑到系统的后期维护，通过定期维护和升级，确保系统的稳定性和可靠性，满足客户和公司的长期期望。
客户信息管理系统(实训报告)
目录前言 (1)1．需求分析 (1)1．1开发平台 (1)1．2用户角色分析 (1)2．功能需求分析 (2)2.1系统功能层次图 (2)2.2功能需求说明 (2)2.1.1添加客户信息 (2)2.1.2删除客户信息 (2)2.1.3注册新用户信息 (2)2.1.4删除用户信息 (3)2.1.5修改用户密码 (3)3.功能实现 (3)3.1 数据库的设计和实现 (3)3.1.1客户信息表 (3)3.1.2用户信息表 (3)3.1.3区域信息表 (4)3.2 用户界面层的实现 (4)3.2.1登录界面的实现 (4)3.2.2主界面的实现 (5)3.2.3添加客户信息界面 (8)3.2.4修改密码界面 (9)3.2.5注册新用户界面 (11)四、实训总结 (11)前言随着Internet的飞速发展，更新换代越来越频繁，人类已经进入网络计算和数字化时代，通过计算机管理软件对企业进行管理，管理更多的客户信息，快捷而让管理员找到、添加、删除相关的客户信息。
让更多的企业对自己客户的管理更加规范、快速、方便。
客户信息管理系统是一种用于储存企业客户信息资源，便于与客户及时沟通交流，从而增强与客户关系、提高企业管理水平的系统。
企业可以通过客户信息管理系统管理、分析和统计现有客户资源，以便快速、全面、准确地了解现有客户情况，从而指定长期客户沟通和访问计划，制定营销战略，促进企业长期、良性经营发展。
本系统采用Visual Studio2008来实现美观的界面，并用SQL2005自动连接实现数据库动态更新功能，通过这种连接技术让整个系统能够完整地实现所需要的功能。
1．需求分析1．1开发平台考虑到本系统的性能要求，和现有的条件，我选择了Windows 7作为开发、测试和运行的平台。
因为Windows系统是目前应用最广泛的操作系统，它以全新的图形界面，简单快捷的操作方式，支持多媒体等特点而成为软件发展的趋势，选它作业为开发的平台，易于软件功能的扩展和软件的升级。
客户关系管理系统定制项目可行性分析报告
客户关系管理系统定制项目可行性分析报告第一部分客户关系管理系统定制项目概述 (2)第二部分客户关系管理系统定制项目市场分析 (4)第三部分客户关系管理系统定制项目技术可行性分析 (6)第四部分客户关系管理系统定制项目时间可行性分析 (9)第五部分客户关系管理系统定制项目法律合规性分析 (11)第六部分客户关系管理系统定制项目总体实施方案 (12)第七部分客户关系管理系统定制项目经济效益分析 (14)第八部分客户关系管理系统定制项目风险评估分析 (16)第九部分客户关系管理系统定制项目风险管理策略 (18)第十部分客户关系管理系统定制项目投资收益分析 (20)第一部分客户关系管理系统定制项目概述客户关系管理系统定制项目概述随着市场竞争的不断加剧，企业越来越重视客户关系管理，以确保客户满意度、提高客户忠诚度并实现业务增长。
为此，客户关系管理系统定制项目应运而生。
本文将就此项目概述，包括项目背景、目标、范围、关键特性、实施计划和预期成果等方面进行阐述。
1. 项目背景在当今数字化时代，客户期望与企业进行更加个性化、高效的互动。
因此，采用通用的客户关系管理系统往往难以满足企业的特定需求。
定制客户关系管理系统能够充分考虑企业的业务流程、客户特点以及市场变化，实现更精准的客户关系管理。
2. 项目目标本项目的主要目标是开发一个定制化的客户关系管理系统，以帮助企业更好地管理客户信息、优化销售流程、提升客户服务质量，并最终实现业务增长。
系统将以提高客户满意度和忠诚度为核心，提供强大的数据分析和报告功能，帮助企业做出更明智的决策。
3. 项目范围项目的范围包括但不限于：客户信息管理：系统将允许企业集中管理客户信息，包括联系信息、购买历史、偏好等。
销售流程优化：定制的系统将根据企业的销售流程进行调整，从线索跟进到成交管理，提高销售效率。
客户服务增强：系统将提供客户服务工具，包括支持请求跟踪、反馈收集和问题解决。
数据分析与报告：系统将收集和分析数据，生成定制化报告，帮助企业了解市场趋势和客户行为。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
客户信息管理系统-设计报告题目：客户信息管理系统专业： .nte网页1班学号： 1303110112姓名：刘冰涛指导教师：胡迎久3.3逻辑设计（1）模式转换（E/R to Relational)ClientType表：ClientInfo表：Cooperate表：WarnType表：Warning表：（2）模式规范化ClientType表、ClientInfo表、Cooperate表、WarnType表、Warning表均已经为BCNF范式（3）完整性约束设计实体完整性约束：ClientType表主键为TypeIdClientInfo表主键为ClientIdCooperate表主键为CooperateIdWarnType表主键为WTypeIdWarning表主键为WarnId参照完整性约束：Cooperate表的ClientId参照ClientInfo表主键ClientIdWarning表的TypeId参照ClientType表主键TypeId（4）外模式设计建立了一张Client视图，用于显示每位客户的合作、提醒信息，语句如下：Create view Clientasselect CooperateId，ClientId，WarnId，ClientId，TypeName，Namefrom ClientType，ClientInfo，Cooperate，Warningwhere Cooperate.ClientId=ClientInfo.ClientId and Warning.TypeId=ClientType.TypeId（5）典型应用设计客户类型管理模块：添加客户类型，修改客户类型，删除客户类型客户管理模块：客户信息管理，客户评价管理，客户合作管理提醒管理模块：查看今日提醒，提醒设置管理3.4物理设计内模式设计：主要包括索引、散列、簇集设计ClientType表：索引字段为TypeId，索引表达式为TypeId，索引类型为主索引ClientInfo表：索引字段为ClientId，索引表达式为ClientId，索引类型为主索引Cooperate表：索引字段为CooperateId，索引表达式为CooperateId，索引类型为主索引WarnType表：索引字段为WTypeId，索引表达式为WTypeId，索引类型为主索引Warning表：索引字段为WarnId，索引表达式为WarnId，索引类型为主索引3.5系统实现主要模块及其核心代码如下：（1）客户类型管理模块：添加客户类型界面：核心代码：Public Function AddNew(Optional strName As String = "", _Optional lngSuperID As Long = -1) As gxcAddNewIf ExistByName("ClientType", "TypeName", strName) ThenAddNew = DuplicateName_AddNewExit FunctionEnd IfIf lngSuperID <> 0 ThenIf ExistByID("ClientType", "TypeId", lngSuperID) = False Then AddNew = SuperNotExistExit FunctionEnd IfEnd IfIf strName <> "" Then Me.TypeName = strNameIf lngSuperID <> -1 Then Me.SuperID = lngSuperID 'Dim strSQL As StringDim ErrMsg As StringstrSQL = "INSERT INTO ClientType(SuperId, TypeName) "strSQL = strSQL & " VALUES(" & lngSuperIDstrSQL = strSQL & ",'" & strName & "'"strSQL = strSQL & ")"If RunSql(strSQL, ErrMsg) ThenMe.ID = MaxID("ClientType", "TypeId")AddNew = AddNewOKElseAddNew = AddNewFailEnd IfEnd Function（2）客户管理模块：客户信息管理模块：添加客户界面：核心代码：Public Function AddNew(Optional ByVal strName As String = "", _Optional ByVal intAge As Integer = 0, _Optional varSex As gxcSex = -1, _Optional lngTypeId As Long = 0) As BooleanOn Error Resume Next'如果参数为缺省值，即未传入，则直接调用类中的参数，否则调用传入的参数AddNew = (Err.Number = 0)End Function查找客户界面：核心代码：'按条件查找客户，以集合类的方式返回Public Function Find(Optional ByVal lngID As Long = 0, _Optional ByVal strName As String = "", _Optional ByVal lngTypeId As Long = 0) As CClients'构造查询SQLDim strSQL As StringstrSQL = "Select ClientInfo.*,ClientType.TypeName from ClientInfo left outer join ClientType "strSQL = strSQL & " ON ClientType.TypeID=ClientInfo.TypeID Where "If lngID <> 0 Then strSQL = strSQL & "ClientInfo.ClientID=" & lngID & " and "'如果是按名称查询，则采用“包含”的查询方法If strName <> "" ThenstrSQL = strSQL & " like '%" & RealString(strName) & "%' and "End IfIf lngTypeId <> 0 ThenstrSQL = strSQL & "ClientInfo.TypeID=" & lngTypeId & " and "End IfstrSQL = strSQL & "ClientInfo.ClientId>0"On Error Resume Next'将查询结果加入集合类Dim rs As RecordsetSet rs = g_Conn.Execute(strSQL)Dim i As LongDim objClient As cClient客户合作管理模块：添加合作信息界面：核心代码：Public Function AddNew(Optional datDate As Date = #1/1/1900#, _Optional lngClientId As Long = -1, _Optional intSatify As Integer = -1, _Optional strRemark As String = "") As gxcAddNew Public Function AddNew(Optional datDate As Date = #1/1/1900#, _Optional lngClientId As Long = -1, _Optional intSatify As Integer = -1, _Optional strRemark As String = "") As gxcAddNewIf lngClientId <> -1 Then Me.ClientID = lngClientIdIf intSatify <> -1 Then Me.Satisfaction = intSatify '上级合作信息的IDIf strRemark <> "" Then Me.Remark = strRemarkIf datDate <> #1/1/1900# Then Me.CooperateDate = datDateDim strSQL As StringDim ErrMsg As StringstrSQL = "INSERT INTO Cooperate(ClientId, [Date], Satisfaction,Remark) "strSQL = strSQL & " VALUES(" & Me.ClientIDstrSQL = strSQL & ",'" & Me.CooperateDate & "'"strSQL = strSQL & "," & Me.SatisfactionstrSQL = strSQL & ",'" & RealString(Me.Remark) & "'"strSQL = strSQL & ")"If RunSql(strSQL, ErrMsg) ThenMe.ID = MaxID("Cooperate", "CooperateId")AddNew = AddNewOKElseAddNew = AddNewFailEnd IfEnd Function（3）提醒管理模块：查看今日提醒界面：核心代码：Option ExplicitPrivate mvarID As Long '提醒信息ID Private mvarTypeId As Long '提醒类型IDPrivate mvarTypeName As String '提醒类型名称Private mvarClientId As Long '提醒客户IDPrivate mvarClientName As String '提醒客户名称Private mvarMsg As String '提醒显示消息Private mvarShowDate As Date '提醒显示时间Private mvarBirthdayWarn As Boolean '是否启用生日提醒'启用生日提醒Public Property Let ShowBirthdayWarn(ByVal vData As Boolean) mvarBirthdayWarn = vDataDim strSQL As StringIf mvarBirthdayWarn Then。