數(shù)據(jù)庫課程設(shè)計(jì)-旅行社管理信息系統(tǒng)方案

.../...目錄第一章系統(tǒng)概述11.1系統(tǒng)開發(fā)背景與意義1系統(tǒng)開發(fā)背景1系統(tǒng)開發(fā)意義1第二章系統(tǒng)需求分析32.1系統(tǒng)功能要求32.2.需求分析概述32.3系統(tǒng)層次分析42.4系統(tǒng)數(shù)據(jù)流圖52.5數(shù)據(jù)字典7第三章系統(tǒng)總體設(shè)計(jì)123.1系統(tǒng)總體設(shè)計(jì)目標(biāo)123.2概念模型123.2.1概念模式〔E-R123.3數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)16第四章數(shù)據(jù)庫系統(tǒng)實(shí)現(xiàn)204.1系統(tǒng)實(shí)現(xiàn)工具簡介204.1.1開發(fā)語言VisualBasic6．020SQLServer2000簡介224.2人事管理系統(tǒng)數(shù)據(jù)庫實(shí)現(xiàn)23結(jié)束語46參考文獻(xiàn)47......系統(tǒng)概述1.1系統(tǒng)開發(fā)背景與意義系統(tǒng)開發(fā)背景天津中國青年旅行社創(chuàng)建于1986年,隸屬于共青團(tuán)天津市委員會,為中國青旅集團(tuán)天津公司,是經(jīng)國家旅游局批準(zhǔn),具有國有獨(dú)資性質(zhì)的國際旅行社,公司已逐步發(fā)展成為一家專業(yè)的旅游服務(wù)機(jī)構(gòu),以自身良好的社會形象,完善的經(jīng)營網(wǎng)絡(luò),先進(jìn)的服務(wù)手段,豐富的旅游產(chǎn)品,廣泛的客戶基礎(chǔ),完善并建成了現(xiàn)代化程度較高的旅行社。公司堅(jiān)持質(zhì)量為本,效益優(yōu)先的經(jīng)營理念,將自身已有的國內(nèi)旅游服務(wù)網(wǎng)絡(luò)與豐富的旅游資源、先進(jìn)的服務(wù)理念及良好的服務(wù)質(zhì)量緊密結(jié)合,專業(yè)從事為企業(yè)及個人提供高品質(zhì)的全球旅游資訊及出行服務(wù)。業(yè)務(wù)范圍包括經(jīng)營國內(nèi)旅游業(yè)務(wù)為主,組織團(tuán)隊(duì)、散客旅游,安排商務(wù)、會務(wù)、國內(nèi)外考察活動,代辦國內(nèi)、國際航班機(jī)票、火車票、輪船票,商務(wù)租車、會議安排、度假產(chǎn)品的預(yù)訂及自助旅行等全方位的服務(wù)。天津青旅的奮斗目標(biāo)：力創(chuàng)中國旅游行業(yè)"服務(wù)一流、實(shí)力一流、人才一流、業(yè)務(wù)一流"的業(yè)績。由于旅游線路的增加和參團(tuán)人員的增多和復(fù)雜性,舊的管理系統(tǒng)的處理能力和管理方法很難滿足現(xiàn)代化企業(yè)管理的需求,舊系統(tǒng)已成為實(shí)現(xiàn)企業(yè)戰(zhàn)略目標(biāo)的主要障礙。但是公司的內(nèi)部管理系統(tǒng)還不完善,還在進(jìn)行以人工統(tǒng)計(jì)和分配為主的工作,不但花費(fèi)了人工,而且由于數(shù)據(jù)復(fù)雜往往難以避免會出錯,給企業(yè)造成一定的負(fù)面影響,降低了企業(yè)的工作效率。因此,在這個以計(jì)算機(jī)網(wǎng)絡(luò)技術(shù)為主流的時代,公司有必要開發(fā)一個完善的內(nèi)部管理系統(tǒng)。系統(tǒng)開發(fā)意義我國的旅行社目前正處于一個科學(xué)技術(shù)日新月異飛速向前發(fā)展的環(huán)境中。信息技術(shù)和通信技術(shù)以令人目不暇接的速度發(fā)展,尤其是互聯(lián)網(wǎng)絡(luò)的廣泛流行,使得各種服務(wù)信息已近乎透明,且個性突出的游客們已不再滿足于死板的標(biāo)準(zhǔn)化的旅游項(xiàng)目,要求量身定做,旅游行業(yè)內(nèi)的競爭日趨激烈。這就要求旅行社必須采取現(xiàn)代化的管理手段,利用計(jì)算機(jī)的發(fā)展成果結(jié)合旅行社的業(yè)務(wù)特點(diǎn),建立高效的旅行社管理系統(tǒng),以迅速、準(zhǔn)確地捕捉客戶要求,并加以高效回應(yīng),使游客滿意,才能擺脫被擠出的危險(xiǎn)并在業(yè)內(nèi)脫穎而出。

