畢 業(yè) 設(shè) 計(jì) 論 文 鹽化四廠內(nèi)部辦公系姓 名: _指導(dǎo)教師: 班 級(jí): 設(shè)計(jì)日期： 年 月目錄目錄2摘要3前 言3第一章 系統(tǒng)分析、設(shè)計(jì)41.1系統(tǒng)需求分析41.2 用戶(hù)需求41.3系統(tǒng)功能需求簡(jiǎn)介5公司內(nèi)部辦公管理系統(tǒng)對(duì)公司加強(qiáng)內(nèi)部信息管理有著極其重要的作用。由于各個(gè)公司每年都在發(fā)展，公司的日益龐大，傳統(tǒng)的手工信息管理不僅工作量大，而且容易出現(xiàn)問(wèn)題。51.4功能需求描述51.5功能模塊圖51.6數(shù)據(jù)庫(kù)設(shè)計(jì)61.7E-R圖9第二章 系統(tǒng)實(shí)現(xiàn)112.1數(shù)據(jù)庫(kù)連接112.2登陸界面設(shè)計(jì)122.3用戶(hù)登錄界面及編碼設(shè)計(jì)142.4進(jìn)入員工信息管理系統(tǒng)15172.4.1修改員工個(gè)人信息172.4.2添加新用戶(hù)信息212.4.3刪除用戶(hù)信息:242.5用戶(hù)進(jìn)入公司財(cái)務(wù)信息管理系統(tǒng)252.5.1 添加財(cái)務(wù)記錄262.5.2修改財(cái)務(wù)記錄282.5.3刪除財(cái)務(wù)記錄292.5.4生成財(cái)務(wù)報(bào)表292.6用戶(hù)進(jìn)入公司內(nèi)部信息交流系統(tǒng)332.6.1通知公告牌342.6.2內(nèi)部意見(jiàn)箱36第三章 結(jié) 論383.1體會(huì)到了系統(tǒng)分析的重要性383.2理論實(shí)踐383.3掌握了系統(tǒng)開(kāi)發(fā)的流程383.4鞏固了知識(shí)38致謝39參考文獻(xiàn)39摘要論文敘述了一個(gè)公司內(nèi)部辦公信息管理系統(tǒng)的概況。重點(diǎn)介紹了企業(yè)內(nèi)部辦公信息管理系統(tǒng)的實(shí)現(xiàn)過(guò)程：包括系統(tǒng)分析、系統(tǒng)調(diào)查、數(shù)據(jù)流程分析、功能設(shè)計(jì)、數(shù)據(jù)庫(kù)設(shè)計(jì)、系統(tǒng)實(shí)現(xiàn)、系統(tǒng)測(cè)試和調(diào)試。本系統(tǒng)主要功能有用戶(hù)管理、學(xué)生成績(jī)查詢(xún)、學(xué)生成績(jī)管理(查找、錄入、修改)等數(shù)據(jù)操作包括功能需求描述、數(shù)據(jù)庫(kù)設(shè)計(jì)等內(nèi)容。第二部分介紹了本系統(tǒng)的分析、設(shè)計(jì)，第三部分介紹了本系統(tǒng)的具體實(shí)現(xiàn)，第四部分關(guān)于本系統(tǒng)開(kāi)發(fā)過(guò)程中的結(jié)論及體會(huì)。關(guān)鍵詞公司內(nèi)部辦公信息管理系統(tǒng) 、ASP 前 言ASP（Active Server Pages）是Microsoft提出的一種網(wǎng)絡(luò)服務(wù)器端編程環(huán)境。ASP已經(jīng)成為開(kāi)發(fā)動(dòng)態(tài)網(wǎng)站的重要而快速、有效的工具。ASP強(qiáng)大的功能使之成為一種優(yōu)秀的服務(wù)器技術(shù)。隨著網(wǎng)絡(luò)技術(shù)的日益成熟，ASP技術(shù)在網(wǎng)絡(luò)編程中也變得越來(lái)越重要。所以，在我們的畢業(yè)設(shè)計(jì)中，我們采用了ASP作為開(kāi)發(fā)工具，構(gòu)建了一個(gè)能實(shí)現(xiàn)簡(jiǎn)單綜合素質(zhì)管理系統(tǒng)，用來(lái)負(fù)責(zé)系統(tǒng)的用戶(hù)模塊的實(shí)現(xiàn)。通過(guò)這次的畢業(yè)設(shè)計(jì)，我了解了目前管理系統(tǒng)的構(gòu)成和運(yùn)作原理，掌握了用ASP的相關(guān)知識(shí)和技術(shù)原理，鍛煉了自己的動(dòng)手實(shí)踐能力。更重要的是，通過(guò)這次的畢業(yè)設(shè)計(jì)，我培養(yǎng)出了刻苦鉆研的學(xué)習(xí)精神和嚴(yán)肅認(rèn)真的學(xué)習(xí)態(tài)度，這對(duì)我以后的學(xué)習(xí)和工作有很大的益處。本系統(tǒng)首先對(duì)整個(gè)公司內(nèi)部員工進(jìn)行管理存儲(chǔ)，同時(shí)限制他們的權(quán)限，使每個(gè)人能夠有效查看相關(guān)信息，并修改自己的信息，只有具有一定權(quán)限的員工才能對(duì)相關(guān)信息進(jìn)行查看和修改。其次，對(duì)公司所有財(cái)務(wù)按公司規(guī)定進(jìn)行統(tǒng)一管理，登記，如果有需要，可以將財(cái)務(wù)生成報(bào)表，使看著更加一目了然。最后，設(shè)置公司內(nèi)部交流系統(tǒng)，包括內(nèi)部通知公告牌和內(nèi)部意見(jiàn)箱，使公司可以即時(shí)向公司員工發(fā)送相關(guān)通知，還可以使公司員工能夠自主向公司提出寶貴意見(jiàn)。是一套比較全面的公司內(nèi)部辦公管理系統(tǒng)。由于一個(gè)公司的綜合管理是一項(xiàng)復(fù)雜的、多樣的工作,本系統(tǒng)沒(méi)有也不可能把所有問(wèn)題都考慮進(jìn)去。另外本系統(tǒng)的不足之處，由于公司逐年發(fā)展，公司部門(mén)可能會(huì)相應(yīng)增加等內(nèi)部會(huì)需要更復(fù)雜的系統(tǒng)管理，Access數(shù)據(jù)庫(kù)逐漸顯現(xiàn)出其不足，可用Sql Server數(shù)據(jù)庫(kù)。在管理員模塊中，管理員無(wú)法對(duì)數(shù)據(jù)庫(kù)進(jìn)行備份。通過(guò)本系統(tǒng)的使用,將能使一個(gè)公司的內(nèi)部管理更加完善，快速。系統(tǒng)特點(diǎn)1.簡(jiǎn)單明了，易于操作：此系統(tǒng)一目了然，界面友好，容易上手，操作簡(jiǎn)單。2.公司員工信息管理： 根據(jù)員工所在部門(mén)及職位大小對(duì)其做了相應(yīng)權(quán)限。2.成績(jī)報(bào)表可以根據(jù)不同部門(mén)，不同項(xiàng)目，不同經(jīng)手人，不同日期及個(gè)人打印出各自所需要的財(cái)務(wù)報(bào)表。第一章 系統(tǒng)分析、設(shè)計(jì)1.1系統(tǒng)需求分析系統(tǒng)需要經(jīng)過(guò)有效的身份驗(yàn)證才可以登錄。將登錄本系統(tǒng)的身份分為三種：系統(tǒng)管理員、財(cái)務(wù)管理員、普通員工，只有被授權(quán)的用戶(hù)才可以使用本系統(tǒng)資源，并根據(jù)員工身份對(duì)其設(shè)置相關(guān)的使用權(quán)限。系統(tǒng)提供接收添加員工信息。系統(tǒng)提供對(duì)公司財(cái)務(wù)進(jìn)行查詢(xún)和統(tǒng)計(jì)。系統(tǒng)提供公司發(fā)布通知及員工對(duì)公司提出意見(jiàn)。1.2 用戶(hù)需求系統(tǒng)根據(jù)用戶(hù)身份不同，使用的系統(tǒng)資源也不同。l 系統(tǒng)管理員：可以對(duì)系統(tǒng)中的一切進(jìn)行查看、添加及修改。l 財(cái)務(wù)管理員：除了對(duì)自己的相關(guān)信息可以查看和修改外，還可以對(duì)財(cái)務(wù)進(jìn)行查看、添加及修改。l 普通員工：只能查看和自己相關(guān)的信息，修改自己的信息。具體流程如圖所示：登錄系統(tǒng)導(dǎo)航員工管理財(cái)務(wù)管理信息交流管理員工身份判斷員工身份判斷系統(tǒng)管理員普通員工用戶(hù)信息管理修改個(gè)人信息查詢(xún)員工信息財(cái)務(wù)信息管理1.3系統(tǒng)功能需求簡(jiǎn)介公司內(nèi)部辦公管理系統(tǒng)對(duì)公司加強(qiáng)內(nèi)部信息管理有著極其重要的作用。由于各個(gè)公司每年都在發(fā)展，公司的日益龐大，傳統(tǒng)的手工信息管理不僅工作量大，而且容易出現(xiàn)問(wèn)題。 1.4功能需求描述用戶(hù)分為系統(tǒng)管理員、財(cái)務(wù)管理員、普通員工三類(lèi)。不論是系統(tǒng)管理員或財(cái)務(wù)管理員，還是普通員工都需要通過(guò)用戶(hù)名和口令進(jìn)行登錄財(cái)務(wù)管理員可以看到財(cái)務(wù)信息進(jìn)行添加和修改。財(cái)務(wù)信息包括項(xiàng)目名稱(chēng)、款項(xiàng)的數(shù)額、經(jīng)手人、添加日期、修改日期。當(dāng)公司員工查找某一財(cái)務(wù)情況時(shí)，可以自動(dòng)顯示出該財(cái)務(wù)的所有情況。在財(cái)務(wù)信息管理中，財(cái)務(wù)管理員可以對(duì)財(cái)務(wù)進(jìn)行增加、修改和刪除。并能夠打印各部門(mén)、各項(xiàng)目、個(gè)人財(cái)務(wù)報(bào)表和綜合財(cái)務(wù)報(bào)表普通員工登錄后，他們只能看到自己的個(gè)人信息及修改自己的信息，還可以查看公司內(nèi)部通知和向公司提出自己的意見(jiàn)。個(gè)人信息包括登錄名、姓名、登錄密碼、電子郵件、部門(mén)、職位、內(nèi)部分機(jī)號(hào)碼、家庭電話(huà)、手機(jī)號(hào)、QQ號(hào)、家庭住址、是否是系統(tǒng)管理員、生日、是否是財(cái)務(wù)管理員、性別及教育程度。管理員登錄后，管理員可以看到系統(tǒng)中包含的所有信息，并對(duì)其進(jìn)行修改和添加。1.5功能模塊圖辦公管理系統(tǒng)員工管理財(cái)務(wù)管理信息管理修改個(gè)人信息修改用戶(hù)信息添加新用戶(hù)刪除用戶(hù)查詢(xún)員工信息添加財(cái)務(wù)報(bào)表修改財(cái)務(wù)報(bào)表刪除財(cái)務(wù)報(bào)表通知公告牌內(nèi)部意見(jiàn)箱1.6數(shù)據(jù)庫(kù)設(shè)計(jì)1. 公司部門(mén)信息數(shù)據(jù)表(Departments)2. 公司職位信息數(shù)據(jù)表(Positions)3. 公司財(cái)務(wù)信息數(shù)據(jù)表(FinancialRecord)4. 公司財(cái)務(wù)項(xiàng)目信息數(shù)據(jù)表(FinancialProject)5. 公司通知公告牌數(shù)據(jù)表(SuggestionRecords)6. 系統(tǒng)用戶(hù)信息數(shù)據(jù)表（PSLogins）：7. 公司內(nèi)部意見(jiàn)信息數(shù)據(jù)表(SuggestionRecords)8. 公司內(nèi)部意見(jiàn)類(lèi)型數(shù)據(jù)表(SuggestionTypes)表1 公司部門(mén)信息數(shù)據(jù)表(Departments)字段名稱(chēng)數(shù)據(jù)類(lèi)型說(shuō)明備注DepartmentID自動(dòng)編號(hào)部門(mén)ID主關(guān)鍵字DepartmentName文本部門(mén)名稱(chēng)Remard備注備注表2 公司職位信息數(shù)據(jù)(Positions)字段名稱(chēng)數(shù)據(jù)類(lèi)型說(shuō)明備注ID自動(dòng)編號(hào)主關(guān)鍵字PositionName文本職位名稱(chēng)PositionID數(shù)字職位ID表3 公司財(cái)務(wù)信息數(shù)據(jù)表(FinancialRecord)字段名稱(chēng)數(shù)據(jù)類(lèi)型說(shuō)明備注ID自動(dòng)編號(hào)主關(guān)鍵字Name文本記錄經(jīng)手人Department文本部門(mén)ProjectName文本所屬財(cái)務(wù)項(xiàng)目FundTypeA貨幣款項(xiàng)A的數(shù)額FundTypeB貨幣款項(xiàng)B的數(shù)額FundTypeC貨幣款項(xiàng)C的數(shù)額FundTypeD貨幣款項(xiàng)D的數(shù)額Sun貨幣各款項(xiàng)求和Summary文本摘要Remark文本備注AccountName文本會(huì)計(jì)經(jīng)手人AddDate日期/時(shí)間記錄添加日期ModifyDate日期/時(shí)間記錄修改日期表4公司財(cái)務(wù)項(xiàng)目信息數(shù)據(jù)表(FinancialProject)字段名稱(chēng)數(shù)據(jù)類(lèi)型說(shuō)明備注FinancialProjectID自動(dòng)編號(hào)主關(guān)鍵字FinancialProjectName文本財(cái)務(wù)項(xiàng)目名稱(chēng)AddDate日期/時(shí)間項(xiàng)目添加日期FinancialManager文本項(xiàng)目主管表5公司通知公告牌數(shù)據(jù)表(SuggestionRecords)字段名稱(chēng)數(shù)據(jù)類(lèi)型說(shuō)明備注MessageID自動(dòng)編號(hào)主關(guān)鍵字MessageContent文本通知內(nèi)容MessageType文本通知類(lèi)型MessageSender文本通知發(fā)送者M(jìn)essageSendDate日期/時(shí)間通知發(fā)送日期MessageSendTime日期/時(shí)間通知發(fā)送時(shí)間MessageValidTime數(shù)字通知有效天數(shù)表6系統(tǒng)用戶(hù)信息數(shù)據(jù)表（PSLogins）：字段名稱(chēng)數(shù)據(jù)類(lèi)型說(shuō)明備注ID自動(dòng)編號(hào)主關(guān)鍵字LoginID文本系統(tǒng)用戶(hù)的登錄名Name文本系統(tǒng)用戶(hù)的姓名Password文本用戶(hù)密碼EmailAddress文本用戶(hù)電子郵件地址Department文本用戶(hù)所在部門(mén)Position文本用戶(hù)的職位InternalPhone文本用戶(hù)的內(nèi)部分機(jī)號(hào)碼HomePhone文本用戶(hù)的家庭電話(huà)MobilePhone文本用戶(hù)的手機(jī)號(hào)QQ文本用戶(hù)的QQ號(hào)HomeAddress文本用戶(hù)的家庭住址IsSystemManager是/否用戶(hù)是否是系統(tǒng)管理員Birthday日期/時(shí)間用戶(hù)的生日IsFinancialManager是/否用戶(hù)是否是財(cái)務(wù)管理員Sex文本用戶(hù)性別Education文本用戶(hù)教育程度Remark備注備注表7 公司內(nèi)部意見(jiàn)信息數(shù)據(jù)表(SuggestionRecords)字段名稱(chēng)數(shù)據(jù)類(lèi)型說(shuō)明備注SuggestionID自動(dòng)編號(hào)主關(guān)鍵字SenderName文本意見(jiàn)發(fā)送者Todepartment文本意見(jiàn)發(fā)往部門(mén)SuggestionType文本意見(jiàn)類(lèi)型SuggestionText備注意見(jiàn)內(nèi)容Status文本意見(jiàn)處理狀態(tài)Comments文本意見(jiàn)處理評(píng)論WhenSent日期/時(shí)間意見(jiàn)發(fā)送日期表8 公司內(nèi)部意見(jiàn)類(lèi)型數(shù)據(jù)表(SuggestionTypes)字段名稱(chēng)數(shù)據(jù)類(lèi)型說(shuō)明備注ID自動(dòng)編號(hào)主關(guān)鍵字SuggestionType文本意見(jiàn)建議的類(lèi)型1.7E-R圖 系統(tǒng)用戶(hù)信息實(shí)體圖：?jiǎn)T工信息編號(hào)姓名部門(mén)手機(jī)號(hào)登錄名密碼電子郵件地址職位內(nèi)部分機(jī)家庭電話(huà)QQ 家庭住址是否是系統(tǒng)管理員生日是否是財(cái)務(wù)管理員性別教育程序圖1-1系統(tǒng)用戶(hù)信息實(shí)體圖公司部門(mén)信息實(shí)體圖：部門(mén)信息部門(mén)名稱(chēng)編號(hào)備注圖1-2 公司部門(mén)信息實(shí)體圖公司職位信息實(shí)體圖：?jiǎn)T工職位信息身份編號(hào)職位名稱(chēng)職位ID圖1-3公司職位信息實(shí)體圖公司財(cái)務(wù)信息實(shí)體圖：備注摘要各款項(xiàng)求和財(cái)務(wù)項(xiàng)目會(huì)計(jì)經(jīng)手人財(cái)務(wù)信息款項(xiàng)D數(shù)額記錄添加時(shí)間款項(xiàng)C數(shù)額記錄修改時(shí)間款項(xiàng)B數(shù)額編號(hào)款項(xiàng)A數(shù)額部門(mén)記錄經(jīng)手人 圖1-4 公司財(cái)務(wù)信息實(shí)體圖公司財(cái)務(wù)項(xiàng)目信息實(shí)體圖：財(cái)政項(xiàng)目信息項(xiàng)目編號(hào)主管管理者添加時(shí)間圖1-5 公司財(cái)務(wù)項(xiàng)目信息實(shí)體圖公司通知公告牌實(shí)體圖：有效天數(shù)通知公告信息發(fā)送日期內(nèi)容發(fā)送者編號(hào)發(fā)送時(shí)間圖1-6 公司通知公告牌實(shí)體圖公司內(nèi)部意見(jiàn)信息實(shí)體圖：?jiǎn)T工意見(jiàn)信息編號(hào)發(fā)送者發(fā)送日期內(nèi)容類(lèi)型處理狀態(tài)發(fā)往部門(mén)處理評(píng)論圖1-7 公司內(nèi)部意見(jiàn)信息實(shí)體圖公司內(nèi)部意見(jiàn)類(lèi)型實(shí)體圖：意見(jiàn)類(lèi)型信息編號(hào)類(lèi)型名稱(chēng)圖1-8公司內(nèi)部意見(jiàn)類(lèi)型實(shí)體圖第二章 系統(tǒng)實(shí)現(xiàn)下面給出系統(tǒng)開(kāi)發(fā)出來(lái)的詳細(xì)界面以闡述公司內(nèi)部管理系統(tǒng)的具體功能。2.1數(shù)據(jù)庫(kù)連接代碼如下：2.2登陸界面設(shè)計(jì)首先是進(jìn)入登陸界面，本窗體顯示用戶(hù)名稱(chēng)，密碼校驗(yàn)等信息，本系統(tǒng)的用戶(hù)分為三類(lèi)：系統(tǒng)管理員，財(cái)務(wù)管理員，普通員工。使用者可以輸入相應(yīng)的用戶(hù)名和密碼，單擊“確定”就會(huì)將輸入提交給系統(tǒng)以驗(yàn)證用戶(hù)、密碼及身份。如果用戶(hù)名及密碼正確，則會(huì)進(jìn)入系統(tǒng)的主體。本模塊的流程圖如下：輸入用戶(hù)名，密碼正確？Y進(jìn)入N代碼如下：校驗(yàn)用戶(hù)提交的用戶(hù)信息elseTheUsername=Request.Form(Username)ThePassword=Request.Form(Password)If Instr(TheUsername, )=0 and Instr(ThePassword, )=0 and Instr(TheUsername, )=0 _ and Instr(ThePassword, )=0 thenset RSLogin = conn.Execute(select * from PSLogins where & LoginID = _ & TheUsername & and & Password = & ThePassword & )if RSLogin.EOF thenSession(NumAttempts) = Session(NumAttempts) + 1if Application(NumAttempts) = 0 thenTheMessage = 登錄不成功，請(qǐng)重試:elseif Session(NumAttempts) Application(NumAttempts) thenTheMessage = 登錄不成功，登錄次數(shù)已滿(mǎn)，無(wú)法重試elseTheTimes=Application(NumAttempts)-Session(NumAttempts)+1TheMessage = 登錄不成功，還有 & TheTimes & 次機(jī)會(huì)，請(qǐng)重試:end ifelseSession(ID) = RSLogin(LoginID)Application(ID) = RSLogin(LoginID)Session(Name) = RSLogin(Name)Session(Password) = RSLogin(Password)Session(Department) = RSLogin(Department)Session(EmailAddress)=RSLogin(EmailAddress)Session(Position)=RSLogin(Position)Session(InternalPhone)=RSLogin(InternalPhone)Session(HomePhone)=RSLogin(HomePhone)Session(MobilePhone)=RSLogin(MobilePhone)Session(QQ)=RSLogin(QQ)Session(Birthday)=RSLogin(Birthday)Session(HomeAddress)=RSLogin(HomeAddress)Session(IsSystemManager)=RSLogin(IsSystemManager)Session(IsFinancialManager)=RSLogin(IsFinancialManager)Response.Redirect home.aspend ifelseTheMessage=用戶(hù)名或者密碼輸入不合格式end ifend if % if TheMessage 登錄不成功，登錄次數(shù)已滿(mǎn)，無(wú)法重試 then %用戶(hù) 密碼 2.3用戶(hù)登錄界面及編碼設(shè)計(jì) 本節(jié)以對(duì)用戶(hù)進(jìn)行管理為例，介紹管理員的編碼設(shè)計(jì)。管理員進(jìn)入“用戶(hù)管理”中的各種功能。代碼如下： = #12:00:00 AM# And Time = #12:00:00 PM# And Time ,歡迎您訪問(wèn)內(nèi)網(wǎng)!今天是 企業(yè)員工信息管理系統(tǒng) 公司財(cái)務(wù)信息管理系統(tǒng) 公司內(nèi)部交流信息系統(tǒng)2.4進(jìn)入員工信息管理系統(tǒng)代碼如下：查詢(xún)所有員工信息按姓名排序&nbsp按部門(mén)排序&nbsp按生日排序 查詢(xún)某個(gè)部門(mén)員工信息option value= 查詢(xún)某個(gè)員工信息從列表中選擇option value=從輸入的名字查詢(xún) 修改關(guān)于我的信息 系統(tǒng)管理員選項(xiàng)以姓名排序進(jìn)入&nbsp 以部門(mén)排序進(jìn)入&nbsp以生日排序進(jìn)入2.4.1修改員工個(gè)人信息代碼如下：更新用戶(hù)個(gè)人信息 conn.Execute update PSLogins set _ & EmailAddress= & Request.Form(EmailAddress) & , _ & InternalPhone= & Request.Form(InternalPhone) & , _ & HomePhone= & Request.Form(HomePhone) & , _ & MobilePhone= & Request.Form(MobilePhone) & , _ & QQ= & Request.Form(QQ) & , _ & HomeAddress= & Request.Form(HomeAddress) & , _ & Birthday= & Request.Form(BirthdayYear) & - _ & Request.Form(BirthdayMonth) & - _ & Request.Form(BirthdayDay) & _ & Where Name= & Request.Form(Name) & TheMessage = 您的個(gè)人信息已經(jīng)修改成功else如果用戶(hù)輸入了新密碼if Request.Form(NewPassword) = Request.Form(ConfirmNewPassword) thenSession(Name) = Request.Form(Name)Session(Password) = Request.Form(NewPassword)Session(EmailAddress)=Request.Form(EmailAddress)Session(InternalPhone)=Request.Form(InternalPhone)Session(HomePhone)=Request.Form(HomePhone)Session(MobilePhone)=Request.Form(MobilePhone)Session(HomeAddress)=Request.Form(HomeAddress)Session(Birthday)=Request.Form(BirthdayYear) & - & Request.Form(BirthdayMonth) & - & Request.Form(BirthdayDay)Session(QQ)=Request.Form(QQ)Session(HomeAddress)=Request.Form(HomeAddress) conn.Execute update PSLogins set _ & EmailAddress= & Request.Form(EmailAddress) & , _ & InternalPhone= & Request.Form(InternalPhone) & , _ & HomePhone= & Request.Form(HomePhone) & , _ & MobilePhone= & Request.Form(MobilePhone) & , _ & QQ= & Request.Form(QQ) & , _ & HomeAddress= & Request.Form(HomeAddress) & , _ & Birthday= & Request.Form(BirthdayYear) & - _ & Request.Form(BirthdayMonth) & - _ & Request.Form(BirthdayDay) & _ & Where Name= & Request.Form(Name) & TheMessage = 您的個(gè)人信息已經(jīng)修改成功else TheMessage = 新密碼輸入不一致，請(qǐng)重試 end if end ifelseTheMessage = 您輸入的密碼有誤，請(qǐng)重試end ifelse TheMessage = 請(qǐng)?jiān)谙旅嫘薷哪膫€(gè)人信息 end if用戶(hù)信息修改表格：姓名INPUT TYPE=text NAME=Name VALUE= SIZE=51 MAXLENGTH=50 電子郵件地址INPUT TYPE=text NAME=EmailAddress VALUE= SIZE=51 MAXLENGTH=50 內(nèi)部分機(jī)電話(huà)INPUT TYPE=text NAME=InternalPhone VALUE= SIZE=51 MAXLENGTH=50 移動(dòng)電話(huà)INPUT TYPE=text NAME=MobilePhone VALUE= SIZE=51 MAXLENGTH=50 家庭電話(huà)INPUT TYPE=text NAME=HomePhone VALUE= SIZE=51 MAXLENGTH=50 QQ號(hào)INPUT TYPE=text NAME=QQ VALUE= SIZE=51 MAXLENGTH=50 生日 option value=&nbsp&nbsp&nbsp&nbsp % YearCounter = 2000 Do until YearCounter OPTION VALUE=&nbsp&nbsp&nbsp&nbsp 年&nbsp&nbsp option value=&nbsp&nbsp&nbsp&nbsp 12 % OPTION VALUE=&nbsp&nbsp&nbsp&nbsp 月&nbsp&nbsp option value=&nbsp&nbsp&nbsp&nbsp 31 % OPTION VALUE=&nbsp&nbsp&nbsp&nbsp 日&nbsp&nbsp 家庭住址INPUT TYPE=text NAME=HomeAddress VALUE= SIZE=51 MAXLENGTH=50 請(qǐng)輸入您的密碼 請(qǐng)輸入您的新密碼請(qǐng)確認(rèn)您的新密碼2.4.2添加新用戶(hù)信息代碼如下：添加新用戶(hù)if not IsEmpty(Request.Form(Add) thenTheLoginID=Request.Form(LoginID)TheName=RealString(Request.Form(Name)TheEmailAddress=Request.Form(EmailAddress)ThePassword=RealString(Request.Form(Password)Session(Password) = Request.Form(Password)TheDepartment=Request.Form(Department) ThePosition=RealString(Request.Form(Position) )TheInternalPhone=Request.Form(InternalPhone)TheHomePhone=Request.Form(HomePhone)TheMobilePhone=Request.Form(MobilePhone)TheQQ=Request.Form(QQ) TheHomeAddress=Request.Form(HomeAddress)TheIsSystemManager=Request.Form(IsSystemManager)TheBirthday=Request.Form(BirthdayYear) & - _& Request.Form(BirthdayMonth) & - & Request.Form(BirthdayDay)TheIsFinancialManager=Request.Form(IsFinancialManager) 對(duì)用戶(hù)輸入進(jìn)行校驗(yàn)，合格則添加新用戶(hù)信息if len(ThePassword)=0 or len(TheName)=0 or len(TheLoginID)=0 thenTheMessage=登錄名，姓名，密碼不能為空，無(wú)法添加新用戶(hù)elsestrSQL= INSERT INTO PSLogins(LoginID, Name, EmailAddress, _& Department, Position,Birthday, HomePhone, QQ, HomeAddress, _& MobilePhone) values ( _& & TheLoginID &, _& & TheName &, _& & TheEmailAddress &, _& & TheDepartment &, _& & ThePosition &, _& & TheBirthday &, _& & TheHomePhone &, _& & TheQQ &, _& & TheHomeAddress &, _& & TheMobilePhone & ) db.Execute strSQLTheMessage=新用戶(hù)添加成功 end ifelse TheMessage = 請(qǐng)?jiān)谙旅嫣砑有掠脩?hù) end if添加新用戶(hù)表格登錄名td wid