⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 database.cpp

📁 主要功能 商品销售管理系统属于小型的进销存管理系统
💻 CPP
📖 第 1 页 / 共 4 页
字号:
🔍
1234 
	_RecordsetPtr m_Rsp ;
	try{
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		if(!m_Rsp->GetadoEOF())
		{//存在数据，更新
			sprintf(m_szSql, "update tb_merchandiseinfo set name = '%s', spec = '%s', \
				shortmane = '%s', defaultprice = %s, manufacturer = '%s', memo = '%s' \
				where ID = '%s'", m_szName,m_szGg,m_szZjm,m_szMrjg,m_szCj,m_szBz,m_szID) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
		else
		{//不存在数据，增加
			sprintf(m_szSql, "insert into tb_merchandiseinfo (ID, name, spec, shortmane, defaultprice, manufacturer, memo) \
				values ('%s', '%s', '%s', '%s', %s, '%s', '%s')" ,m_szID, m_szName,m_szGg,m_szZjm,m_szMrjg,m_szCj,m_szBz) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}

void CDatabase::ListGysxxToCtrl(CListCtrl *m_hListCtrl)
{
	m_hListCtrl->DeleteAllItems() ;

	_variant_t v(0L) ;
	_RecordsetPtr m_Rsp ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_providerinfo") ;
	try{
		
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			m_hListCtrl->InsertItem(0, "") ;

			v = m_Rsp->GetCollect("provider") ;
			m_hListCtrl->SetItemText(0, 0, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("corporation") ;
			m_hListCtrl->SetItemText(0, 1, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("principal") ;
			m_hListCtrl->SetItemText(0, 2, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("phone") ;
			m_hListCtrl->SetItemText(0, 3, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("addr") ;
			m_hListCtrl->SetItemText(0, 4, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("web") ;
			m_hListCtrl->SetItemText(0, 5, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("e_mail") ;
			m_hListCtrl->SetItemText(0, 6, _bstr_t(v)) ;

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}

void CDatabase::UpdateGysxxData(char *provider, char *corporation, char *principal, char *phone, char *addr, char *web, char *e_mail)
{
	char m_szSql[512] ;
	_variant_t v(0L) ;
	sprintf(m_szSql, "select * from tb_providerinfo where provider = '%s'", provider) ;
	_RecordsetPtr m_Rsp ;
	try{
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		if(!m_Rsp->GetadoEOF())
		{//存在数据，更新
			sprintf(m_szSql, "update tb_providerinfo set corporation = '%s', principal = '%s', \
				phone = '%s', addr = '%s', web = '%s', e_mail = '%s' \
				where provider = '%s'", corporation, principal, phone, addr, web, e_mail, provider) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
		else
		{//不存在数据，增加
			sprintf(m_szSql, "insert into tb_providerinfo (corporation, principal, phone, addr, web, e_mail, provider) \
				values ('%s', '%s', '%s', '%s', '%s', '%s', '%s')" ,corporation, principal, phone, addr, web, e_mail, provider) ;
			m_Connection->Execute(_bstr_t(m_szSql),
				&v, adCmdText) ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}

void CDatabase::EditGysxxToCtrl(char *provider, CEdit *m_hEditYx, CEdit *m_hEditXxdz, CEdit*m_hEditWz, CEdit *m_hEditLxdh, CEdit *m_hEditGysmc, CEdit *m_hEditFzr, CEdit *m_hEditFr)
{
	_variant_t v(0L) ;
	_RecordsetPtr m_Rsp ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_providerinfo where provider = '%s'", provider) ;
	try{
		
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			v = m_Rsp->GetCollect("provider") ;
			m_hEditGysmc->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("corporation") ;
			m_hEditFr->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("principal") ;
			m_hEditFzr->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("phone") ;
			m_hEditLxdh->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("addr") ;
			m_hEditXxdz->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("web") ;
			m_hEditWz->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("e_mail") ;
			m_hEditYx->SetWindowText(_bstr_t(v)) ;

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}

void CDatabase::ListKhxxglToCtrl(CListCtrl *m_hListCtrl)
{
	m_hListCtrl->DeleteAllItems() ;

	_variant_t v(0L) ;
	_RecordsetPtr m_Rsp ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_customerinfo") ;
	try{
		
			
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			m_hListCtrl->InsertItem(0, "") ;

			v = m_Rsp->GetCollect("name") ;
			m_hListCtrl->SetItemText(0, 0, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("principal") ;
			m_hListCtrl->SetItemText(0, 1, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("phone") ;
			m_hListCtrl->SetItemText(0, 2, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("addr") ;
			m_hListCtrl->SetItemText(0, 3, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("web") ;
			m_hListCtrl->SetItemText(0, 4, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("e_mail") ;
			m_hListCtrl->SetItemText(0, 5, _bstr_t(v)) ;

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}

void CDatabase::UpdateKhxxData(char *name, char *principal, char *phone, char *addr, char *web, char *e_mail)
{
	char m_szSql[512] ;
	_variant_t v(0L) ;
	sprintf(m_szSql, "select * from tb_customerinfo where name = '%s'", name) ;
	_RecordsetPtr m_Rsp ;
	try{
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		if(!m_Rsp->GetadoEOF())
		{//存在数据，更新
			sprintf(m_szSql, "update tb_customerinfo set principal = '%s', \
				phone = '%s', addr = '%s', web = '%s', e_mail = '%s' \
				where name = '%s'", principal, phone, addr, web, e_mail, name) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
		else
		{//不存在数据，增加
			sprintf(m_szSql, "insert into tb_customerinfo (principal, phone, addr, web, e_mail, name) \
				values ('%s', '%s', '%s', '%s', '%s', '%s')" , principal, phone, addr, web, e_mail, name) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}

void CDatabase::EditKhxxToCtrl(char *name, CEdit *m_hEditYx, CEdit *m_hEditWz, CEdit *m_hEditLxdh, CEdit *m_hEditKhmc, CEdit *m_hEditDz, CEdit *m_hEditFzr)
{
	_variant_t v(0L) ;
	_RecordsetPtr m_Rsp ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_customerinfo where name = '%s'", name) ;
	try{
		
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			v = m_Rsp->GetCollect("name") ;
			m_hEditKhmc->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("principal") ;
			m_hEditFzr->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("phone") ;
			m_hEditLxdh->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("addr") ;
			m_hEditDz->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("web") ;
			m_hEditWz->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("e_mail") ;
			m_hEditYx->SetWindowText(_bstr_t(v)) ;

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}

void CDatabase::ListKcglToCtrl(CListCtrl *m_hListCtrl)
{
	m_hListCtrl->DeleteAllItems() ;

	_variant_t v(0L) ;
	_RecordsetPtr m_Rsp ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_merchandisestorage") ;
	try{
		
			
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			m_hListCtrl->InsertItem(0, "") ;

			v = m_Rsp->GetCollect("merchandiseID") ;
			m_hListCtrl->SetItemText(0, 0, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("storagename") ;
			m_hListCtrl->SetItemText(0, 1, _bstr_t(v)) ;

			v = m_Rsp->GetCollect("Storagenum") ;
			m_hListCtrl->SetItemText(0, 2, _bstr_t(v)) ;

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}

void CDatabase::UpdateKcData(char *merchandiseID, char *storagename, char *Storagenum)
{
	char m_szSql[512] ;
	_variant_t v(0L) ;
	sprintf(m_szSql, "select * from tb_merchandisestorage where merchandiseID = '%s'", merchandiseID) ;
	_RecordsetPtr m_Rsp ;
	try{
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		if(!m_Rsp->GetadoEOF())
		{//存在数据，更新
			sprintf(m_szSql, "update tb_merchandisestorage set storagename = '%s', \
				Storagenum = '%s' where merchandiseID = '%s'", 
				storagename, Storagenum, merchandiseID) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
		else
		{//不存在数据，增加
			sprintf(m_szSql, "insert into tb_merchandisestorage (storagename, Storagenum, merchandiseID) \
				values ('%s', '%s', '%s')" , storagename, Storagenum, merchandiseID) ;
			m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}

}

void CDatabase::EditKcToCtrl(char *merchandiseID, CEdit *m_hEditSpbh, CEdit *m_hEditKcmc, CEdit *m_hEditKcsl)
{
	_variant_t v(0L) ;
	_RecordsetPtr m_Rsp ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_merchandisestorage where merchandiseID = '%s'", merchandiseID) ;
	try{
		
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), &v, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			v = m_Rsp->GetCollect("merchandiseID") ;
			m_hEditSpbh->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("storagename") ;
			m_hEditKcmc->SetWindowText(_bstr_t(v)) ;

			v = m_Rsp->GetCollect("Storagenum") ;
			m_hEditKcsl->SetWindowText(_bstr_t(v)) ;

			m_Rsp->MoveNext() ;
		}
	}
	catch(_com_error & e) 
	{
		char m_szTmp[1024] ;
		sprintf(m_szTmp, "执行==>%s<==, 数据库操作失败,错误原因：%s\n",m_szSql, LPCTSTR(e.Description()));
	}
}

void CDatabase::ListSprkToCtrl(CListCtrl *m_hListCtrl)
{
	m_hListCtrl->DeleteAllItems() ;

	CString v ;
	_RecordsetPtr m_Rsp ;
	char m_szSql[512] ;
	sprintf(m_szSql, "select * from tb_instore_main a inner join tb_instock_sub b on a.ID = b.instockid") ;
	try{
		
			
		m_Rsp = m_Connection->Execute(_bstr_t(m_szSql), NULL, adCmdText) ;
		while(!m_Rsp->GetadoEOF())
		{
			m_hListCtrl->InsertItem(0, "") ;

			v = (TCHAR*)(_bstr_t)m_Rsp->GetCollect("ID") ;
			m_hListCtrl->SetItemText(0, 0, _bstr_t(v)) ;

			v = (TCHAR*)(_bstr_t)m_Rsp->GetCollect("provider") ;
			m_hListCtrl->SetItemText(0, 1, _bstr_t(v)) ;

			v = (TCHAR*)(_bstr_t)m_Rsp->GetCollect("operator") ;
			m_hListCtrl->SetItemText(0, 2, _bstr_t(v)) ;

			v = (TCHAR*)(_bstr_t)m_Rsp->GetCollect("rebate") ;
			m_hListCtrl->SetItemText(0, 3, _bstr_t(v)) ;

			v = (TCHAR*)(_bstr_t)m_Rsp->GetCollect("sumtotal") ;
			m_hListCtrl->SetItemText(0, 4, _bstr_t(v)) ;

			v = (TCHAR*)(_bstr_t)m_Rsp->GetCollect("paymoney") ;
			m_hListCtrl->SetItemText(0, 5, _bstr_t(v)) ;

			v =(TCHAR*)(_bstr_t) m_Rsp->GetCollect("factmoney") ;
			m_hListCtrl->SetItemText(0, 6, _bstr_t(v)) ;

			v = (TCHAR*)(_bstr_t)m_Rsp->GetCollect("stockname") ;
			m_hListCtrl->SetItemText(0, 7, _bstr_t(v)) ;

			v = (TCHAR*)(_bstr_t)m_Rsp->GetCollect("merchandiseID") ;
			m_hListCtrl->SetItemText(0, 8, _bstr_t(v)) ;

			v =(TCHAR*)(_bstr_t) m_Rsp->GetCollect("unitPrice") ;
			m_hListCtrl->SetItemText(0, 9, _bstr_t(v)) ;

			v =(TCHAR*)(_bstr_t) m_Rsp->GetCollect("numbers") ;
			m_hListCtrl->SetItemText(0, 10, _bstr_t(v)) ;

			v =(TCHAR*)(_bstr_t) m_Rsp->GetCollect("paymoney") ;
			m_hListCtrl->SetItemText(0, 11, _bstr_t(v)) ;

			v = (TCHAR*)(_bstr_t)m_Rsp->GetCollect("intime") ;
			m_hListCtrl->SetItemText(0, 12, _bstr_t(v)) ;

			m_Rsp->MoveNext() ;
		}
	}
1234

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -