SQLserver数据库课程设计方案.docx

淮 海 工 学 院 计算机工程学院课程设计报告设计名称：数据库课程设计姓名：学号：专业班级：网络 121系 （院）：计算机工程学院设计时间：2014.6.19~~2014.6.25设计地点：机房、宿舍、文通楼、图书馆指导教师评语：成绩：签名：年 月 日<<数据库原理及应用 >>课程设计报告 第 2 页，共 15 页一、 需求分析目前，大多数文档管理系统在实现了企业各部门日常文件管理的基本功能外，还增设了很多的新功能用以满足文档管理电子化、标准化的新要求，功能强大的档案查询模块大大方便了管理者日常查找文档的工作，解决了传统管理中查找困难、查找耗时间等问题使用现代化的文档管理系统满足了企业“无纸化”的办公要求，实现了通过计算机对文档管理全程跟踪的要求二、 概念结构设计1.系统功能结构文档管理系统系统设置 基本信息 文档管理 数据库管理用口退单文添修删文查数数日户令出位档加改除档看据据志管修系档类文文文浏属库库管理改统案别档档档览性备还理份原2. 业务流程图数据库备份数据库管理数据库还原管理人员添加文档文档管理信息 修改文档集删除文档集<<数据库原理及应用 >>课程设计报告 第 3 页，共 15 页三、 物理结构设计系统表文档表单位表文档表用户表<<数据库原理及应用 >>课程设计报告 第 4 页，共 15 页四、 应用系统实现与测试登陆界面系统界面<<数据库原理及应用 >>课程设计报告 第 5 页，共 15 页文档基本信息日志管理文档基本信息<<数据库原理及应用 >>课程设计报告 第 6 页，共 15 页文档类别单位列表五、部分代码// ADO.cpp: implementation of the CADO class.////////////////////////////////////////////////////////////////////////#include "stdafx.h"#include "ADO.h"#include #ifdef _DEBUG#undef THIS_FILEstatic char THIS_FILE[]=__FILE__;<<数据库原理及应用 >>课程设计报告 第 7 页，共 15 页#define new DEBUG_NEW#endif//////////////////////////////////////////////////////////////////////// Construction/Destruction//////////////////////////////////////////////////////////////////////int ConCount = 0;CADOConnection g_Connection;// 全局数据库连接对象CADOConnection * GetConnection(){return &g_Connection;}CADOConnection::CADOConnection(){InitADO();m_Connection.CreateInstance("ADODB.Connection");}CADOConnection::~CADOConnection(){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())m_Connection->Close();m_Connection->Open((_bstr_t)ConStr,"","",adModeUnknown); return IsOpen();}<<数据库原理及应用 >>课程设计报告 第 8 页，共 15 页CString CADOConnection::GetSQLConStr(CString IP, CString DBName){CString Str;Str.Format("Provider=SQLOLEDB.1;PersistSecurityInfo=False;UserID=sa;InitialCatalog=%s;Data Source=%s",DBName,IP);return Str;}_ConnectionPtr CADOConnection::GetConnection(){return m_Connection;}BOOL CADOConnection::IsOpen(){long State;m_Connection->get_State(&State);if (State == adStateOpen)return true;return false;}////////////////////////////////////////CADODataSet::CADODataSet(){m_DataSet.CreateInstance("ADODB.Recordset");}CADODataSet::~CADODataSet(){if (IsOpen())m_DataSet->Close();m_DataSet = NULL;m_Connection = NULL;}void CADODataSet::SetConnection(CADOConnection *pCon){m_Connection = pCon;}int CADODataSet::GetRecordCount(){if (IsOpen())<<数据库原理及应用 >>课程设计报告 第 9 页，共 15 页return m_DataSet->GetRecordCount();elsereturn 0;}BOOL CADODataSet::Open(CString SQLStr){if (IsOpen())m_DataSet->Close();//*/m_DataSet->Open(_bstr_t(SQLStr),_variant_t((IDispatch*)g_Connection.GetConnection(), true),adOpenKeyset, adLockOptimistic, adCmdText);return IsOpen();//*/}BOOL CADODataSet::IsOpen(){long State;m_DataSet->get_State(&State);if (State == adStateOpen)return true;return false;}FieldsPtr CADODataSet::GetFields(){return m_DataSet->GetFields();}BOOL CADODataSet::Next(){if (m_DataSet->adoEOF)return false;m_DataSet->MoveNext();return true;}void CADODataSet::AddNew(){m_DataSet->AddNew();}<<数据库原理及应用 >> 课程设计报告 第 10 页，共 15 页void CADODataSet::SetFieldValue(CString FieldName, _variant_t Value){m_DataSet->PutCollect((_bstr_t)FieldName,Value);}void CADODataSet::Save(){m_DataSet->Update();}void CADODataSet::move(int nIndex){。