登陆源码

[marsmars]

能否提供一个基于对话框的注册登陆程序的源代码？不用连接数据库。

[marsmars]

up

[anubis104]

void CInandOutDlg::OnWritein()
{
// TODO: Add your control notification handler code here
CString strName,strKey,strLoginName,strLoginKey,strNumber;
::GetPrivateProfileString("LoginNumber","Number",NULL,strNumber.GetBuffer(4),4,".\\log.ini");//
if (strNumber!="")
{

CtmNum=atoi(strNumber);
CtmNum++;
}
else
{
CtmNum=1;
}
strNumber.Format("%d",CtmNum);
UpdateData(true);


strName = m_sName;
strKey = m_sKey;
strNum = "Value";

strNum.Format("Number%d",CtmNum);

::WritePrivateProfileString("LoginNumber","Number",strNumber,".\\log.ini");//
::WritePrivateProfileString("LoginName",strNum,strName,".\\log.ini");
::WritePrivateProfileString("LoginKey",strNum,strKey,".\\log.ini");

GetDlgItem(IDC_NAME)->SetWindowText(nn);//
GetDlgItem(IDC_KEY)->SetWindowText(nn);

MessageBox("注册完成");
}

void CInandOutDlg::OnLogin()
{
// TODO: Add your control notification handler code here
CString strName,strKey,strNum,strNumber;
bool flag=false;
UpdateData(true);
;

::GetPrivateProfileString("LoginNumber","Number",NULL,strNumber.GetBuffer(4),4,".\\log.ini");//get all number

for( int i=1;i<=atoi(strNumber);i++)//find out
{

strNum.Format("Number%d",i);
::GetPrivateProfileString("LoginName",strNum,NULL,strName.GetBuffer(128),128,".\\log.ini");//get name
if(m_sName.Compare(strName)==0)
{
//MessageBox("o");
::GetPrivateProfileString("LoginKey",strNum,NULL,strKey.GetBuffer(128),128,".\\log.ini");//get key
if(m_sKey.Compare(strKey)==0)
{
flag=true;
OnOK();
}

else
{
MessageBox("密码错误!");

GetDlgItem(IDC_NAME)->SetWindowText(nn);
GetDlgItem(IDC_KEY)->SetWindowText(nn);
}

}
}
if (flag==false)
{
MessageBox("用户名有误");

GetDlgItem(IDC_NAME)->SetWindowText(nn);
GetDlgItem(IDC_KEY)->SetWindowText(nn);

}


}