中南林業科技大學 《管理系統中計算機應用》 實踐報告 姓

　名:XXX

　 專

　業：

　人力資源管理

　 院 （系）:

　 中南林業科技大學成教學院

　實習時間：

　 2013 年 4 月 1８日

　 實習地點：

　XＸXXXＸXXＸX

　指導教師評語:

　成績: 簽名：

　年

　月

　日 撰寫及批改注意事項

　一、填寫信息 1、學生填寫信息齊全、字跡清晰、日期真實； ２、教師批改后得簽名與日期應完整; 3、報告中封面、圖、程序要求打?。ǚ饷媾c此頁要求正反雙面打印，教師評語要求手寫）. 二、實習報告得撰寫

　1、實習報告撰寫認真細致，數據計算正確、誤差分析準確、實驗結論 分析符合科學規律。

　2、實習報告有繪制得圖形、圖表時,要求

　(1)用電腦繪制;

　 (２）應在報告中注明圖號、表號. 三、批改實驗報告

　1、一律采用百分制;

　2、批改時應對錯分明,錯誤之處應有文字說明或指出錯誤得標記; ３、指導教師評語得內容：

　 （1）對本次認識實習完成情況得評語；

　 （2）對本次認識實習報告得評語； 目

　錄 １、

　軟件編譯理論及實踐教程實習內容 .................................. 4

?。病?/p>

　套接字編程6 ?

　2、1 ? 使用說明書6 ?

　2、２

　原理說明書 ................................................ 7

　2、3

　程序注釋7 ?

　3、 ? 連接數據庫 ........................................................ １9

　3、１

　使用說明書 ............................................... 19

　3、2 ? 原理說明書02 ?

　3、3

　程序注釋02 ?

?。?、 ? 實習總結、體會與收獲 ............................................. ２6

　(正 文 部 分) 1、軟件編譯理論及實踐教程實習內容 一: : 我得電腦磁盤分析 ：

　000０0００0０0

　管理節點１

　0０0000003F 0０00０00０３F

?。帽P（４８、8GB）

　00061ＡB827 000６１AB82７

　管理節點 2 00０61ＡB８66 000６1AB8６6

　 D 盤(73、４GＢ）

　00０Ｆ48CDＤA 000F48CDDＡ

　 分區間隙 ０00Ｆ48CE18 00０F48CＥ１８

　 管理節點 3 000Ｆ48ＣE19 000F4８CE1９

　 E 盤(73、4GＢ)

　001８76E38D

　二 、

　 P P ＩＮ G G 、E EXE 十六進制源碼分析 在文件存儲空 間中，piｎg、exe 十六 進制源碼分析如下: 2、 套 接字編程 2、1、使用 說明書：

　第一步:先打開服務器端（sｅrｖer、exe)、根據提示輸入端口號,需要輸入大于 50０１小于 65５3５得值，否則就就是用默認得５0０1 作為端口值 第二步:創建套接字并選擇協議. 第三步:打開客戶端(clieｎt、exe），根據提示，將客戶端（server、eｘｅ)所在得服務器得 IP 地址輸入進去. 第四步：輸入在服務器端(ｓerveｒ、exｅ）中建立得端口號值. 第五步：選擇與服務器端(ｓｅｒｖer、ｅxe）中一樣得協議 第六步：收發數據 00１876E38D

　分區間隙

　0０１87６E3CB 0０１８76E3CB

　管理節點 4

　001876E3CC 001876Ｅ3CC

　Ｆ盤（102、4ＧB）

　０02５422D6C1

　剩余扇區

　第七步：關閉連接. 2、２原理說明書 2、3 程序注釋 ／*＊**＊＊**＊＊*＊＊＊**＊*＊＊＊＊*******＊＊＊****＊＊＊***＊＊＊**＊＊＊***＊\ ＊ client、c - 簡單得 TCP/ＵDＰ 套接字客戶程序 ｗｉndoｗｓ環境 * \＊**＊*＊＊＊*＊＊＊＊＊＊＊＊＊＊＊*＊*＊＊＊＊＊＊＊*＊＊*＊＊＊＊＊*＊*＊＊＊＊****＊＊**／ ＃ｉｎｃｌｕdｅ ＜wｉｎsｏck2、h>//關于套接字得頭文件 ＃incｌude ＜stdlib、h＞ ＃iｎclude 〈ｓtｄio、h〉 #iｎcｌｕde <sｔring、h> ＃incｌude <conｉo、h> #pragmａ ｍent (lｉb，”ｗｓ2_32＂）//添加‘ws2_32’庫 int ｍａin（void)

　｛

　 ｕnsiｇｎed shｏrt pｏｒｔ = 50０1;／／ ?

　號口端?

?。閚t ｓｏckｅt＿tｙpe = SＯＣK_ＳTＲＥAM; /／缺省使用 TCP 連接

　 char Buffer[1２80］; //收發緩沖區

　 unｓigｎed ｉｎｔ addｒ; //IP 地址變量

　 int ｒetｖaｌ，i；// ?

　量變時臨?

　ｓtｒuct ｓockａｄdｒ_in serｖer, from； ／/套接字地址結構變量

　 ｓtｒuct hoｓteｎt ＊hp;

　// ? 構結息信機主?變量指針

　 WSAＤＡＴA wｓａData;

　//wｉndoｗs套接字信息

　 SＯCKET

　conｎ＿soｃkeｔ;/／ ?

　量變字接套? //先輸入客戶程序所需要得基本信息：服務器地址，端口號,套接字類型

　 priｎｔf("請輸入服務器地址：”）;

　scanf("％s＂, Buffeｒ）;

　 ；)":）

　0005＞ (號口端入輸請"（ftnirｐ?

　；)ｉ＆ ，＂d％”（fnacs? iｆ(i 〈 5000 |｜ i 〉 6553５)

　＼1００5 號口端省缺用,d％號口端得確正不"(ｆｔｎiｒp?n＂， i)；

?。錶sｅ

　?

　;i = trｏｐ? pｒiｎtf(＂請輸入套接字類型（ 1,TCＰ； 2, UDP )：＂);

?。骳anｆ(”%ｄ＂，&i)；

　 ）1 == i（fi? ＥRTS_ＫCOS 為定設／/；ＭAERＴS_KＣＯS = epyt＿tekcoｓ?AM

　 )2 == i（fi esle?

　sｏckｅt_ｔype = SOCK_DGRＡM;／/設定為 SOCK_ＤGRAM

　elsｅ

　;）ｉ ,"n\流據數 PCT 用使,d%入輸得確正不"(ftｎiｒｐ?／/

　棧議協化始初先要需，下境環 swｏｄniw 在?if （(rｅｔvａl = WSAStartup(0x202， ＆wsaDaｔａ））

　!= ０）

　//ＷSＡSｔartｕp 函數調用，用來初始／/soｃkeｔ

　｛

　 ｐrｉntf（＂WSAＳtaｒtup 失敗,錯誤號：％d\ｎ",rｅtvaｌ）;

　 WSAＣleａnup（）;/／當調用了ＷＳAＳｔaｒtｕｐ之后，就需要調用 WSAClｅanup 函數釋放內存

　 retｕrn —1;

　 }

　 //取得主機 IP 地址

　if （isalpha（Bｕffer［0］））

　//就是域名或命名地址,用首字母得就是否在 A-Z,或者 a—z 來判斷就是域名還就是ＩP 地址

　 hｐ ＝ geｔhｏstbｙnａｍe（Ｂuｆfer）；/／從一個主機數據庫中提取出主機信息

　 else

　 {

　 addr = ｉｎeｔ_aｄdr（Buffeｒ）；//就是點分地址

　 hp = gethostbyaddr(（chaｒ *)＆addr，4，AF_INET)；/／根據網絡地址,獲得主機信息,執行成功，就返回一個指向主機信息得結構

　 ｝

　 if (hp ＝= NＵＬL ）

　 {

　 prｉntf("不能解析地址［%s]: 錯誤號%ｄ\n＂， Bｕｆfer， WＳAＧetLasｔEｒrｏr（)）；//用于獲取錯誤信息

　 ＷSＡCｌeanup(）；

　exiｔ(１)；

　 ｝

　 /／ 拷貝 解析得信息到ｓockaｄdｒ_in 結構中

　 mｅmsｅt（＆server，0,sizeof(ｓeｒver))；//分配內存空間,由ｓerver 返回

　 ｍｅmcpy(＆（ｓervｅr、sin＿addr)，ｈp—＞h_addr,hp－〉h_leｎｇtｈ)；//信息得ｃoｐｙ

　 serveｒ、ｓiｎ＿family ＝ ｈp->h_adｄｒtype；/／組協議初始化

　 serveｒ、sin_port = hｔonｓ（pｏrｔ）；//端口號初始化 //

　字接套立建?

　conn_sｏckeｔ = sockeｔ(ＡF＿INEＴ,sockeｔ_ｔypｅ,0)；

　 if （coｎn_socｋet ＜0 ）

　 ｛

　printf(”ｓｏcket()失敗,錯誤號:%d\n"， WSAGeｔLasｔError())；

　 WSACleａnｕp（）;

　 rｅturn -１;

　 ｝

　//對于流式套接字,需要先建立連接 // 函等）(vｃｅr,)（dnｅｓ,）（tｃｅｎnoc 用使以可也實其?數在 wiｎdows 里面一樣實現數據報套接字功能

　 ）MAＲGＤ_KCOＳ =！

?。澹饄t_ｔekcos（fi? { ?

　 ;)eｍａn＿h〉—pｈ,"n＼s％ ：到接連在正＂(fｔｎiｒp? ）*rdｄakcｏs tcurｔs(，tekcos＿ｎnｏｃ(ｔcennoc( ｆi?&server,sizeof（server））

　== SOCＫET_ERROR)

　{ ? ? ＬteGASW，"n\d%:號誤錯，敗失)（tｃennoｃ"（ｆtnirp?astＥrroｒ（）)；

　cloｓｅsoｃkeｔ(coｎn＿ｓoｃket）；//如果創建失敗,就關閉連接套接字

　?

??；)（pｕｎaeｌCASW?

　? retｕrn －1;

?。?? ? }

　 wｈilｅ（１）

　 ｛ ?

?。玫揭l送得信息字符串

　 ｐｕｔs("\n 輸入送到服務器得信息："）；

　;)refｆuＢ（steg?

　循續繼,息信入輸有沒果如/／ )）reffuB（ｎelrts！(fｉ?環

　 ?

　;ｅuniｔnoc?／／

　息信絡網送發?

　)MＡRＧD_KCOＳ =！

?。錺ｙt＿teｋcos(fi?

?。?,refｆuB ,tekcos_ｎnoc(dnｅｓ = lａvｔｅr?trlen（Bufｆｅr)+1， 0）；// etｉｒｗ ＤSB 似類，pｃt 向面?（）

　?

　 esle?

　? rtｓ ，ｒeｆｆuB ，tekcos_nnoc（otdnｅs = ｌavter?ｌeｎ(Buffeｒ）+１, 0, //發送字符串得時候,須將字符串得結束符＼0 發送

?。?? ? ?

　,reｖreｓ&）＊rｄｄaｋcoｓ tcurts?sizeof(serveｒ)）;// ? ?

?。蠨Ｕ向面?

　if (reｔvaｌ == SOCKＥＴ_ＥＲROR)

?。?/p>

　 printf（”發送失敗,錯誤號: %d\n”， WＳAGｅtＬａｓtEｒｒor())；

　 break;

　 ｝

　?

　eｓle?

　 ?

　;)refｆｕB ,＂ｎ\s％:息信送發＂（fｔnｉrp?//

　息信絡網收接?

　;）morｆ(foezis ＝ i?

　if(soｃket_ｔyｐe ！= ＳＯＣK_ＤGRAM）

?。騟ｔvａl = ｒｅcv(conn_soｃket, Bufｆer， sizｅof(Bｕffer）， 0 )；//面向ｔｃp,類似 BＳD ｒead(）

　 esｌe?

　? ｅffｕB ,tｅkcos_nnｏｃ（ｍoｒｆvcｅr = lavｔｅr?ｒ， sizeof(Ｂuｆfer）, 0,

　? ? ? (

　;)ｉ& ,ｍｏrf&）*rddakcos tcuｒts?

　 ／/面向 UDＰ

　 ｉf （reｔｖal == SＯＣKET_ＥRROR）

　 ｛ ?

　printf("接收信息失敗，錯誤號：%ｄ\n＂，WSAGetＬastEｒror（）)；

　 brｅak；

　}

　 elｓe ｉｆ （retval == 0) // 對于面向連接得套接字,需要判斷對方就是否關閉連接

　{ ?

?。穑騣ｎtf（”服務器關閉連接＼n")；

　 break；

　 ｝

　?

　息信絡網到收接確正／/ ｅslｅ? ? ?

　,laｖｔeｒ ,”n＼ s％：息信節字 ｄ％ 到收＂（fｔnirp?Bｕｆfｅr）; // ?

　件條出退個一得序程?

?。ｉuq” ，rｅfｆuＢ（ｐｍcｉrts！(fi?

　? bｒｅａk；

　 } //

　字接套閉關?

　cloｓｅsocｋet(cｏnn＿ｓocket);

　WSACleanup(）；

　returｎ 0; ｝ /***＊＊＊*＊*＊＊*＊*＊**＊＊＊*＊＊*＊***＊**＊*＊＊＊*＊＊＊***＊*＊＊＊***＊**＊\ ＊ ｓerveｒ、ｃ － 簡單 ＴCP／ＵDP

　套接字服務器程序 wiｎdoｗs 環境 ＊ \*＊＊＊＊***＊*＊*＊**＊*＊*＊＊*＊＊***＊＊****＊＊**＊＊＊***＊＊＊＊**＊*＊＊＊*/ ＃incｌｕde <wｉnsock2、ｈ＞／／套接字頭文件 #includｅ 〈ｓtｄlib、h> ＃include <stdio、ｈ> #ｉnclude ＜strｉng、h〉 ＃iｎｃlｕde ＜ioｓtreaｍ、ｈ> #pｒagma menｔ（liｂ，"ｗs2＿32＂)//添加庫 iｎt mａin(void)

?。?/p>

　 unsｉgnｅｄ shｏrt ｐoｒt= 5０0１;

?。?端口號

　 iｎt sｏcket_type = SＯCＫ_ＤGRＡM; //缺省使用 TCＰ連接

　 char Buffｅｒ[1０24］；

　// ?

　區沖緩發收?

?。閚t rｅtｖａl, froｍleｎ， i， isｃonnｅｃted ＝ ０; //

　量變時臨?

　stｒｕct soｃｋaddr_in loｃal， from;// 結址地字接套?構變量

　 ＳOＣＫＥT listen＿sockeｔ， msgsock；／/ 變字接套?量

　 WSADAＴA wsａDaｔａ;

　? // 信字接套 swｏdｎiw?息

　//先輸入服務器程序所需要得基本信息:端口號,套接字類型

　prinｔf（＂請輸入端口號（ ＞5000 )："）；

　scanｆ（”%d”, ＆i)；

　)53５56 〉 i ｜｜ 000５ 〈 i(fi?

?。餽ｉntｆ（”不正確得端口號％d,用缺省端口號 500１\ｎ"，ｉ）;

　 esle?

?。穑飏t = i;

　 ;)＂：）

?。蠨U ，2 ;PCＴ,1 (型類字接套入輸請＂（fｔnirｐ? scaｎf（＂％d"， &i);

　if（ｉ =＝ 1）

　?

?。唬虯ＥＲTS＿KCOＳ = ｅpｙt_tekcoｓ?

?。? == ｉ（fi esle? ?

　;MＡＲＧＤ_KCＯＳ = epyt＿tekｃos? else

　;）i，"n\流據數 PCT 用使,d％入輸得確正不＂（fｔnirｐ?／／

　棧議協化始初先要需，下境環 swｏdniw 在?

　iｆ (（rｅtvａl = WSAＳｔartup（０x20２， &wsａDaｔａ）) ！= 0) //初始化套接字版本等信息

　 {

　 prinｔf（”WSAStaｒtuｐ 失敗,錯誤號：％d\ｎ＂， retval）;

　 WSACｌeanuｐ(）;//在創建失敗，或者程序結束,都要調用

　 rｅｔｕrn —1；

　 }

　//建立套接字

　 listｅn_sｏｃkｅt = ｓocket（AＦ_ＩNET， soｃｋｅｔ＿ｔype, 0);

　if (ｌisｔeｎ_sockｅｔ == INVALＩＤ_SＯCKET)

?。??

　printｆ("socket（）失敗，錯誤號:％d\n”， WＳＡＧetＬａｓtEｒrｏｒ（）);

　 WＳＡCleanｕp()；

　 ｒeｔurn -１;

　｝

　 /／ 拷貝 解析得信息到ｓoｃkaddr_ｉｎ結構中

　 local、siｎ_fａmilｙ = AF_INEＴ；

　 locａl、sin_adｄr、ｓ＿aｄｄr = ＩNADDR＿ANＹ；

　locaｌ、sｉn_poｒｔ = ｈtons(ｐｏｒt）； /／

　字接套到址地絡網定邦?

　if （biｎd(lｉsten_sｏckｅｔ，(strｕct sockaddr＊）＆local， sizｅof(lｏcal）

　) == SOＣKＥT_ERＲOR) /／綁定網絡地址

　｛

　 printf（”bind（）失敗,錯誤號:％ｄ＼n”, WSAＧｅtLastErrｏr（))；

　 ＷSAＣｌeanuｐ(）；

　 ｒeturn -１；

　 ｝

　//對于流式套接字,讓套接字處于監聽狀態,等待連接到來

　if (sｏcket_ｔype ?。?SOCK_ＤGRAM）

　 ｛

　 if (listeｎ(lｉsten_soｃｋet,5）

　== SOCKET_EＲRＯR）

　//監聽網絡

　 {

　 pｒiｎｔｆ("listeｎ（）失敗,錯誤號:%d\n"， WＳAＧetLasｔＥｒｒoｒ（))；

　 ＷSACｌeanup();

　 reｔurn —1；

　 ｝

　 }

　 prｉｎtf（"監聽端口:％d， 使用協議:％s\n", port, （ Ｔ" ？)MAＥRTS＿KCOS == eｐyt＿tｅkcos?CP"：

　”UDP”）;

　 while(１）

?。?

?。鎟omlen ＝sizeｏf（froｍ)；

　iｆ （socket_type ＝= SOCＫ_DＧＲAM ）

　 msgｓocｋ ＝ ｌiｓｔen＿ｓｏｃkeｔ;

　?

　)0 == ｄetcennｏcｓi （fｉ eslｅ? //{

　來到得接連個一待等,接連有沒果如,接連 PＣＴ于對?

　ｍsgsoｃk ＝ accept（ｌｉｓｔen＿sｏcｋet，（stｒｕct sockaｄdr＊）&ｆrom, ＆fromｌen）；

　 if （mｓgsｏck == ＩＮVALID＿ＳOCKＥT）

　 { ? ?

　pｒｉntｆ("aｃｃｅpｔ（）失敗,錯誤號：%ｄ＼ｎ＂,ＷSＡGｅtLastErｒor(）)；

　 ＷSACleａnup（)；

　 retｕｒn -1；

　 }

　?

　;1 = detcｅｎnｏcsi?

　pｒintf（"從％s 收到連接， 端口就是：%d\n”, inet_ｎtｏa(froｍ、sin_adｄｒ）， htons（from、ｓin＿port))；

　 ｝

　//

　息信絡網收接待等?

　iｆ (sｏｃket_ｔｙpe != SOＣＫ_ＤGRAM）

　 reｔval = recv（msｇｓock, Buffｅｒ， sｉzｅof （Bufｆer)， 0 ）； /／面向 tcp，類似 BSD ｒeａd（)

　 elsｅ

　 { ?

　rｅｔｖal = recvfｒom(msgｓocｋ， Bufｆｅr, sizeof (Ｂｕfｆeｒ), 0，

　?

　(struct sｏｃkaddｒ *）&frｏｍ， ＆fromlen);// ?

　ＰＤU 向面?

　pｒinｔf("從％ｓ收到數據報,端口就是:％d\ｎ”, iｎｅt_ntoａ(from、sｉn＿aｄdｒ）， htons（from、sin_poｒt));

?。?/p>

　//

　斷判果結?

　if （retｖal ＝= ＳＯCKET＿EＲROR)

　 { ? ?

　ｐrinｔf("recv（）失敗,錯誤號：%ｄ\n", WＳＡGｅｔLaｓｔErrｏr（)）；

　 cｌoseｓocket(ｍsgsocｋ)；

　 ｃoｎtinｕe；

　 }

　 else if （ｒｅtval ＝= 0)

　 { ?

?。穑騣ntf（”客戶端關閉連接\ｎ”);

　 cｌoｓeｓocket(mｓｇｓock);

　 ｃontinuｅ;

　 }

　 收接常正／/ esle? ｛ ?

　? ｖｔer ,＂n\ s%：據數得節字 ｄ% 到收”(ｆｔnirp?al, Bｕffｅr）;

　 ?

?。㎝AＲGD_KＣOS =! eｐyt_tekｃos（ fi?//｛ ? ? 操得接連閉關個一有”tixe"到收們我，接連 PCT 于對?作

　? ?

　 ））"ｔixｅ＂ ,refｆｕB(ｐmcirts?。╢i?

　 ｛ ? ?

　? ? ? 連次一下待等,接連 PCＴ閉關”(ｆtｎｉrp?接、、、\n”）；

　 ? cloｓesockｅｔ（msgｓｏck)；

　 ? ?

　 ；０ = deｔcennｏcsi?

　 ?

?。鉶ntｉnuｅ;

　 ?

?。?/p>

?。?? ?

　｝ /／ ?

　送回息信?

　pｒiｎtf（＂將同樣得信息回送給客戶端、、、＼n\n"）；

　;)”n＼：egassｅm ｅht tｕpni ｅsａelp”（fｔnｉrｐ?

　 ;)reffuB，”s％＂（ｆnacs?

　if （sｏｃket_type !＝ ＳOCK＿ＤGRAＭ)

　 retval = ｓenｄ(ｍｓgsocｋ， Buｆｆer, strlen（Bufｆer)+１, 0）； //面向ｔcp,類似 BSD write()

　 elｓｅ

　 reｔvaｌ ＝ ｓeｎｄｔo（msgｓoｃk， Ｂufｆer, strlen(Buffer）+１, 0，

　 （ ? ? ；)nelmorf ,mｏrf＆）＊ rdｄakcos tcuｒｔs?／／ ? ? ?

　PＤU 向面?

　if (rｅtｖaｌ == SＯＣKET_EＲROR）

　{

　pｒintf（"senｄ（）失敗,錯誤號：％ｄ＼n"， ＷSAGetLaｓtErroｒ（)）;

　 ｝

　//

　件條出退個一得序程?

?。閒(！stricmp（Bufｆｅｒ， ＂ｑuｉt"）)

　 ? bｒeak;

　 ｝

　 ＷSACleａnｕp（）；

　 ;０ nruｔｅr?} 3、連接數據庫 3、1 使用說明書 第一步：在開始菜單中找到 SＱＬ ＳERＶＥR 并打開

　第二步：建立一個新得數據庫。在 SQL SEＲVEＲ中建立一個名為ｓtｕdent 得數據庫

　第三步：在 student 庫下創建一個Ｓtu_Inｆｏ表,并在表中包含以下字段名：ｓnum,snaｍe，sｓex，saｇe，sｍaｊoｒ.輸入一些數據，進行測試。

　第四步：在安全性中設置密碼為 123、 第三步：編譯生成可執行得文件，點擊運行.根據提示框中得信息,輸入我們需要插入得數據.關閉程序。

　第四步：在次點擊運行，查瞧我們插入得數據就是否成功得插入. 3、2 原理說明 通過 ADＯ訪問數據庫得技術進行數據庫編程。我們需要在計算機上配置數據源。配置數據源得過程，就就是與讓數據庫得驅動程序來對數據庫進行操作，以便使我們再程序中,可以調用驅動程序來完成我們需要完成得工作。處理 ADO 訪問技術之外，還有 ODBC（開放式數據庫互聯)等。

　3、3 程序注釋 /*＊＊**＊*＊*＊＊*＊**＊*＊***＊＊＊＊＊*＊＊*＊＊*＊＊＊*＊***＊**＊＊＊＊＊*＊*****＊＊**＊＊＊***＊ 利用ＡDO 訪問 MS SQL２００0

　要求: 【1】輸出 Sｔｕ_Ｉnｆo 表內得每一條記錄 【2】添加一條新記錄 【３】刪除名字為”李立＂得記錄

　＊＊＊＊*＊*****＊*＊＊＊＊＊＊*＊＊******＊*＊****＊＊*＊*＊*＊***＊＊***＊*＊＊*＊＊***＊＊＊＊/ #imｐort ”ｃ：＼Pｒogram Filｅs\ｍon Fileｓ\Sysｔem\AＤＯ\ｍsado15、dll＂ \//導入動態鏈接庫,使我們可以使用 ADO 編程 no_ｎamespａce reｎame（＂ＥOF", ”ＥnｄOfＦiｌe") /／為了防止命名沖突，不使用命名空間 ＃iｎｃlude 〈iｏsｔｒeａｍ＞ //標準輸入輸出流 ＃inclｕde 〈iomanｉp＞ //foｒ sｅtｗ(）

　uｓｉｎｇ nａｍesｐace std；

　cｌass STU //定義學生類 ｛

　puｂliｃ：

　chａr ｓnｕm［10]； //學號

　cｈar sname[10］； //姓名

　 cｈar ssex[2］； //姓別

　 long sage; /／年齡

　 chａr sｍaｊor［２0］； ／/專業

　pｕｂｌｉｃ：

　SＴＵ(）｛｝

　 ~STU（)｛｝

　};

　int main()

　｛

　STＵ ｓｔudeｎt; ／/定義學生對象

　 ：:ＣｏInitialize(NULＬ）; // 初始化 OLE/庫環境 ,為訪問ADO 接口做準備

　_RecorｄｓｅtPtr ｍ＿ｐRecｏrｄsｅt（”ADＯDB、Recordsｅt”）; ／/建立記錄集

　_CoｎneｃtiｏnPtr m_pCｏnnection（”ADODB、Coｎｎection"）； //建立連接

　 ＿ｂstｒ_t bｓtrＳQＬ（”select * frｏm stu_iｎｆｏ”）； //查詢語句

　char ＊ qｕery＿cｍd = "DELETＥ FROＭ stu_ｉnfo ＷHEＲE ｓname = "李立""；

　 tｒy //異常處理

　｛

　 /／ 創建 Cｏnnection 對象

　 ｍ_pConnectiｏn、CreatｅIｎｓtａｎce（"ADODB、Ｃonneｃtion")；

　 // 設置連接字符串，必須就是 BSTR 型或者_ｂｓｔｒ_t 類型

　 _bｓtr_ｔ strＣonnｅｃt= "Providｅr=ＳQＬOLEDB;Seｒver＝（local）;Databasｅ=sｔudeｎt; ｕid=sa; ｐwd=1２3；”；

　 //若數據庫在網絡上則 Serveｒ為形如

　//用戶 sa 與密碼 12３只就是針對我得庫

　 m_ｐＣoｎｎectｉｏｎ－〉Opｅn（ｓｔrCoｎnecｔ,””，"”,ａdModeUnkｎｏwn)；

　 if(m_ｐCｏnnection==NULL)

　 cerｒ〈＜”Lｉnｄ datａ EＲROＲ!\n＂;

　 ／/ 創建記錄集對象

　 m＿pRecordｓeｔ、CreateInstanｃe（_＿uｕidof（Recｏrdset））;

　 // 取得表中得記錄

　 m_ｐReｃoｒdsｅt－＞Opｅn（bstrSＱＬ,ｍ＿pCｏｎｎeｃtion、GetＩｎｔerfａcｅＰtr（）,

　 adＯpenDynamic，adLｏckＯptiｍistｉc，adCmdTeｘｔ);

　 _variant_t ｖsnｕm,vｓnaｍe，vｓage,vssｅx，vsｍajor； /／對應庫中得 sｎｕm，snamｅ,sage，ｓsex,smajoｒ

　 coｕt 〈< "學號 姓名 年齡 姓別 專業”;

　 cout 〈< ＂\n——-—---－---——-——————--—－-－—－－—－－－——-——－——--—－—－－--—-——－-—--－—－--\n"；

　 wｈｉlｅ (！m＿pRecordseｔ—〉EndOfFiｌe）

　/／如果記錄集沒有到記錄得尾端

?。?/p>

　 ｖｓnｕm ＝ m_pReｃｏrdseｔ—>ＧｅｔCollect（_varｉanｔ_t（(long)0））;//這兒給字段編號與字段名都可以

?。鰏nａme = m＿ｐRｅcordset-＞GetCｏｌlｅcｔ（”sname”）；

　 vsagｅ = m_ｐRecｏrdset—>GetCｏlleｃｔ("sａgｅ＂);

　 vssex = m_pＲｅcｏrdset－＞GeｔＣollecｔ（”sseｘ");

　 ｖｓｍａjor = m＿ｐＲeｃｏrdset->GetＣoｌlecｔ("smａｊor"）;

　 if （vｓnｕm、vt ！= VＴ＿ＮULL&&vｓnａmｅ、vt != ＶT_NULL&&vsagｅ、vt != VT_NＵLL

　&＆vssex、vt ！= VT_NＵＬＬ＆＆vsmaｊor、vt ！= VT_NULL）//如果不為空

　{ ?

　 cｏｕt、ｓetｆ（ios：:left）; //設置左對齊

　 cout <〈 ｓetw（14）

　<〈 (char*)（_ｂstr＿t）ｖsｎum; ／/輸出學號

　 coｕt << sｅtw（14) <＜ （char＊）（_bｓtr_ｔ）vｓname; ／/輸出姓名

　 coｕt ＜＜ ｓetw（8) 〈< ｖｓagｅ、lVal； ／/輸出年齡

　 ｅssｖ)t_ｒtsｂ_()＊rahｃ（ 〈＜ )8（wtｅs 〈< tuoc?x； //輸出性別

　 cout ＜<setｗ(20) ＜< （cｈar*）(_ｂstr＿t）vsmajｏr; //輸出專業

　?

　齊對左消?。? ;)ｔfel：:soｉ（ｆtｅsｎｕ、ｔuoｃ? ?

　 ；ldne 〈< tuoc?

　} ?

?。韄pRecｏｒdset—>ＭoｖeNexｔ（); ///移到下一條記錄

　 ｝ ? —---———-———-—--——---－---——－n\" ＜〈 tuｏc?---——-－－————-—－－--－-－-—-———－--－-－－—－-\n＂; ／/輸入將要插入得信息

　;＂n＼息信生學得加添要您入輸請 n\＂ <〈 tuoｃ?

　 ;＂：號學" ＜< tｕｏｃ?

　 ；muns、ｔｎedｕts 〉〉 ｎｉc?

　 ;”：名姓 n\" 〈< tuoc?

　 ；emans、tnｅdｕｔs 〉〉 nic? cｏuｔ 〈〈 ＂\n 年齡:＂;

　 cin 〉> sｔuｄeｎｔ、sage；

　 ｃout <＜ "\n 姓別:";

　 ；xｅss、tnedｕts 〉＞ nic? cｏut 〈< "\n 專業：”；

　 cin >〉 studeｎt、smajor；

　 錄記條一第到動移// ;）(tsriＦevoM＞—tｅｓdroceRp_m?

　 錄記新加添／／/ ；）（wｅNddA>－tesｄｒｏceＲｐ_m? m_pRecordset－〉PutCｏlｌecｔ（＂sｎｕｍ",_ｖaｒiａnt_ｔ(studeｎt、snuｍ)）; /／將數據添加進去輸入庫

　s(ｔ_tnairav_,"ｅmａnｓ”(tcｅlｌoCtuP＞－ｔesdroceRp_m?ｔudeｎt、ｓｎａme））；

　 ａiraｖ_，”ｅgas”（tcｅlloCtuP＞—tesｄｒoｃeRｐ_ｍ?nt_t（stｕdent、sａｇe）)；

　 ｍ_pＲecordsｅt-〉PutＣollect（”sｓeｘ”,_ｖａrianｔ_ｔ(ｓｔｕｄent、sｓex))；

　 m＿ｐRecorｄset-〉PutＣolｌecｔ("smaｊor＂，_varｉａnt_t(sｔｕdenｔ、smaｊoｒ));

　 對,新更不果如,作操新更//;)（ｅtａｄpU>—tesｄｒoceRp_ｍ?數據庫得操作將沒有得到相應得操作

　 ｍ＿pConnｅction-〉Exｅcute(quｅry_cmd,ＮULL，1）; ／/用 Exeｃｕｔe 執行 sql 語句來刪除

　 集錄記閉關 ／/ ;)(esolC>-tesdrocｅRｐ＿m? }

　 //

　 常異捉捕? caｔch(__erｒor e）

　 {

　// 顯示錯誤信息

　 cerr 〈〈 ”＼ｎERＲOR：” 〈〈 （ｃhａr＊）e、Desｃｒiｐtiｏｎ（);//拋出異常

　} ? if(m_pＣｏnｎｅcｔioｎ－>State）

　 ；)（esｏlC>-noｉtcｅnnoCp_ｍ? ::ＣoUｎinitialize（）;

　 ；０ ｎruteｒ?} 4、實習總結、體會與收獲

　通過這些天老師給我們講授實習課,我知道得我們專業得實用性，以及在軟件工程上我們應該怎么學,學些什么，光靠課堂上我們學習得東西十分有限,要充分利用課余時間，利用圖書館與互聯網。學習這個專業,要求我們要深入進去,不能只學會些皮毛，要不斷跟進時代得步伐，不斷學習新得知識，開拓視野，才能在這個專業上有更好得作為,使我們走得更遠，這門課程得學習使我受益匪淺,為以后得學習打下了基礎，激發了我得學習興趣,使我明確了自己得專業方向。

推薦訪問： 管理系統 計算機應用 實踐