旅行社管理信息系統(tǒng)是一個典型的多表操作系統(tǒng),因?yàn)橐粋€旅行社涉及到導(dǎo)游的管理與查詢,導(dǎo)游與景點(diǎn)的分布,景點(diǎn)與游客的分布與查詢,導(dǎo)游、景點(diǎn)和游客三者之間的分布與查詢,還涉及到景點(diǎn)的各種管理、導(dǎo)游的各種管理和游客的各種管理等等,因此,它是一個比較復(fù)雜的管理系統(tǒng)。第二章系統(tǒng)需求分析2.1系統(tǒng)功能需求旅游管理系統(tǒng)由團(tuán)員信息表、線路信息表、團(tuán)隊(duì)信息表、游客團(tuán)隊(duì)信息表、密碼信息表五個信息表組成,主要來實(shí)現(xiàn)旅游團(tuán)隊(duì)、團(tuán)隊(duì)團(tuán)員及旅游路線相關(guān)信息的輸入、查詢和維護(hù),以及旅游團(tuán)隊(duì)和團(tuán)員信息的報(bào)表及輸出、旅游路線排行榜的發(fā)布和密碼的更改等各項(xiàng)功能。2.2需求分析概述人類社會在經(jīng)歷過農(nóng)業(yè)革命和工業(yè)革命之后,如今已經(jīng)如信息革命階段。信息革命的核心是當(dāng)今先進(jìn)生產(chǎn)力的代表——信息技術(shù)。信息技術(shù)本身是一個龐大的擴(kuò)展的高新技術(shù)群,包括電腦技術(shù)、電信技術(shù)、廣播電視技術(shù)、網(wǎng)絡(luò)技術(shù)、多媒體技術(shù)、數(shù)據(jù)庫技術(shù)等等。信息技術(shù)的發(fā)展對人類社會的方方面面都產(chǎn)生了不同程度的影響,包括旅游業(yè)。同時信息技術(shù)也推動了旅游業(yè)的第二次革命,它對傳統(tǒng)的旅游管理、旅游服務(wù)、旅游經(jīng)營和銷售手段等產(chǎn)生強(qiáng)大沖擊。隨著中國加入WTO,旅游行業(yè)競爭變得日益地激烈,旅行社作為一個旅游企業(yè),在整個旅游中起著非常重要的作用。旅行社對信息化的要求也變得越來越高。旅行社信息化不僅是適應(yīng)信息時代快速變化的必然選擇,同時也可以增加目前旅行社管理中的科技含量。通過對本地多家旅行社進(jìn)行信息化實(shí)施情況的調(diào)研,從實(shí)際情況中我們發(fā)現(xiàn)旅行社一般都配有電腦、電話、傳真、計(jì)算機(jī)網(wǎng)絡(luò)等信息化設(shè)備,工作人員使用電腦也比較熟練,其中有些旅行社有自己的網(wǎng)站,通過Internet宣傳自己。但是旅行社信息化發(fā)展滯后于旅游業(yè)的整體發(fā)展、重硬件輕軟件,幾乎沒有自己的管理信息系統(tǒng)。我們發(fā)現(xiàn)旅行社日常業(yè)務(wù)工作比較復(fù)雜,日常業(yè)務(wù)的操作基本上完全依靠手工勞動,員工工作強(qiáng)度較大,尤其在五一、十一黃金周期間。在目前的旅行社經(jīng)營活動中,業(yè)務(wù)操作不夠成熟規(guī)范,對游客和員工的信息資料管理也不夠系統(tǒng)化和規(guī)范化。如何降低人力成本,跟上全球信息化的腳步,實(shí)現(xiàn)"無紙化’辦公,越來越成為旅游企業(yè)要解決的問題。建立一個良好的管理信息系統(tǒng)相當(dāng)必要。通過調(diào)研,我們發(fā)現(xiàn)目前為使用管理信息系統(tǒng)的旅行社業(yè)務(wù)操作中存在以下問題：〔1游客報(bào)名的基本信息以及銷售的旅游線路等信息均以文字形式記錄于紙上,于每天晚上呈報(bào)計(jì)調(diào)中心匯總；各種憑證為紙質(zhì),管理查詢均不方便?！?旅游線路、車票等旅游產(chǎn)品的基本信息更新速度慢,但是旅游市場上旅游產(chǎn)品的價格改變非?？?基本上一天一變,現(xiàn)無法做到及時更新?！?由于旅行社有多個營業(yè)點(diǎn)在同時銷售旅游產(chǎn)品,對某些需實(shí)時掌握的信息更困難。如剩余的座位號、當(dāng)前報(bào)名人數(shù)等等,更新的主要方式是通過電話和MSN以及傳真等設(shè)備。前臺銷售的員工接到游客的報(bào)名請求時就通過電話與計(jì)調(diào)部門聯(lián)系,看是否還可以安排,如有空座位則從MSN中獲得座位號等相關(guān)信息,報(bào)名流程結(jié)束要及時通知計(jì)調(diào)部門修改當(dāng)前信息,以便其他營業(yè)點(diǎn)獲得最新的信息。操作比較復(fù)雜,加大了計(jì)調(diào)部員工和前臺銷售員的工作量。此外,還有可能忙中出錯,導(dǎo)致信息不一致。通過建立旅行社管理信息系統(tǒng)可以解決以上這些問題。旅行社管理信息系統(tǒng)可以簡化員工的手工操作,規(guī)范操作流程,提高工作效率,降低勞動強(qiáng)度；可以實(shí)現(xiàn)信息的實(shí)時更新能方便游客接受更好,更快的服務(wù)；可以方便各部門信息的交流,改變傳統(tǒng)的文件滿天飛的局面；此外管理人員也可以通過該系統(tǒng)查詢當(dāng)前經(jīng)營情況以及各種電子單證,隨時掌握企業(yè)經(jīng)營動態(tài),從而更好地進(jìn)行管理。2.3系統(tǒng)層次分析旅行社管理信息系統(tǒng)旅行社管理信息系統(tǒng)旅游團(tuán)隊(duì)管理團(tuán)員管理線路管理團(tuán)隊(duì)信息的報(bào)表及輸出團(tuán)隊(duì)信息的維護(hù)團(tuán)隊(duì)信息的查詢團(tuán)員信息的輸入團(tuán)隊(duì)信息的輸入團(tuán)員信息的維護(hù) 團(tuán)員信息的查詢團(tuán)員信息的報(bào)表及輸出線路信息的輸入線路信息的維護(hù)線路信息的查詢線路信息的發(fā)布表2-1系統(tǒng)層次分析密碼管理密碼信息的存儲密碼信息的更改2.4系統(tǒng)數(shù)據(jù)流圖操作員操作員登錄密碼驗(yàn)證處理旅游團(tuán)隊(duì)信息團(tuán)員信息線路信息圖2-2系統(tǒng)總數(shù)據(jù)流圖財(cái)務(wù)科P0以下為本系統(tǒng)數(shù)據(jù)字典的旅游管理系統(tǒng)財(cái)務(wù)科P0以下為本系統(tǒng)數(shù)據(jù)字典的旅游管理系統(tǒng)銷售統(tǒng)計(jì)表游客合同游客計(jì)調(diào)部門排團(tuán)計(jì)劃表計(jì)調(diào)部門圖圖2-3系統(tǒng)業(yè)務(wù)流程圖財(cái)務(wù)科財(cái)務(wù)科 D1團(tuán)員信息表D2線路信息表 F2銷售統(tǒng)計(jì)表P2排團(tuán)處理P1P2排團(tuán)處理P1團(tuán)員信息處理團(tuán)員 F1合同團(tuán)員 D3團(tuán)隊(duì)信息表計(jì)調(diào)部門 F3排團(tuán)計(jì)劃表 F4排團(tuán)計(jì)調(diào)部門計(jì)劃表圖圖2-4系統(tǒng)業(yè)務(wù)流程圖2.5數(shù)據(jù)字典1..以下為本系統(tǒng)數(shù)據(jù)字典的數(shù)據(jù)項(xiàng)部分:1數(shù)據(jù)項(xiàng)編號：DNum2數(shù)據(jù)項(xiàng)編號：XNum數(shù)據(jù)項(xiàng)名稱：導(dǎo)游編號數(shù)據(jù)項(xiàng)名稱：線路編號別名：導(dǎo)游編號別名：線路編號簡述：某導(dǎo)游的代碼簡述：某旅游線路的代碼類別及寬度：字符型,5位類別及寬度：字符型,4位取值范圍：G0001-G9999取值范圍：I001-I999,A001-A9993數(shù)據(jù)項(xiàng)編號：TYNum4數(shù)據(jù)項(xiàng)編號：TDNum數(shù)據(jù)項(xiàng)名稱：團(tuán)員編號數(shù)據(jù)項(xiàng)名稱：團(tuán)隊(duì)編號別名：團(tuán)員編號別名：團(tuán)隊(duì)編號簡述：某團(tuán)員的代碼簡述：某團(tuán)隊(duì)的代碼類別及寬度：字符型,5位類別及寬度：字符型,3位取值范圍：T0001-T9999 取值范圍：001-999 2.以下為本系統(tǒng)數(shù)據(jù)字典的數(shù)據(jù)流部分:1數(shù)據(jù)流編號：F1數(shù)據(jù)流名稱：合同簡述：游客與旅行社簽訂的合同數(shù)據(jù)流來源：游客數(shù)據(jù)流去向：P1高峰流量：200份/天數(shù)據(jù)流組成：游客編號、姓名、性別、身份證號碼,聯(lián)系方式、地址、是否交款、會員。2數(shù)據(jù)流編號：F2數(shù)據(jù)流名稱：銷售統(tǒng)計(jì)表簡述：外聯(lián)銷售部每天的收入情況數(shù)據(jù)流來源：P1數(shù)據(jù)流去向：財(cái)務(wù)科流量：1份/天數(shù)據(jù)流組成：游客編號、單價、總金額、折扣率、日期、經(jīng)辦人。3數(shù)據(jù)流編號：F3數(shù)據(jù)流名稱：排團(tuán)計(jì)劃表簡述：對游客進(jìn)行團(tuán)隊(duì)編排的情況數(shù)據(jù)流來源：P2數(shù)據(jù)流去向：游客高峰流量：200份/天數(shù)據(jù)流組成：團(tuán)隊(duì)編號、導(dǎo)游編號、開始時間、旅游天數(shù)、跟團(tuán)人數(shù)、旅游路線。4數(shù)據(jù)流編號：F4數(shù)據(jù)流名稱：排團(tuán)計(jì)劃表簡述：對游客進(jìn)行團(tuán)隊(duì)編排的情況數(shù)據(jù)流來源：P2數(shù)據(jù)流去向：計(jì)調(diào)部門數(shù)據(jù)流組成：團(tuán)隊(duì)編號、導(dǎo)游編號、開始時間、旅游天數(shù)、跟團(tuán)人數(shù)、旅游路線。3.以下為本系統(tǒng)數(shù)據(jù)字典的數(shù)據(jù)結(jié)構(gòu)卡片部分:數(shù)據(jù)結(jié)構(gòu)卡片數(shù)據(jù)結(jié)構(gòu)名稱：用戶管理卡片數(shù)據(jù)結(jié)構(gòu)簡述：登記系統(tǒng)用戶信息時所記錄的卡片數(shù)據(jù)結(jié)構(gòu)的組成：操作員、密碼4.以下為本系統(tǒng)數(shù)據(jù)字典的數(shù)據(jù)存儲部分:數(shù)據(jù)存儲卡片主要用于描述數(shù)據(jù)存儲的結(jié)構(gòu)、有關(guān)的數(shù)據(jù)流和查詢要求。1數(shù)據(jù)存儲卡片編號：D1文件名：游客信息表簡述：存儲游客基本信息的表組成：游客編號、姓名、性別、身份證號碼,聯(lián)系方式、地址、是否交款、會員。有關(guān)的數(shù)據(jù)流：P1-D1,D1-P2有無立即查詢要求：有2數(shù)據(jù)存儲卡片文件名：線路信息表簡述：存儲旅游線路的具體信息的表組成：線路編號、旅游路線、市場價格、本店價格、預(yù)訂有關(guān)的數(shù)據(jù)流：P2-D2有無立即查詢要求：有3數(shù)據(jù)存儲卡片文件名：導(dǎo)游信息表簡述：存儲導(dǎo)游的基本信息的表組成：導(dǎo)游編號、姓名、性別、身份證號碼、電話、地址、任職時間、級別、備注。有關(guān)的數(shù)據(jù)流：D3-P2有無立即查詢要求：有5.以下為本系統(tǒng)數(shù)據(jù)字典的邏輯處理部分:1編號：P1名稱：游客信息處理簡述：處理游客信息輸入：游客編號、姓名、性別、身份證號碼,聯(lián)系方式、地址、是否交款、會員。輸出：游客信息表,銷售統(tǒng)計(jì)表處理：根據(jù)游客填寫好的合同登記游客信息表,并對當(dāng)天的營業(yè)額進(jìn)行統(tǒng)計(jì),上報(bào)財(cái)務(wù)科。2編號：P2名稱：排團(tuán)處理簡述：對游客進(jìn)行團(tuán)隊(duì)編排。輸入：游客信息、線路信息、導(dǎo)游信息。輸出：排團(tuán)計(jì)劃表處理：將游客信息、旅游線路和導(dǎo)游信息進(jìn)行匯總,合理安排計(jì)劃,最終輸出排團(tuán)計(jì)劃表。6.以下為本系統(tǒng)數(shù)據(jù)字典的外部實(shí)體部分：1外部實(shí)體名稱：游客簡述：旅行者輸入的數(shù)據(jù)流：排團(tuán)計(jì)劃表輸出的數(shù)據(jù)流：合同2外部實(shí)體名稱：財(cái)務(wù)科簡述：無輸入的數(shù)據(jù)流：銷售統(tǒng)計(jì)表輸出的數(shù)據(jù)流：無3外部實(shí)體名稱：計(jì)調(diào)部門簡述：負(fù)責(zé)安排接待〔房、餐、車、景點(diǎn)等事宜輸入的數(shù)據(jù)流：排團(tuán)計(jì)劃表輸出的數(shù)據(jù)流：無第三章系統(tǒng)總體設(shè)計(jì)3.1系統(tǒng)總體設(shè)計(jì)目標(biāo)旅游管理系統(tǒng)的目標(biāo)是對旅行社的導(dǎo)游人員以及客戶進(jìn)行管理和對團(tuán)隊(duì)進(jìn)行編排,以極大地提高業(yè)務(wù)信息記錄、統(tǒng)計(jì)、編排等信息管理的工作效率。盡量使系統(tǒng)的功能設(shè)計(jì),流程設(shè)計(jì)與實(shí)際操作吻合,有一定的可行性和現(xiàn)實(shí)意義。旅行社對旅游管理系統(tǒng)的要求有以下幾點(diǎn)：1、系統(tǒng)要本著服從和服務(wù)于企業(yè)戰(zhàn)略使命和長期目標(biāo)要求,以及繼承與優(yōu)化相結(jié)合的原則,來制定信息系統(tǒng)開發(fā)方案。2、系統(tǒng)既要解決現(xiàn)行系統(tǒng)存在的問題,又要充分預(yù)計(jì)未來的需求變化,使系統(tǒng)具有足夠的適應(yīng)性和先進(jìn)性,還要方便運(yùn)行管理和維護(hù)。

