// MovieIn.cpp : implementation file
//

#include "stdafx.h"
#include "SoftDocSystem.h"
#include "MovieIn.h"
#include "LogMngr.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CMovieIn dialog


CMovieIn::CMovieIn(CWnd* pParent /*=NULL*/)
	: CDialog(CMovieIn::IDD, pParent)
{
	//{{AFX_DATA_INIT(CMovieIn)
	m_Name = _T("");
	m_Context = _T("");
	m_Number = _T("");
	m_SoftType = _T("");
	m_Xinghao = _T("");
	m_Xitong = _T("");
	m_author = _T("");
	//}}AFX_DATA_INIT
}


void CMovieIn::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CMovieIn)
	DDX_Control(pDX, IDC_COMBO4, m_authorCtrl);
	DDX_Control(pDX, IDC_COMBO3, m_XitongCtrl);
	DDX_Control(pDX, IDC_COMBO2, m_XinghaoCtrl);
	DDX_Control(pDX, IDC_COMBO1, m_SoftTypeCtrl);
	DDX_Text(pDX, IDC_EDIT1, m_Name);
	DDX_Text(pDX, IDC_EDIT5, m_Context);
	DDX_Text(pDX, IDC_EDIT7, m_Number);
	DDX_CBString(pDX, IDC_COMBO1, m_SoftType);
	DDX_CBString(pDX, IDC_COMBO2, m_Xinghao);
	DDX_CBString(pDX, IDC_COMBO3, m_Xitong);
	DDX_CBString(pDX, IDC_COMBO4, m_author);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CMovieIn, CDialog)
	//{{AFX_MSG_MAP(CMovieIn)
	ON_WM_DESTROY()
	ON_BN_CLICKED(IDC_BUTTON1, OnInput)
	ON_BN_CLICKED(IDC_BUTTON2, OnNext)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CMovieIn message handlers

int CMovieIn::DoModal() 
{
	// TODO: Add your specialized code here and/or call the base class
	
	return CDialog::DoModal();
}

