圖書借閱數(shù)據(jù)挖掘課程設(shè)計(jì)

河南科技大學(xué)課程設(shè)計(jì)說明書課程名稱＿＿軟件項(xiàng)目綜合實(shí)踐＿＿題目＿＿圖書借閱數(shù)據(jù)挖掘系統(tǒng)＿＿院系＿電子信息工程學(xué)院計(jì)算機(jī)系＿班級(jí)＿＿＿＿計(jì)科***＿＿＿＿學(xué)生姓名＿＿＿＿***＿＿＿＿＿指導(dǎo)教師＿孫士保、白秀玲、趙海霞＿日期＿2012.9.3~2012.9.14＿軟件項(xiàng)目綜合實(shí)踐任務(wù)書軟件項(xiàng)目綜合實(shí)踐題目圖書借閱數(shù)據(jù)挖掘系統(tǒng)姓名***學(xué)號(hào)*****專業(yè)班級(jí)計(jì)算機(jī)09*組長***同組成員*****指導(dǎo)教師孫士保白秀玲趙海霞軟件項(xiàng)目綜合實(shí)踐目的通過綜合實(shí)踐，使學(xué)生鞏固數(shù)據(jù)庫技術(shù)、數(shù)據(jù)結(jié)構(gòu)、數(shù)據(jù)挖掘等知識(shí)，將理論與實(shí)際相結(jié)合，完成一個(gè)小型數(shù)據(jù)挖掘系統(tǒng)的設(shè)計(jì)與實(shí)現(xiàn)。在此基礎(chǔ)上強(qiáng)化學(xué)生的實(shí)踐意識(shí)，提高其實(shí)際動(dòng)手能力和創(chuàng)新能力。軟件項(xiàng)目綜合實(shí)踐環(huán)境硬件：裝有windows操作系統(tǒng)的計(jì)算機(jī)軟件：SQLServer2000C++Builder軟件項(xiàng)目綜合實(shí)踐任務(wù)和要求任務(wù)：1.進(jìn)行圖書借閱數(shù)據(jù)挖掘系統(tǒng)的數(shù)據(jù)管理、數(shù)據(jù)采集、數(shù)據(jù)預(yù)處理、數(shù)據(jù)挖掘、解釋評(píng)估等步驟的設(shè)計(jì)；2.實(shí)現(xiàn)圖書借閱數(shù)據(jù)挖掘系統(tǒng)的主界面、圖書借閱數(shù)據(jù)挖掘模塊的功能。要求：1.功能滿足需求說明、界面友好、保證一定性能要求。2.撰寫出符合要求的軟件項(xiàng)目綜合實(shí)踐報(bào)告。參考文獻(xiàn)毛國君等,數(shù)據(jù)挖掘原理與算法.北京:·清華大學(xué)出版社王珊等數(shù)據(jù)庫系統(tǒng)概論高等教育出版社時(shí)間進(jìn)度安排序號(hào)起止日期工作內(nèi)容120講授數(shù)據(jù)挖掘概念及其算法，學(xué)生分組220數(shù)據(jù)預(yù)處理，形成挖掘處理所需要的數(shù)據(jù)格式32012年9月5日-算法設(shè)計(jì)420界面設(shè)計(jì):參數(shù)設(shè)置，閾值設(shè)定；結(jié)果顯示520程序組裝調(diào)試62012年9月12-13日講授文檔撰寫方法，形成文檔內(nèi)容及格式撰寫要求，撰寫軟件綜合實(shí)踐報(bào)告，檢查程序720檢查程序，上交軟件綜合實(shí)踐報(bào)告指導(dǎo)教師簽字：年月日?qǐng)D書借閱數(shù)據(jù)挖掘系統(tǒng)致謝在這篇論文即將完成之時(shí)，我要在這里特別的感謝一下在我的畢業(yè)設(shè)計(jì)過程中幫助和關(guān)心過我的老師和同學(xué)。在畢業(yè)設(shè)計(jì)的整個(gè)實(shí)驗(yàn)過程中，孫士保、白秀玲、趙海霞三位老師給了我很多的關(guān)心和幫助。特別是孫士保老師，他嚴(yán)謹(jǐn)?shù)闹螌W(xué)態(tài)度、親和的工作作風(fēng)以及深厚的科研知識(shí)，都給我留下了深刻的印象。從孫老師身上，我學(xué)到了很多東西，不僅是學(xué)術(shù)知識(shí)，還有工作方式、治學(xué)態(tài)度等。最后，再一次向所有關(guān)心過我、幫助過我的老師和同學(xué)送上最深的謝意和最真摯的祝福！參考文獻(xiàn)毛國君等,數(shù)據(jù)挖掘原理與算法.北京:清華大學(xué)出版社王珊等數(shù)據(jù)庫系統(tǒng)概論高等教育出版社附錄個(gè)人設(shè)計(jì)界面程序代碼圖書借閱系統(tǒng)主界面代碼：//圖書借閱系統(tǒng)主界面#include<vcl.h>#pragmahdrstop#include"Unit1.h"#include"Unit3.h"#include"Unit2.h"#include"Unit4.h"http://#pragmapackage(smart_init)#pragmaresource"*.dfm"TForm1*Form1;//__fastcallTForm1::TForm1(TComponent*Owner):TForm(Owner){}//void__fastcallTForm1::Button1Click(TObject*Sender){Form3->Show();}//void__fastcallTForm1::Button2Click(TObject*Sender){Form2->Show();}//void__fastcallTForm1::Button4Click(TObject*Sender){Form1->Close();}//void__fastcallTForm1::Button3Click(TObject*Sender){Form4->Show();}//借閱信息數(shù)據(jù)挖掘代碼://借閱信息數(shù)據(jù)挖掘代碼#include<vcl.h>#pragmahdrstop#include"Unit3.h"#include"Unit7.h"http://#pragmapackage(smart_init)#pragmaresource"*.dfm"TForm3*Form3;inti=0,a=0;boolt1=false,t2=false,t3=false;//__fastcallTForm3::TForm3(TComponent*Owner):TForm(Owner){}//void__fastcallTForm3::creat(){i=0;a=0;TADOQuery*query=newTADOQuery(NULL);query->Connection=Form3->ADOConnection1;query->SQL->Clear();query->SQL->Add("selectreaderid,bookid,booknamefromborrow");query->ExecSQL();query->Open();AnsiStringstr1,str2,str3,str4;ListBox1->Items->Add("readeridbookidbookname");while(!query->Eof){str1=query->FieldByName("readerid")->AsString;str2=query->FieldByName("bookid")->AsString;str3=query->FieldByName("bookname")->AsString;str4=str1+""+str2+""+str3;ListBox1->Items->Add(str4);query->MoveBy(1);i++;}ListBox1->Items->Add("================================");ListBox1->Items->Add("");query->SQL->Clear();query->SQL->Add("selectcount(bookid)counttfrombook");query->ExecSQL();query->Open();if(!query->Eof)a=StrToInt(query->FieldByName("countt")->AsString);deletequery;}void__fastcallTForm3::fun1(){TADOQuery*query=newTADOQuery(NULL);query->Connection=Form3->ADOConnection1;intj=0,m,n;int*num=newint[a];j=Edit1->Text*i;AnsiStringstr1="",str2="";str1="候選集1";str2="頻選集1";ListBox1->Items->Add(str1);for(m=1;m<=a;m++){str1="";query->SQL->Clear();query->SQL->Add("selectcount(readerid)counttfromborrowwherebookid='"+IntToStr(m)+"'");query->ExecSQL();query->Open();if(!query->Eof){num[m-1]=StrToInt(query->FieldByName("countt")->AsString);if(num[m-1]!=0){str1+=IntToStr(m)+""+query->FieldByName("countt")->AsString;ListBox1->Items->Add(str1);}}}ListBox1->Items->Add(str2);for(m=0;m<a;m++)if(num[m]>=j){t1=true;str2="";str2+=IntToStr(m+1)+""+IntToStr(num[m]);ListBox1->Items->Add(str2);}ListBox1->Items->Add("");ListBox1->Items->Add("");delete[]num;deletequery;}void__fastcallTForm3::fun2(){TADOQuery*query=newTADOQuery(NULL);query->Connection=Form3->ADOConnection1;intj=0,m,n;int**num1=newint*[a];for(intb=0;b<a;b++)num1[b]=newint[a];j=Edit1->Text*i;AnsiStringstr1="",str2="";str1="候選集2";str2="頻選集2";ListBox1->Items->Add(str1);for(m=1;m<=a;m++)for(n=m+1;n<=a;n++){str1="";query->SQL->Clear();query->SQL->Add("selectcount(readerid)counttfromborrowwherebookid='"+IntToStr(m)+"'andreaderidin(selectreaderidfromborrowwherebookid='"+IntToStr(n)+"')");query->ExecSQL();query->Open();if(!query->Eof){num1[m-1][n-1]=StrToInt(query->FieldByName("countt")->AsString);if(num1[m-1][n-1]!=0){str1+=IntToStr(m)+""+IntToStr(n)+""+query->FieldByName("countt")->AsString;ListBox1->Items->Add(str1);}}}ListBox1->Items->Add(str2);for(m=0;m<a;m++)for(n=m+1;n<a;n++)if(num1[m][n]>=j){t2=true;str2="";str2+=IntToStr(m+1)+""+IntToStr(n+1)+""+IntToStr(num1[m][n]);ListBox1->Items->Add(str2);}ListBox1->Items->Add("");ListBox1->Items->Add("");delete[]num1;deletequery;}void__fastcallTForm3::fun3(){TADOQuery*query=newTADOQuery(NULL);query->Connection=Form3->ADOConnection1;intj=0,m,n,h,b,c;int***num3=newint**[a];for(b=0;b<a;b++)num3[b]=newint*[a];for(b=0;b<a;b++)for(c=0;c<a;c++)num3[b][c]=newint[a];j=Edit1->Text*i;AnsiStringstr1="",str2="";str1="候選集3";str2="頻選集3";ListBox1->Items->Add(str1);for(m=1;m<=a;m++)for(n=m+1;n<=a;n++)for(h=n+1;h<=a;h++){str1="";query->SQL->Clear();query->SQL->Add("selectcount(readerid)counttfromborrowwherebookid='"+IntToStr(m)+"'andreaderidin(selectreaderidfromborrowwherebookid='"+IntToStr(n)+"'andreaderidin(selectreaderidfromborrowwherebookid='"+IntToStr(h)+"'))");query->ExecSQL();query->Open();if(!query->Eof){num3[m-1][n-1][h-1]=StrToInt(query->FieldByName("countt")->AsString);if(num3[m-1][n-1][h-1]!=0){str1+=IntToStr(m)+""+IntToStr(n)+""+IntToStr(h)+""+query->FieldByName("countt")->AsString;ListBox1->Items->Add(str1);}}}ListBox1->Items->Add(str2);for(m=0;m<a;m++)for(n=m+1;n<a;n++)for(h=n+1;h<a;h++)if(num3[m][n][h]>=j){t3=true;str2="";str2+=IntToStr(m+1)+""+IntToStr(n+1)+""+IntToStr(h+1)+""+IntToStr(num3[m][n][h]);ListBox1->Items->Add(str2);}ListBox1->Items->Add("");ListBox1->Items->Add("");delete[]num3;deletequery;}void__fastcallTForm3::guanlian(){TADOQuery*query=newTADOQuery(NULL);query->Connection=Form3->ADOConnection1;intj=0,m,n,h,f,g;floatk;j=Edit1->Text*i;k=StrToFloat(Edit2->Text);AnsiStringstr1="",str2="";str1="關(guān)聯(lián)規(guī)則";ListBox1->Items->Add(str1);for(m=1;m<=a;m++){f=0;query->SQL->Clear();query->SQL->Add("selectcount(readerid)counttfromborrowwherebookid='"+IntToStr(m)+"'");query->ExecSQL();query->Open();f=StrToInt(query->FieldByName("countt")->AsString);if(f!=0){for(n=1;n<=a;n++){if(m!=n){g=0;query->SQL->Clear();query->SQL->Add("selectcount(readerid)counttfromborrowwherebookid='"+IntToStr(m)+"'andreaderidin(selectreaderidfromborrowwherebookid='"+IntToStr(n)+"')");query->ExecSQL();query->Open();g=StrToInt(query->FieldByName("countt")->AsString);if(100*g/f>=(k*100)){str2="";query->SQL->Clear();query->SQL->Add("selectbooknamefrombookwherebookid='"+IntToStr(m)+"'");query->ExecSQL();query->Open();str2+=query->FieldByName("bookname")->AsString;query->SQL->Clear();query->SQL->Add("selectbooknamefrombookwherebookid='"+IntToStr(n)+"'");query->ExecSQL();query->Open();str2+="=========>"+query->FieldByName("bookname")->AsString+""+FloatToStr(100*g/f)+"%";ListBox1->Items->Add(str2);}}}}}deletequery;}void__fastcallTForm3::FormCreate(TObject*Sender){creat();}//void__fastcallTForm3::Button1Click(TObject*Sender){if(Edit1->Text<1&&Edit2->Text<1&&Edit3->Text!=""){intl=StrToInt(Edit3->Text);if(l<=3){if(l==1){ListBox1->Clear();creat();fun1();}elseif(l==2){ListBox1->Clear();creat();fun1();if(t1==true)fun2();}elseif(l==3){ListBox1->Clear();creat();fun1();if(t1==true){fun2();if(t2==true)fun3();}}guanlian();}elseShowMessage("挖掘深度請(qǐng)輸入0到3之間的整數(shù)！");}elseShowMessage("請(qǐng)輸入0到1之間的數(shù)！");}//void__fastcallTForm3::Button2Click(TObject*Sender){Form3->Close();}//void__fastcallTForm3::Button3Click(TObject*Sender){Form7->Show();}//借閱信息查詢界面代碼://借閱信息查詢界面代碼#include<vcl.h>#pragmahdrstop#include"Unit7.h"http://#pragmapackage(smart_init)#pragmaresource"*.dfm"TFo