3、系統(tǒng)反映的流程簡潔,自動化程度比較高.如能自動打印報(bào)表,自動進(jìn)行一些簡單的結(jié)算,為管理人員提供相對準(zhǔn)確數(shù)據(jù),保證高效率運(yùn)作等。3.2概念模型概念模式〔E-R數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計(jì)是在需求分析的基礎(chǔ)上,設(shè)計(jì)出能夠滿足用戶需求的各種實(shí)體,以及它們之間的關(guān)系,為后面的邏輯結(jié)構(gòu)設(shè)計(jì)打下基礎(chǔ)。用E-R圖是描述數(shù)據(jù)實(shí)體關(guān)系的一種直觀描述工具,所以本系統(tǒng)采用了E-R圖方法進(jìn)行數(shù)據(jù)庫概念結(jié)構(gòu)設(shè)計(jì)。性別性別通信地址身份證號碼電話團(tuán)員姓名團(tuán)員編號團(tuán)隊(duì)編號路線編號備注團(tuán)費(fèi)交否圖圖3-1團(tuán)員的E-R圖線路名稱線路名稱團(tuán)費(fèi)團(tuán)費(fèi)路線編號線路路線編號線路簡介圖形簡介圖形圖圖3-2線路的E-R圖線路編號團(tuán)隊(duì)編號線路編號團(tuán)隊(duì)編號返程日期團(tuán)隊(duì)返程日期團(tuán)隊(duì)出發(fā)日期團(tuán)員人數(shù)出發(fā)日期團(tuán)員人數(shù)圖圖3-3團(tuán)隊(duì)的E-R圖團(tuán)隊(duì)編號團(tuán)隊(duì)編號團(tuán)隊(duì)負(fù)責(zé)人盈虧團(tuán)隊(duì)負(fù)責(zé)人盈虧團(tuán)費(fèi)團(tuán)費(fèi)團(tuán)隊(duì)人數(shù)旅游團(tuán)隊(duì)團(tuán)隊(duì)人數(shù)旅游團(tuán)隊(duì)建團(tuán)時間愛你是否出發(fā)建團(tuán)時間愛你是否出發(fā)圖圖3-4旅游團(tuán)隊(duì)的E-R圖操作員密碼密碼操作員密碼密碼圖圖3-5密碼的E-R圖帶領(lǐng)帶領(lǐng)團(tuán)員團(tuán)隊(duì) 1 N團(tuán)員團(tuán)隊(duì)參加 N N參加1負(fù)責(zé)1負(fù)責(zé)旅游團(tuán)隊(duì) 1 旅游團(tuán)隊(duì)圖圖3-6系統(tǒng)的E-R圖3.3數(shù)據(jù)庫邏輯結(jié)構(gòu)設(shè)計(jì)概念結(jié)構(gòu)是獨(dú)立于實(shí)際數(shù)據(jù)模型的信息結(jié)構(gòu),必須將其轉(zhuǎn)化為邏輯結(jié)構(gòu)后才能進(jìn)行數(shù)據(jù)庫應(yīng)用的設(shè)計(jì)。也就是要將概念上的結(jié)構(gòu)轉(zhuǎn)化為BP數(shù)據(jù)庫系統(tǒng)所支持的實(shí)際數(shù)據(jù)模型。團(tuán)員信息表結(jié)構(gòu)圖：圖3-7團(tuán)員信息表結(jié)構(gòu)圖團(tuán)員信息表實(shí)例圖：圖3-8團(tuán)員信息表實(shí)例圖線路信息表結(jié)構(gòu)圖：圖3-9線路信息表結(jié)構(gòu)圖線路信息表實(shí)例圖：圖3-10線路信息表實(shí)例圖團(tuán)隊(duì)信息表結(jié)構(gòu)圖：圖3-11團(tuán)隊(duì)信息表結(jié)構(gòu)圖團(tuán)隊(duì)信息表實(shí)例圖：圖3-12團(tuán)隊(duì)信息表實(shí)例圖旅游信息表結(jié)構(gòu)圖：圖3-13旅游信息表結(jié)構(gòu)圖旅游信息表實(shí)例圖：圖3-14旅游信息表實(shí)例圖密碼信息表結(jié)構(gòu)圖：圖3-15密碼信息表結(jié)構(gòu)圖密碼信息表實(shí)例圖：圖3-16密碼信息表實(shí)例圖第四章數(shù)據(jù)庫系統(tǒng)實(shí)現(xiàn)4.1系統(tǒng)實(shí)現(xiàn)工具簡介開發(fā)語言VisualBasic6．0從1998年發(fā)布到20XX正式推出VisualBasic.NET簡直吊足了開發(fā)者的胃口。從20XX就開始傳言的具有繼承、Try…Catch語句等新功能的全新VB7.0一直沒有露面。直到20XX,VisualStudio.NET的第一個BETA版問世的時候,所有人都呆了——這是VisualBasic嗎？And語句變成了BitAnd,數(shù)組只能從0下標(biāo)開始,而且連Dim語句的意義都變了,幾乎所有的窗體控件都變了,Long變成了Integer而Integer變成了Short,Variant不見了,Static不能用了……簡直是翻天覆地,人們已經(jīng)無暇關(guān)注這個版本有什么改進(jìn),轉(zhuǎn)而擔(dān)心我怎么才能接受這個本本了。其實(shí)VisualBasic.NET完全是為了.NETFramework這一全新的平臺而設(shè)計(jì)的,VisualBasic.NET的設(shè)計(jì)者一開始沒有掌握好新平臺和舊語言的平衡。到了BETA2中,很多東西回歸了6.0,如BitAnd又變回了And,數(shù)組的定義語句也變回了原有的意義,Static也回到了VisualBasic中。但是BETA1驚人的變化讓所有的VB開發(fā)者怕了,他們覺得這種語言被改的千瘡百孔,有些人干脆轉(zhuǎn)去研究傳說中的新語言C#。但是VisualBasic.NET渡過幾個BETA版本之后還是找到了正確的定位。VisualBasic.NET有對CLR最完善的支持,同時盡量保留著BASIC易懂的語法風(fēng)格和易用性。這個版本新增加的功能已經(jīng)數(shù)不清,最重要的幾個是：1、繼承。至此,VisualBasic完成了向面向?qū)ο筠D(zhuǎn)變的道路。2、共享成員。3、Try…Catch結(jié)構(gòu)化異常處理。4、Delegate和Interface。5、名稱空間。6、對自由線程的支持。特別的是,VisualBasic.NET大大減少了VisualBasic語言的關(guān)鍵字,如GoSub、PSet等等。原先的VisualBasic有多達(dá)120個關(guān)鍵字,這給寫程序帶來了很大的不便,現(xiàn)在經(jīng)過精簡,VisualBasic脫下了這個沉重的包袱。VisualBasic.NET現(xiàn)在是一門現(xiàn)代的、強(qiáng)壯的、面向?qū)ο蟮?、簡單的可視化開發(fā)語言。強(qiáng)大的語言功能吸引了很多開發(fā)者。歷史是在不斷重演的,VisualBasic.NET如今的處境和VisualBasic4.0很相似,由于兼容性變差,人氣也降低了。同時由于依附于.NETFramework,程序發(fā)布造成了一定的困難?，F(xiàn)在國內(nèi)使用VisualBasic.NET的人相對于VisualBasic6.0來講顯得很少。但是憑借VisualBasic.NET強(qiáng)大的語言功能和MS的支持,VisualBasic.NET一定會顯出它的光輝來。2003-穩(wěn)中求變的新版本VisualBasic.NET2003是一個相當(dāng)穩(wěn)重的版本,改變很少,但對小處有很多改進(jìn)。首先VisualBasic6.0升級向?qū)ё隽撕艽蟾倪M(jìn),這給從老版本痛苦升級的人帶來了更多一些的希望。其次在IDE方面,VisualBasic.NET2003修正了許多錯誤,還讓事件處理恢復(fù)了6.0的開發(fā)體驗(yàn)。語言方面只有兩項(xiàng)改進(jìn)：1、在For、ForEach語句中聲明循環(huán)變量。2、增加了數(shù)學(xué)移位運(yùn)算符<<和>>。在這個比較成熟穩(wěn)定的新版本下,許多VisualBasic的愛好和開始重新了解VisualBasic.NET,社區(qū)里面也漸漸熱鬧起來。但是,有些使用C#的開發(fā)者堅(jiān)持認(rèn)為VisualBasic.NET是垃圾,盡管VisualBasic.NET擁有比C#更多的功能和更好的IDE。這說明不了解VisualBasic.NET成為它普及的最大障礙。2005-完美主義的VisualBasic,能否再現(xiàn)輝煌？為了讓VisualBasic有最佳的開發(fā)體驗(yàn),VisualBasic2005的設(shè)計(jì)者絞盡了腦汁。這次VisualBasic2005光語言上的改進(jìn)就足以讓VisualBasic的開發(fā)人員高興一陣子。大家可以去看看我那篇介紹VisualBasic2005新增功能的貼子。挑重要的列在下邊：1、泛型2、運(yùn)算符重載3、PartialType4、窗體的默認(rèn)實(shí)例〔讓你用VB6的語法使用窗體5、語法的多種改進(jìn)現(xiàn)在用VisualBasic2005只要一行代碼就可以讀寫注冊表、訪問文件、讀寫串口、獲取應(yīng)用程序信息……用VisualBasic2005完全可以稱作享受開發(fā)。而泛型、運(yùn)算符重載等功能又可以讓VisualBasic的開發(fā)人員深入.NETFramework的全部功能,開發(fā)出最優(yōu)秀的應(yīng)用程序。SQLServer2000簡介SQLServer是一個關(guān)系數(shù)據(jù)庫管理系統(tǒng)它最初是由MicrosoftSybase和Ashton-Tate三家公司共同開發(fā)的于1988年推出了第一個OS/2版本在WindowsNT推出后Microsoft與Sybase在SQLServer的開發(fā)上就分道揚(yáng)鑣了Microsoft將SQLServer移植到WindowsNT系統(tǒng)上專注于開發(fā)推廣SQLServer的WindowsNT版本Sybase則較專注于SQLServer在UNIX操作系統(tǒng)上的應(yīng)用在本書中介紹的是MicrosoftSQLServer以后簡稱為SQLServer或MSSQLServerSQLServer2000是Microsoft公司推出的SQLServer數(shù)據(jù)庫管理系統(tǒng)的最新版本該版本繼承了SQLServer7.0版本的優(yōu)點(diǎn)同時又比它增加了許多更先進(jìn)的功能具有使用方便可伸縮性好與相關(guān)軟件集成程度高等優(yōu)點(diǎn)可跨越從運(yùn)行MicrosoftWindows98的膝上型電腦到運(yùn)行MicrosoftWindows2000的大型多處理器的服務(wù)器等多種平臺使用。SQLServer2000是為迅速提供可伸縮性電子商務(wù)、企業(yè)及數(shù)據(jù)倉庫解決方案而開發(fā)的完整數(shù)據(jù)庫與分析軟件產(chǎn)品。SQLSERVER2000定位于Internet背景下的數(shù)據(jù)庫應(yīng)用,它為用戶的Web應(yīng)用提供了一款完善的數(shù)據(jù)管理和數(shù)據(jù)分析解決方案。同時SQLSERVER2000還是WindowsDNA〔DistributedInternetArchitecture架構(gòu)的一個核心組件。它極大地縮短了用戶開發(fā)電子商務(wù)、數(shù)據(jù)倉庫應(yīng)用的時間。SQLSERVER2000還提供對XML<ExtensibleMarkupLanguage擴(kuò)展標(biāo)示語言支持>和HTTP的全方位支持。4.2旅行社管理系統(tǒng)數(shù)據(jù)庫實(shí)現(xiàn)1.登錄窗體新建窗體,窗體的name屬性改為loginform〔單元文件名為login.pas,caption屬性改為：登錄窗體圖登錄窗體用戶操作說明：當(dāng)用戶名或密碼輸入錯誤時,系統(tǒng)會彈出對話框提示重新輸入。代碼：implementationusesmain;{$R*.dfm}//單擊"確定"按鈕procedureTLoginForm.Button1Click<Sender:TObject>;beginwithq_yhdobeginclose;//關(guān)閉yh數(shù)集sql.Clear;//清除sql.Add<'select*fromyhwhere用戶名=:aand密碼=:b'>;parambyname<'a'>.asstring:=trim<edit1.Text>;//在edit1中輸入用戶名parambyname<'b'>.AsString:=trim<edit2.text>;//在edit2中輸入密碼open;//打開end;ifq_yh.recordcount>0thenmainform.showelseshowmessage<'用戶名或密碼錯誤,請?jiān)佥斎?>;end;//單擊"取消"按鈕procedureTLoginForm.Button2Click<Sender:TObject>;beginclose; //關(guān)閉end;end.2.主窗體設(shè)計(jì)如圖所示界面〔mainform,單元文件名為main.pas。caption屬性改為"主窗體",用label實(shí)現(xiàn)顯示其他窗體的功能。圖主窗體用戶操作說明：用戶單擊前六個標(biāo)簽就可進(jìn)入相應(yīng)窗體進(jìn)行操作。單擊"退出"則退出主窗體,進(jìn)入登錄窗體重新登錄。代碼：implementationusesyhglc,dyxxgl,xlxxgl,ykxxgl,ptxxgl,cxgl,login;{$R*.dfm}//單擊"用戶管理",進(jìn)入用戶管理窗體procedureTMainForm.Label1Click<Sender:TObject>;beginyhglForm.show;end;//單擊"導(dǎo)游信息管理",進(jìn)入導(dǎo)游信息管理窗體procedureTMainForm.Label2Click<Sender:TObject>;begindyxxglForm.show;end;//單擊"線路信息管理",進(jìn)入線路信息管理窗體procedureTMainForm.Label3Click<Sender:TObject>;beginxlxxglForm.show;end;//單擊"游客信息管理",進(jìn)入游客信息管理窗體procedureTMainForm.Label4Click<Sender:TObject>;beginykxxglForm.show;end;//單擊"排團(tuán)信息管理",進(jìn)入派團(tuán)信息管理窗體procedureTMainForm.Label5Click<Sender:TObject>;beginptxxglForm.show;end;//單擊"查詢管理",進(jìn)入查詢管理窗體procedureTMainForm.Label6Click<Sender:TObject>;begincxglForm.show;end;//單擊"退出",退出主窗體procedureTMainForm.Label7Click<Sender:TObject>;beginclose;loginForm.edit1.text:='';loginForm.edit2.text:='';end;end.3.用戶管理窗體創(chuàng)建窗體yhglform〔單元文件名為yhglc.pas。該窗體包含一個table組鍵和導(dǎo)航器,可方便地對用戶進(jìn)行操作。圖用戶管理窗體用戶操作說明：操作人員通過導(dǎo)航器對用戶表進(jìn)行"添加、刪除、修改、保存"。本窗體無代碼。4.導(dǎo)游信息管理窗體創(chuàng)建窗體dyxxglForm<單元文件名為dyxxgl.pas>。該窗體包含一個table組鍵和導(dǎo)航器,可方便地對導(dǎo)游信息進(jìn)行操作。圖導(dǎo)游信息管理窗體用戶操作說明：操作人員通過導(dǎo)航器對導(dǎo)游信息表進(jìn)行"添加、刪除、修改、保存"。本窗體無代碼。線路信息管理創(chuàng)建窗體xlxxglForm<單元文件名為xlxxgl.pas>。該窗體包含一個table組鍵和導(dǎo)航器,可方便地對旅游線路信息進(jìn)行操作。圖線路信息管理窗體用戶操作說明：操作人員通過導(dǎo)航器對線路信息表進(jìn)行"添加、刪除、修改、保存"。單擊"打印"按鈕,生成打印報(bào)表。代碼：implementationusesxlxxdy;{$R*.dfm}//單擊"打印",顯示打印報(bào)表procedureTxlxxglForm.BitBtn3Click<Sender:TObject>;beginxlxxReportForm.show;end;end.6．游客信息管理窗體創(chuàng)建窗體ykxxglForm<單元文件名為ykxxgl.pas>。該窗體包含一個table組鍵和導(dǎo)航器,可方便地對游客信息進(jìn)行操作。圖游客信息管理窗體用戶操作說明：操作人員通過導(dǎo)航器對游客信息表進(jìn)行"添加、刪除、修改、保存"。單擊"打印"按鈕,生成打印報(bào)表。代碼：implementationusesykxxdy;{$R*.dfm}//單擊"打印",顯示打印報(bào)表procedureTykxxglForm.BitBtn4Click<Sender:TObject>;beginykxxReportForm.show;end;end.7．查詢窗體創(chuàng)建窗體cxglForm<單元文件名為cxgl.pas>。在窗體中添加pagecontrol組件并新建四頁,并更改其相關(guān)屬性。導(dǎo)游查詢圖查詢管理窗體--導(dǎo)游查詢用戶操作說明:用戶可以按編號、姓名、性別、級別分別對導(dǎo)游信息進(jìn)行查詢,清空按鈕用來清除輸入內(nèi)容后可重新查詢,還可瀏覽全部數(shù)據(jù),并且對編號、姓名、性別進(jìn)行升序、降序排列,先選排序內(nèi)容再選排序方法。代碼：//查詢procedureTcxglForm.Button1Click<Sender:TObject>;beginwithQ_dycxdobeginclose;//關(guān)閉query組件sql.Clear;//清除原來SQL屬性內(nèi)容sql.Add<'select*fromdyxxwhere導(dǎo)游編號=:aor姓名=:bor性別=:cor級別=:d'>;//添加新的SQL屬性內(nèi)容parambyname<'a'>.AsString:=edit1.Text;//將edit1輸入內(nèi)容賦值給aparambyname<'b'>.AsString:=edit2.Text;//將edit2輸入內(nèi)容賦值給bparambyname<'c'>.AsString:=combobox1.Text;//將combobox1輸入內(nèi)容賦值給cparambyname<'d'>.AsString:=combobox2.Text;//將combobox2輸入內(nèi)容賦值給dopen;//執(zhí)行語句end;end;//清除procedureTcxglForm.Button2Click<Sender:TObject>;beginedit1.Clear;//清除edit1中輸入內(nèi)容edit2.Clear//清除edit2中輸入內(nèi)容//瀏覽全部數(shù)據(jù)procedureTcxglForm.CheckBox1Click<Sender:TObject>;beginifcheckbox1.CheckedthenwithQ_dycxdobeginclose;sql.Clear;sql.Add<'select*fromdyxx'>;open;end;end;//升序排序procedureTcxglForm.RadioButton1Click<Sender:TObject>;varcontext:string;beginif<radiogroup2.ItemIndex=0>thencontext:='導(dǎo)游編號'//按導(dǎo)游編號elseif<radiogroup2.ItemIndex=1>thencontext:='姓名'//按姓名elseif<radiogroup2.ItemIndex=2>thencontext:='級別';//按級別withQ_dycxdo//更新查詢beginclose;sql.Clear;sql.Add<'select*fromdyxxorderby'+context+''>;open;//開始查詢end;end;//降序排序procedureTcxglForm.RadioButton2Click<Sender:TObject>;varcontext:string;beginif<radiogroup2.ItemIndex=0>thencontext:='導(dǎo)游編號'//按導(dǎo)游編號elseif<radiogroup2.ItemIndex=1>thencontext:='姓名'//按姓名elseif<radiogroup2.ItemIndex=2>thencontext:='級別';//按級別withQ_dycxdo//更新查詢beginclose;sql.Clear;sql.Add<'select*fromdyxxorderby'+context+'desc'>;open;//開始查詢end;end;線路查詢圖查詢管理窗體--線路查詢用戶操作說明:用戶可以按線路編號、本店價格分別對線路信息進(jìn)行查詢,可以查詢價格在一定范圍之內(nèi)的所有線路,清空按鈕用來清除輸入內(nèi)容后可重新查詢,還可瀏覽全部數(shù)據(jù),并且對編號、路線、本店價格進(jìn)行升序、降序排列,先選排序內(nèi)容再選排序方法。代碼：//查詢procedureTcxglForm.Button3Click<Sender:TObject>;beginifedit4.text<>''thenwithQ_xlcxdobeginclose;//關(guān)閉query組件sql.Clear;//清除原來SQL屬性內(nèi)容sql.Add<'select*fromxlxxwhere線路編號=:a'>;//添加新的SQL屬性內(nèi)容parambyname<'a'>.AsString:=edit4.Text;//將edit4輸入內(nèi)容賦值給aopen;//執(zhí)行語句end;if<combobox3.Text<>''>and<combobox4.Text<>''>thenwithQ_xlcxdobeginclose;//關(guān)閉query組件sql.Clear;//清除原來SQL屬性內(nèi)容sql.Add<'select*fromxlxxwhere本店價格between:band:c'>;//添加新的SQL屬性內(nèi)容parambyname<'b'>.AsCurrency:=strtoCurr<combobox3.Text>;//將combobox3輸入內(nèi)容賦值給bparambyname<'c'>.AsCurrency:=strtoCurr<combobox4.Text>;//將combobox4輸入內(nèi)容賦值給copen;//執(zhí)行語句end;end;//清除procedureTcxglForm.Button4Click<Sender:TObject>;beginedit4.Clear;//清除edit4中輸入內(nèi)容end;//瀏覽全部數(shù)據(jù)procedureTcxglForm.CheckBox2Click<Sender:TObject>;beginifcheckbox2.CheckedthenwithQ_xlcxdobeginclose;sql.Clear;sql.Add<'select*fromxlxx'>;open;end;end;//升序排序procedureTcxglForm.RadioButton3Click<Sender:TObject>;varcontext:string;beginif<radiogroup4.ItemIndex=0>thencontext:='線路編號'//按線路編號elseif<radiogroup4.ItemIndex=1>thencontext:='旅游路線'//按旅游路線elseif<radiogroup4.ItemIndex=2>thencontext:='本店價格';//按本店價格withQ_xlcxdo//更新查詢beginclose;sql.Clear;sql.Add<'select*fromxlxxorderby'+context+''>;open;//開始查詢end;end;//降序排序procedureTcxglForm.RadioButton4Click<Sender:TObject>;varcontext:string;beginif<radiogroup4.ItemIndex=0>thencontext:='線路編號'//按線路編號elseif<radiogroup4.ItemIndex=1>thencontext:='旅游路線'//按旅游路線elseif<radiogroup4.ItemIndex=2>thencontext:='本店價格';//按本店價格withQ_xlcxdo//更新查詢beginclose;sql.Clear;sql.Add<'select*fromxlxxorderby'+context+'desc'>;open;//開始查詢end;end;游客查詢圖查詢管理窗體--游客查詢用戶操作說明:用戶可以按編號、姓名、性別、會員以及交款分別對游客信息進(jìn)行查詢,清空按鈕用來清除輸入內(nèi)容后可重新查詢,還可瀏覽全部數(shù)據(jù),并且對編號、姓名、會員、交款進(jìn)行升序、降序排列,先選排序內(nèi)容再選排序方法。代碼：//查詢procedureTcxglForm.Button5Click<Sender:TObject>;beginwithQ_ykcxdobeginclose;//關(guān)閉query組件sql.Clear;//清除原來SQL屬性內(nèi)容sql.Add<'select*fromykxxwhere游客編號=:aor姓名=:bor性別=:cor會員=:dor是否交款=:e'>;//添加新的SQL屬性內(nèi)容parambyname<'a'>.AsString:=edit5.Text;//將edit5輸入內(nèi)容賦值給aparambyname<'b'>.AsString:=edit6.Text;//將edit6輸入內(nèi)容賦值給bparambyname<'c'>.AsString:=combobox5.Text;//將combobox5輸入內(nèi)容賦值給cparambyname<'d'>.AsString:=combobox6.Text;//將combobox6輸入內(nèi)容賦值給dparambyname<'e'>.AsString:=combobox7.Text;//將combobox7輸入內(nèi)容賦值給eopen;//執(zhí)行語句end;end;//清除procedureTcxglForm.Button6Click<Sender:TObject>;beginedit5.Clear;//清除edit5中輸入內(nèi)容edit6.Clear;//清除edit6中輸入內(nèi)容//瀏覽全部數(shù)據(jù)procedureTcxglForm.CheckBox3Click<Sender:TObject>;beginifcheckbox3.CheckedthenwithQ_ykcxdobeginclose;sql.Clear;sql.Add<'select*fromykxx'>;open;end;end;//升序排序procedureTcxglForm.RadioButton5Click<Sender:TObject>;varcontext:string;beginif<radiogroup6.ItemIndex=0>thencontext:='游客編號'//按游客編號elseif<radiogroup6.ItemIndex=1>thencontext:='姓名'//按姓名elseif<radiogroup6.ItemIndex=2>thencontext:='會員'//按會員elseif<radiogroup6.ItemIndex=3>thencontext:='是否交款';//按是否交款withQ_ykcxdo//更新查詢beginclose;sql.Clear;sql.Add<'select*fromykxxorderby'+context+''>;open;//開始查詢end;end;//降序排序procedureTcxglForm.RadioButton6Click<Sender:TObject>;varcontext:string;beginif<radiogroup6.ItemIndex=0>thencontext:='游客編號'//按游客編號elseif<radiogroup6.ItemIndex=1>thencontext:='姓名'//按姓名elseif<radiogroup6.ItemIndex=2>thencontext:='會員'//按會員elseif<radiogroup6.ItemIndex=3>thencontext:='是否交款';//按是否交款withQ_ykcxdo//更新查詢beginclose;sql.Clear;sql.Add<'select*fromykxxorderby'+context+'desc'>;open;//開始查詢end;end;圖查詢管理窗體--排團(tuán)查詢用戶操作說明:用戶可以按團(tuán)隊(duì)編號、導(dǎo)游編號、線路編號、旅游天數(shù)以及開始時間分別對排團(tuán)信息進(jìn)行查詢,可以查詢開始時間在一定范圍之內(nèi)的所有旅游線路,清空按鈕用來清除輸入內(nèi)容后可重新查詢,還可瀏覽全部數(shù)據(jù),并且對團(tuán)隊(duì)編號、導(dǎo)游編號、開始時間進(jìn)行升序、降序排列,先選排序內(nèi)容再選排序方法。代碼：//查詢procedureTcxglForm.Button7Click<Sender:TObject>;beginif<edit7.text<>''>or<edit8.text<>''>or<edit9.Text<>''>thenwithQ_ptcxdobeginclose;//關(guān)閉query組件sql.Clear;//清除原來SQL屬性內(nèi)容sql.Add<'select*fromptxxwhere團(tuán)隊(duì)編號=:aor導(dǎo)游編號=:bor線路編號=:c'>;//添加新的SQL屬性內(nèi)容parambyname<'a'>.AsString:=edit7.Text;//將edit7輸入內(nèi)容賦值給aparambyname<'b'>.AsString:=edit8.Text;//將edit8輸入內(nèi)容賦值給bparambyname<'c'>.AsString:=edit9.Text;//將edit9輸入內(nèi)容賦值給copen;//執(zhí)行語句end;ifedit10.text<>''thenwithQ_ptcxdobeginclose;//關(guān)閉query組件sql.Clear;//清除原來SQL屬性內(nèi)容sql.Add<'select*fromptxxwhere旅游天數(shù)=:d'>;parambyname<'d'>.As