BOOL CMovieIn::OnInitDialog() 
{
	CDialog::OnInitDialog();
		// TODO: Add extra initialization here
		((CEdit*)GetDlgItem(IDC_EDIT1))->SetLimitText(30);

	 CSoftDocSystemApp* myApp=(CSoftDocSystemApp*)AfxGetApp();
	 CString source_;
	 source_.Format ("driver={SQL Server};server=%s;database=SoftDocument",myApp->ConnectServer);
	_bstr_t source=source_;
	_bstr_t pwd=myApp->ConnectPwd;
	_bstr_t user=myApp->ConnectUser;
//Databaxe Initialled

	HRESULT hr;
	try{
		hr = m_DBCnt.CreateInstance(_uuidof(Connection));
		m_DBCnt->ConnectionTimeout = 60;
		m_DBCnt->Mode = adModeReadWrite;
		if(SUCCEEDED(hr))
			hr = m_DBCnt->Open(source, user, pwd, 16);
		if(SUCCEEDED(hr))
		{m_fConnected = TRUE;
		}
		else 
		m_fConnected = FALSE;
	}
	catch (_com_error &e){
	   MessageBox(e.ErrorMessage()); 
	   m_fConnected = FALSE;
	}
	if(!m_fConnected) MessageBox("ADO數據源初始化失敗！");
	else
		m_strSource = (char * )source;
InputExist();//輸入原始數據
	Initiate();
	
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CMovieIn::OnDestroy() 
{
	CDialog::OnDestroy();
	if(m_DBCnt->GetState()==adStateOpen)
		m_DBCnt->Close();

	
}

void CMovieIn::OnInput() 
{
	UpdateData();
	int Geshi[6];
	// TODO: Add your control notification handler code here
    if(m_Name==""){AfxMessageBox("請輸入軟件名");return;}
	if(m_author==""){AfxMessageBox("請輸入作者姓名");return;}
	if(m_Xinghao=="")
	{AfxMessageBox("請輸入所屬型號名稱");return;}
	if(m_Context==""){AfxMessageBox("請輸入功能描述");return;}
	if(m_SoftType==""){AfxMessageBox("清輸入軟件類型");return;}
m_Xitong.TrimRight(" ");
m_author.TrimRight(" ");
m_Name.TrimRight (" ");
m_Xinghao.TrimRight(" ");
m_Context.TrimLeft (" ");
m_Context.TrimRight (" ");
//判斷存檔格式
  if(((CButton*)GetDlgItem(IDC_CHECK1))->GetCheck())Geshi[1]=1;
  if(((CButton*)GetDlgItem(IDC_CHECK2))->GetCheck())Geshi[2]=1;
  if(((CButton*)GetDlgItem(IDC_CHECK3))->GetCheck())Geshi[3]=1;
  if(((CButton*)GetDlgItem(IDC_CHECK4))->GetCheck())Geshi[4]=1;
  if(((CButton*)GetDlgItem(IDC_CHECK5))->GetCheck())Geshi[5]=1;
//格式是否已經選擇
  int IsSelected,i;
  CString g[6]; 
  CString mystr[6];
  	CString Mysql_,str1,str2,str3,str5;
  IsSelected=0;
  	CTime tm=CTime::GetCurrentTime ();
  str1.Format ("%d-%d-%d",tm.GetYear (),tm.GetMonth (),tm.GetDay ());
 
  for(i=1;i<6;i++)
  {if(Geshi[i]==1){IsSelected+=1;
  g[i]="在家";
  mystr[i]=str1;}
  else
	 { g[i]="無";
  mystr[i]=_T("");}
  }
  if(IsSelected==0 ){AfxMessageBox("請輸入文檔格式");return;}
	//輸入軟件數據
	CString sql_;
GetDlgItem(IDC_BUTTON1)->EnableWindow(false);
sql_.GetBuffer(500);
sql_.Format("INSERT INTO SoftDocInfo(軟件名稱,作者,軟件類型,所屬型號,所屬系統,軟件編號,軟盤,光盤,硬盤,文本,其他,軟盤時間,光盤時間,硬盤時間,文本時間,其他時間,軟件功能描述) VALUES('%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s')",m_Name,m_author,m_SoftType,m_Xinghao,m_Xitong,m_Number,g[1],g[2],g[4],g[3],g[5],mystr[1],mystr[2],mystr[3],mystr[4],mystr[5],m_Context);
_bstr_t sql=sql_;
try{
	m_DBCnt->BeginTrans ();
try{
	//if(m_DBCnt->GetState ()==adStateOpen)
	m_DBCnt->Execute(sql,NULL,adCmdText);}
catch(_com_error &e){
	AfxMessageBox(e.ErrorMessage());return;}
//輸入下一個編號信息
	int nRightNum = atoi(m_RightNum)+1;
str1.Format("%d",nRightNum);
sql_.Format("UPDATE SoftDocInfo SET 目前編號 ='%s' WHERE 目前編號 = '%s'",str1,m_RightNum);
_bstr_t sql1=sql_;
try{
	m_DBCnt->Execute(sql1,NULL,adCmdText);}
catch(_com_error &e){
	AfxMessageBox(e.ErrorMessage());return;}
m_DBCnt->CommitTrans ();
}
catch(_com_error &e){
	m_DBCnt->RollbackTrans ();return;}//出錯后回滾事務
if(m_Log.Setup (m_DBCnt))
		m_Log.Addlog ("管理員","新文檔入庫",m_Name);//操作日志

AfxMessageBox("你的信息已成功輸入！");
InputShuju();
}

void CMovieIn::OnCancel() 
{
	// TODO: Add extra cleanup here
	
	CDialog::OnCancel();
}

void CMovieIn::Initiate()
{
	CString Mysql_,str1,str2,str3;
	_RecordsetPtr Myset;
	Myset.CreateInstance (__uuidof(Recordset));
Mysql_.Format("SELECT DISTINCT 目前編號 FROM SoftDocInfo");
_bstr_t Mysql=Mysql_;
_bstr_t source=m_strSource;
try{
	Myset->Open (Mysql,source,adOpenDynamic,adLockOptimistic,adCmdText);
}
catch(_com_error &e){
	AfxMessageBox(e.ErrorMessage());return;}
str2.Empty();
_variant_t Holder;
while(!Myset->adoEOF ){
	Holder=Myset->GetCollect ("目前編號");
	if(Holder.vt!=VT_NULL)
	str2=(char*)(_bstr_t)Holder;
	Myset->MoveNext ();
}
Myset->Close();
if(str2.IsEmpty())str2="0";
str2.TrimRight(" ");
CTime tm=CTime::GetCurrentTime();
str1="S";
CString mystr1;
mystr1.Format ("%02d%02d",tm.GetMonth (),tm.GetDay());
str1+=mystr1;	
m_RightNum=str2;
int i=str2.GetLength ();
for(int j=0;j<7-i;j++)
str3+="0";
str3=str1+str3+str2;
m_Number=str3;
GetDlgItem(IDC_EDIT7)->SetWindowText(str3);
UpdateData();
}

void CMovieIn::OnNext() 
{
	// TODO: Add your control notification handler code here
Initiate();
GetDlgItem(IDC_BUTTON1)->EnableWindow(true);

}

void CMovieIn::InputShuju()
{
m_author.TrimRight (" ");
m_Xinghao.TrimRight (" ");
m_Xitong.TrimRight (" ");
CString sql1_,sql2_,sql3_,sql_,sql;
sql1_.Format ("select * from Author where 作者名 = '%s'",m_author);
sql2_.Format ("select * from Xinghao where 型號名 = '%s'",m_Xinghao);
sql3_.Format ("select * from SystemName where 系統名 = '%s'",m_Xitong);
_bstr_t sql1=sql1_;
_bstr_t sql2=sql2_;
_bstr_t sql3=sql3_;
	_RecordsetPtr Myset;
	int HaveNo=0;
	_variant_t Holder;
//判斷作者名是否已存入
	Myset.CreateInstance (__uuidof(Recordset));
_bstr_t source=m_strSource;
try{
	Myset->Open (sql1,source,adOpenDynamic,adLockOptimistic,adCmdText);
}
catch(_com_error &e){
	AfxMessageBox(e.ErrorMessage());return;}

while(!Myset->adoEOF ){
HaveNo+=1;
	Myset->MoveNext ();
}
Myset->Close();
if(HaveNo==0){
	//輸入作者名
	m_authorCtrl.AddString(m_author);
sql_.Format ("insert into Author(作者名) values('%s')",m_author);
_bstr_t sql4=sql_;
try{
	m_DBCnt->Execute(sql4,NULL,adCmdText);}
catch(_com_error &e){
	AfxMessageBox("作者名存入錯誤!");}}
//判斷型號名是否存入表中	
HaveNo=0;
try{
	Myset->Open (sql2,source,adOpenDynamic,adLockOptimistic,adCmdText);
}
catch(_com_error &e){
	AfxMessageBox(e.ErrorMessage());return;}

while(!Myset->adoEOF ){
Holder=Myset->GetCollect ("型號名");
	if(Holder.vt!=VT_NULL)
HaveNo+=1;
	Myset->MoveNext ();
}
Myset->Close();
if(HaveNo==0){
	//輸入型號名
	m_XinghaoCtrl.AddString(m_Xinghao);
sql_.Format ("insert into Xinghao(型號名) values('%s')",m_Xinghao);
_bstr_t sql5=sql_;
try{
	m_DBCnt->Execute(sql5,NULL,adCmdText);}
catch(_com_error &e){
	AfxMessageBox("型號名存入錯誤");}
}
//判斷系統名是否存入表中
 HaveNo=0;
	Myset.CreateInstance (__uuidof(Recordset));
try{
	Myset->Open (sql3,source,adOpenDynamic,adLockOptimistic,adCmdText);
}
catch(_com_error &e){
	AfxMessageBox(e.ErrorMessage());return;}

while(!Myset->adoEOF ){
	Holder=Myset->GetCollect ("系統名");
	if(Holder.vt!=VT_NULL)
HaveNo+=1;
	Myset->MoveNext ();
}
Myset->Close();
if(HaveNo==0){
	//輸入系統名
m_XitongCtrl.AddString(m_Xitong);
sql_.Format ("insert into SystemName(系統名) values('%s')",m_Xitong);
_bstr_t sql6=sql_;
try{
	m_DBCnt->Execute(sql6,NULL,adCmdText);}
catch(_com_error &e){
	AfxMessageBox("系統名存入錯誤");}}

}

void CMovieIn::InputExist()
{
	CString Mysql_,str1,str2,str3;
	_RecordsetPtr Myset;
	Myset.CreateInstance (__uuidof(Recordset));
    Mysql_.Format("SELECT DISTINCT 作者名 FROM Author");
    _bstr_t Mysql=Mysql_;
    _bstr_t source=m_strSource;
try{
	Myset->Open (Mysql,source,adOpenDynamic,adLockOptimistic,adCmdText);
}
catch(_com_error &e){
	AfxMessageBox(e.ErrorMessage());return;}
    _variant_t Holder;
    while(!Myset->adoEOF ){
	Holder=Myset->GetCollect ("作者名");
	if(Holder.vt!=VT_NULL)
	str2=(char*)(_bstr_t)Holder;
	str2.TrimRight (" ");
	m_authorCtrl.AddString(str2);
	Myset->MoveNext ();
	}
Myset->Close();
((CComboBox*)GetDlgItem(IDC_COMBO4))->SetCurSel(0);
 Mysql_.Format("SELECT DISTINCT 系統名 FROM SystemName");
    _bstr_t Mysql3=Mysql_;
try{
	Myset->Open (Mysql3,source,adOpenDynamic,adLockOptimistic,adCmdText);
}
catch(_com_error &e){
	AfxMessageBox(e.ErrorMessage());return;}
    while(!Myset->adoEOF ){
	Holder=Myset->GetCollect ("系統名");
	if(Holder.vt!=VT_NULL)
	str2=(char*)(_bstr_t)Holder;
	str2.TrimRight (" ");
	m_XitongCtrl.AddString(str2);
	Myset->MoveNext ();
	}
Myset->Close();
((CComboBox*)GetDlgItem(IDC_COMBO3))->SetCurSel(0);
 Mysql_.Format("SELECT DISTINCT 型號名 FROM Xinghao");
    _bstr_t Mysql2=Mysql_;
try{
	Myset->Open (Mysql2,source,adOpenDynamic,adLockOptimistic,adCmdText);
}
catch(_com_error &e){
	AfxMessageBox(e.ErrorMessage());return;}
    while(!Myset->adoEOF ){
	Holder=Myset->GetCollect ("型號名");
	if(Holder.vt!=VT_NULL)
	str2=(char*)(_bstr_t)Holder;
	str2.TrimRight (" ");
	m_XinghaoCtrl.AddString(str2);
	Myset->MoveNext ();
	}
Myset->Close();
((CComboBox*)GetDlgItem(IDC_COMBO2))->SetCurSel(0);
((CComboBox*)GetDlgItem(IDC_COMBO1))->SetCurSel(0);
//UpdateData(false);
}