1、(4)编辑功能:可根据查询结果对相应的记录进行修改,修改时注意编号的唯一性。(5)删除功能:主要实现对已添加的人员记录和休假记录进行删除。如果当前系统中没有相应的人员记录,则提示“记录为空!”并返回操作。(6)统计功能:能根据多种参数进行人员的统计。例如,统计四类人员数量以及总数,统计任一员工的休假天数等信息。(7)保存功能:可将当前系统中各类人员记录和休假记录存入文件中,存入方式任意。(8)读取功能:可将保存在文件中的信息读入到当前系统中,供用户进行使用。3、问题的解决方案根据系统功能要求,可以将问题解决分为以下步骤:(1)应用系统分析,建立该系统的功能模块框图以及界面的组织和设计;(2)分
2、析系统中的各个实体及它们之间的关系;(3)根据问题描述,设计系统的类层次;(4)完成类层次中各个类的描述;(5)完成类中各个成员函数的定义;(6)完成系统的应用模块;(7)功能调试;(8)完成系统总结报告。#importmsado15.dll no_namespace rename(EOF,adoEOF)class CADOConnectionprivate:Static void InitADO()。Static void UnInitADO()。protected:_ConnectionPtr m_Connection。public:BOOL IsOpen()。_ConnectionPtr
3、 GetConnection()。Cstring GetSQLConstr(CString IP,CString DBName)。BOOL Open(CString ConStr)。CADOConnection()。VirtualCADOConnection()。CADOConnection*GetConnection()。Int ConCount = 0。CADOConnection g_Connection。CADOConnection*GetConnection()Return & g_Connection。CADOConnection:CADOConnection()InitADO()
4、。m_Connection.CreateInstance(ADODB.Connection)。If(IsOpen()。m_Connection-Close()。m_Connection = NULL。UnInitADO()。Void CADOConnection:InitADO()If(ConCount + = 0)CoInitialize(NULL)。void CADOConnection:UnInitADO()if(ConCount = 0)CoUninitialize()。BOOL CADOConnection:Open(CString ConStr)if(IsOpen()Open(_b
5、str_t)ConStr,adModeUnknown)。return IsOpen()。CString CADOConnection:GetSQLConStr(CString IP,CString DBName)CString Str。Str.Format(Provider = SQLOLEDB.1。Persist Security Info = False。User ID = sa。Initial Catalog = %s。Data Source = %s,DBName,IP)。return Str。_ConnectionPtr CADOConnection:GetConnection()r
6、eturn m_Connection:IsOpen()long State。get_State(&State)。if(State = adStateOpen)return true。return false。class CADODataSet_RecoedsetPtr m_DataSet。CADOConnection *m_Connectionvoid Delete()。int GetRecordNo()。void move(int nIndex)。void Save()。void SetFieldValue(CString FieldName,_variant_t Value)。void A
7、ddNew()。BOOL Next()。FieldsPtr GetFields()。int GetRecordCount()。void SetConnetion(CADOConnection *pCon)。BOOL Open(CString SQLStr)。CADODataSet()。virtual CADODataSet()。CADODataSet:CADODataSet()m_DataSet.CreateInstance(ADODB.RecordsetCADODataSet()m_DataSet-m_DataSet = NULL。void CADODataSet:SetConnection
8、(CADOConnection *pCon)m_Connection = pCon。int CADODataSet:GetRecordCount()return m_DataSet-GetRecordCount()。elsereturn 0。BOOL CADODataSet:Open(CString SQLStr)if(IsOpen)FieldsPtr CADODataSet:GetFields()GetFields()。Next()if(m_DataSet-adoEOF)retuen false。MoveNext()。AddNew()AddNew()。SetFieldValue(CStrin
9、g FieldName,_variant_t Value0)PutCollect(_bstr_t)FieldName,Value)。Save()Upsate()。Move(int nIndex)MoveFirst()。Move(nIndex)。GetRecordNO()AbsolutePositon。Delete()m_DateSet-Delete(adAffectCurent)。BOOL CPersonApp:InitInstance()AfxEnableControlContainer()。#ifdef_AFXDLLEnable3dControls()。#elseEnable3dContr
10、olsStatic()。 #endifLoadSkin()。BOOLbCon= GetConnection()-Open(GetConnection()-GetSQLConStr(127.0.0.1tb_person)。CLoginDialog logindlg。if(logindlg.DoModal()! = IDOK)CPersonDlg dlg。m_pMainWnd =& dlg。int nResponse = dlg.DoModal()。if(nResponse = IDOK)else if(nResponse = IDCANCEL)return FALSE。 BOOL CLoginDialog:OnInitDialog()CDialog:OnInitDialog()。m_DataSet.SetConnection(GetConnection()。m_DataSet.Open(Select * From Tab_Userint count = m_DataSet.GetRecordCount()。for(int i = 0。i ItemLUserName-Value)。m_DataSet.Next()。m_UserList.S
copyright@ 2008-2022 冰豆网网站版权所有
经营许可证编号:鄂ICP备2022015515号-1