Question

求编程高手帮忙编写一个小软件啊！！！急求！！要求：通过输入病症，得出病的名字 并在旁边有药方

病症、病名、药方先用其他符号代替，我自己在代码中填上去，要求不用很精密，只要有那样一个功能就行。。。。万分感谢编程大侠啊！！！！

Answer 1

其实你这问题本身就有问题，你都不说明要采用啥技术，要不要数据库，以下是采用直接操作ADO数据库的方式进行操作。即使是实现你这样的商业软件，一般也会采用ADO数据库技术。简单就是下面了了，要商业软件的话跟别人联系定做吧，阿门。。。
新建"Access数据库名.mdb",在其中新建表”Access数据库中表名“，字段为"病症”，“病名”，“药方”
并添加记录，将上述实际名替换代码中相应的文字，并见数据库方在程序同路径下。
新建MFC对话框应用程序，添加三个edit控件，分别给控件添加CSring控件变量：CSring病症，CSring病名，CSring药方；取代代码中相应位置；
添加OK按钮的消息出来函数，其他控件的消息出来函数也可以，添加代码
如果不想定义AdodbConnect，AdodbDisconnect两个友元函数，可自行整合到对话框的类中
//======================
_ConnectionPtr AdodbConnect()
{
//AfxEnableControlContainer();
::CoInitialize(NULL);//::OleInitialize(NULL);//AfxOleInit();
_ConnectionPtr m_pC=NULL;
m_pC.CreateInstance(__uuidof(Connection));
try
{
m_pC->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Access数据库名.mdb","","",adModeUnknown);
}
catch (_com_error e)
{
AfxMessageBox("连接失败,请确认数据库是否在当前路径!");
m_pC=NULL;
}
return m_pC;
}
void AdodbDisconnect(_ConnectionPtr m_pC)
{
try
{
::CoUninitialize();//::OleUninitialize();
if(m_pC!=NULL)
{
m_pC->Close();//disconnect
m_pC=NULL;//
}
}
catch (_com_error* e)
{
AfxMessageBox(e->ErrorMessage());
return;
}
}
void CDlgtry::OnOK()
{

m_pC=AdodbConnect();//这两句可以考虑放在对话框初始化函数里
m_pR.CreateInstance(__uuidof(Recordset));//这两句可以考虑放在对话框初始化函数里
//可以考虑在Destroy消息处理里调用AdodbDisconnect释放数据库物理连接
UpdateData(TRUE);
try
{
m_strSQL="SELECT 病名,药方 FROM Access数据库中表名 WHERE 病症=‘"+CString类型的病症+”‘;";
m_pR->Open(_bstr_t(m_strSQL),m_pC.GetInterfacePtr(),adOpenDynamic,adLockOptimistic,adCmdText);
if (m_pR->adoBOF||m_pR->adoEOF)
{
AfxMessageBox("找不到对应的记录!");
return FALSE;
}
CString strlockdate;
CString类型病名=(LPCTSTR)(_bstr_t)m_pR->GetCollect("病名");
CString类型药方 =(LPCTSTR)(_bstr_t)m_pR->GetCollect("药方 ");
m_pR->Close();
UpdateData(FALSE);
}
catch(_com_error* e){AfxMessageBox(e->ErrorMessage());}
}

Answer 2

简单