上位机MFC数据库ADO账号管理实例

上位机MFC数据库ADO账号管理实例

例程实现对ADO数据库账号管理功能。
程序运行时要登录

1. void CLoginDlg::OnLogin()
   
2. {
   
3.         UpdateData();
   
4.         if(m_name.IsEmpty()||m_pwd.IsEmpty())
   
5.         {       
   
6.                 AfxMessageBox("请输入用户名和密码！");       
   
7.                 return;
   
8.         }
   
9.         else//if user enter name and password.
   
10.         {
    
11.                 //成生sql语句
    
12.                 CString sql="SELECT * FROM USERS where username='"+m_name+"' and passwd='"+m_pwd+"'";
    
13.                 try
    
14.                 {
    
15.                         //查询数据库，看是否有此用户和密码
    
16.                         m_pRecordset.CreateInstance("ADODB.Recordset");
    
17.                         m_pRecordset->Open((_variant_t)sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
    
18.                         //如果没有此用户和密码，再查询是否有此用户
    
19.                         if(m_pRecordset->adoEOF)
    
20.                         {
    
21.                         AfxMessageBox("用户名或密码错误！");
    
22.                         }
    
23.                         //用户名和密码存在，登录成功
    
24.                         else
    
25.                         {
    
26.                                 theApp.name=m_name;
    
27.                                 theApp.admin=(LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("power");
    
28.                                 theApp.pwd=m_pwd;
    
29.                                 CDialog::OnOK();
    
30.                                 return;
    
31.                         }
    
32.                         m_pRecordset->Close();
    
33.                 }
    
34.                 catch(_com_error e)///捕捉异常
    
35.                 {
    
36.                         CString temp;
    
37.                         temp.Format("读取用户名和密码错误:%s",e.ErrorMessage());
    
38.                         AfxMessageBox(temp);
    
39.                         return;
    
40.                 }
    
41.         }       
    
42. }

复制代码

然后可以弹出账号管理对话框，新增账号保存账号。

1. void CPowerDlg::OnUserSave()
   
2. {
   
3.         this->UpdateData();
   
4.         if(m_ctruser.IsWindowEnabled())
   
5.         {//增加新用户的输入检查
   
6.                 if(m_user=="")
   
7.                 {
   
8.                         MessageBox("请填写用户名!");
   
9.                         m_ctruser.SetFocus();
   
10.                         return;
    
11.                 }
    
12. 
    
13.         }
    
14.         else
    
15.         {//修改用户信息输入检查
    
16.                 if(m_user=="")
    
17.                 {
    
18.                         MessageBox("请选择一个用户!");
    
19.                         return;
    
20.                 }
    
21. 
    
22.         }
    
23.         //限制用户密码不能为空
    
24.         if(m_pwd=="")
    
25.         {
    
26.                 MessageBox("用户密码不能为空，请输入密码!");
    
27.                 m_ctrpwd.SetFocus();
    
28.                 return;
    
29.         }
    
30.         //验证密码与确认密码是否一致
    
31.         if(m_pwd!=m_repwd)
    
32.         {
    
33.                 MessageBox("再次输入密码不一致，请重新输入密码!");
    
34.                 m_ctrpwd.SetFocus();
    
35.                 m_pwd = "";
    
36.                 m_repwd = "";
    
37.                 this->UpdateData(FALSE);
    
38.                 return;
    
39.         }
    
40.        
    
41.         CString Sql, strSql;
    
42.         _variant_t fieldCount;
    
43.         //判断用户是否重复
    
44.         m_pCon=theApp.m_pConnection;//给连接对象赋值
    
45.         m_pset.CreateInstance("ADODB.Recordset");//创建记录集实例对象
    
46. 
    
47.         Sql.Format("select * from users where username = '%s'", m_user);
    
48. 
    
49.         try
    
50.         {
    
51.         m_pset->Open((_bstr_t)Sql,&(*m_pCon),adOpenForwardOnly,adLockOptimistic,adCmdText);
    
52.         }
    
53.     catch(_com_error *e)
    
54.         {
    
55.         AfxMessageBox("数据记录打开失败!");
    
56.         }
    
57. 
    
58.         //打开记录集，进行用户信息增加或修改
    
59.         if(m_ctruser.IsWindowEnabled())
    
60.         {//增加新用户的输入检查
    
61.                 if(!m_pset->adoEOF)
    
62.                 {
    
63.                         MessageBox("该用户已经存在!");
    
64.                         m_pset->Close();
    
65.                         return;
    
66.                 }
    
67.                 else
    
68.                 {
    
69.                 strSql="insert into users (username, passwd, power) values ('" +m_user+ "', '" +m_pwd+ "', '" +m_power+ "') " ;
    
70.           
    
71.                 theApp.m_pConnection->Execute((_bstr_t)strSql,&fieldCount,adCmdText);
    
72.             VariantClear (&fieldCount);
    
73.         //更新用户列表
    
74.                 this->UpdateList();
    
75.                 }
    
76.         }
    
77.         else
    
78.         {//修改用户信息
    
79.                 if(m_pset->adoEOF)
    
80.                 {
    
81.                         MessageBox("该用户不存在!无法进行修改");
    
82.                         m_pset->Close();
    
83.                         return;
    
84.                 }
    
85.                 else
    
86.                 {
    
87.                 strSql = "update users set username ='" + m_user + "', passwd ='" + m_pwd + "', power ='" + m_power + "'where username ='" + m_user + "' ";
    
88. 
    
89.                 theApp.m_pConnection->Execute((_bstr_t)strSql,&fieldCount,adCmdText);
    
90.             VariantClear (&fieldCount);
    
91.         //更新用户列表
    
92.                 this->UpdateList();
    
93.                 }
    
94.         }
    
95.         m_ctruser.EnableWindow(FALSE);
    
96. 
    
97.        
    
98. }

复制代码

请点击此处下载

请先注册会员后在进行下载

已注册会员，请先登录后下载

文件名称:上位机MFC数据库ADO账号管理实例.rar 
文件大小:241.03 KB  售价:1金币
下载权限: 不限 以上或 VIP会员   [购买捐助会员]   [充值积分]  

  

上位机VC MFC程序开发精典实例大全源码与视频讲解配套下载408例

  

经历1年的编程与录制点击进入查看

  

halcon从自学到接项目视频教程，另外再赠送全网最全资源  

  

欢迎围观我录制的一套halcon自学视频教程(进入)

  

如果您认可，可联系功能定制！

  

如果您着急，充值会员可直接联系发您资料！