vc.net登陆以后,退出登陆界面,进入主界面如何操作。
private: System::Void btnLogin_Click(System::Object * sender, System::EventArgs * e)
{
AdaptorLogin->SelectCommand->Parameters->Item[0]->Value=TBoxUserID->Text;
AdaptorLogin->SelectCommand->Parameters->Item[1]->Value=TBoxUserName->Text;
AdaptorLogin->SelectCommand->Parameters->Item[2]->Value=TBoxPassword->Text;
AdaptorLogin->Fill(DataSetLogin,S"Users");
if(DataSetLogin->Tables->Item[0]->Rows->Count>0)
{
MessageBox::Show(this,String::Concat(S"Welcome",TBoxUserName->Text),"In System");
strUserID=TBoxUserID->Text;
strUser=TBoxUserName->Text;
strDepartment=DataSetLogin->Tables->Item[0]->Columns->Item[1]->ToString();
this->DialogResult=DialogResult::OK;
}
else
{
MessageBox::Show(this,"UserName is Wrong! ","In System");
}
}
登陆以后退出登陆界面,进入FormMain主界面大家给点指点把