【正文】 ram = index 39。 = If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL amp。 if we walked off the end, set the offset based on page size If ( And Not MM_paramIsDefined) Then If (MM_offset MM_rsCount MM_size Or MM_offset = 1) Then If ((MM_rsCount Mod MM_size) 0) Then MM_offset = MM_rsCount (MM_rsCount Mod MM_size) Else MM_offset = MM_rsCount MM_size End If End If End If 39。 set the first and last displayed record rs1_first = 1 rs1_last = rs1_first + rs1_numRows 1 If (rs1_first rs1_total) Then rs1_first = rs1_total End If If (rs1_last rs1_total) Then rs1_last = rs1_total End If End If % % Dim MM_paramName % % 39。 MM_dbValues amp。 escape quotes MM_formVal = 39。39。 amp。 39。Passwordamp。39。driver={microsoft access driver (*.mdb)}。39。amp。期待再見！ 我知道在這次的課程設(shè)計(jì)中自已有許多的欠缺，在以后的日子中，我一定得更加嚴(yán)格要求自己，改正缺點(diǎn)，不斷努力，不斷進(jìn)步。 Set rs=(strSql) If not and not Then 39。 （ 2） 產(chǎn)品管理 包括對(duì)產(chǎn)品的添加與修改。 Access 是一個(gè)數(shù)據(jù)庫(kù)管理系統(tǒng)，它之所以被集成到 Office 中而不是Visual Studio 中，是因?yàn)樗c其它的數(shù)據(jù)庫(kù)管理系統(tǒng)（如 SQL Server 2021）相比更加簡(jiǎn)單易學(xué)，一個(gè)普通的計(jì)算機(jī)用戶即可掌握并使用它。 ASP 是在服務(wù)器端腳本編譯環(huán)境，使用它可以創(chuàng)建和運(yùn)行動(dòng)態(tài)、交互的 Web服務(wù)器應(yīng)用程序。重點(diǎn)介紹其功能：新聞發(fā)布、留言板、后臺(tái)登陸、后臺(tái)登陸的權(quán)限，不用權(quán)限的用戶登陸到不同的后臺(tái)，登陸到后臺(tái)后能實(shí)現(xiàn)、信息添加、信息修改、信息的刪除及信息查詢，能用用戶的資料進(jìn)行修改，如修改密碼等。 更加系統(tǒng)和有效地管理公司業(yè)務(wù)，方便 客戶能夠在任何地點(diǎn)、任何時(shí)間及時(shí)地了解和掌握公司的最新行情； 更加系統(tǒng)和有效地管理公司業(yè)務(wù)，方便客戶購(gòu)物， 實(shí)現(xiàn)客戶與公司的相互交流和 預(yù)訂業(yè)務(wù)功能 ！ 關(guān)鍵詞： Dreamweaver 系統(tǒng) 站點(diǎn)設(shè)計(jì) ASP Access 數(shù)據(jù)庫(kù) 目錄： 第一章 引 言 3 第二章 系統(tǒng)分析 4 第三章 藥店信息管理的設(shè)計(jì) 4 第四章 藥店信息管理系統(tǒng)的實(shí)現(xiàn) 8 第五章 結(jié)論 16 參考文獻(xiàn)17 致 謝17 附件1746 第一章 引 言 隨著計(jì)算機(jī)技術(shù)的飛速 發(fā)展和高等教育體制改革的不斷深入，計(jì)算機(jī)技術(shù)已進(jìn)入網(wǎng)絡(luò)時(shí)代，傳統(tǒng)的產(chǎn)品信息管理方法，手段及工作效率已不能適應(yīng)新的發(fā)展需要，無法很好的完成管理工作，提高管理水平的主要途徑是更新管理者的思想，增強(qiáng)對(duì)管理活動(dòng)的科學(xué)認(rèn)識(shí)，同時(shí)運(yùn)用先進(jìn)的信息技術(shù)，開發(fā) 藥店信息管理系統(tǒng)的需求，是深化管理體制改革的有力措施。一個(gè) “靜態(tài) ”的站點(diǎn)，若要更新主頁的內(nèi)容，必須手動(dòng)更新其 HTML 的文件數(shù)據(jù)。 ③、普通管理員進(jìn)入后臺(tái)后，可以進(jìn)行對(duì)產(chǎn)品的訂單 ，還可以進(jìn)行新聞了布，當(dāng)然也可以修改自已的賬號(hào)。 strSql=Select user_name,password,user_type From users strSql=strSql amp。 2） 圖片處理得不夠美觀 ，而且圖片少 ， 在以后會(huì)添加 。 (user_name) amp。,39。 39。重新注冊(cè) /a else user_name=(user_name) Password=(Password) strsql=insert into user(user_name ,Password)values(39。 39。driver={microsoft access driver (*.mdb)}。查看有無該用戶 dim db,strsql,rs set db=() dbq=amp。39。 append the query string to the redirect URL If (MM_editRedirectUrl And ) Then If (InStr(1, MM_editRedirectUrl, ?, vbTextCompare) = 0 And ) Then MM_editRedirectUrl = MM_editRedirectUrl amp。 Else MM_formVal = MM_delim + MM_formVal + MM_delim End If End If If (MM_i LBound(MM_fields)) Then MM_tableValues = MM_tableValues amp。 set the record count rs1_total = 39。 use index parameter if defined, otherwise use offset parameter MM_param = (index) If (MM_param = ) Then MM_param = (offset) End If If (MM_param ) Then MM_offset = Int(MM_param) End If 39。 create the list of parameters which should not be maintained MM_removeList = amp。 MM_nextItem amp。 MM_paramList(MM_paramIndex) End If Next If (MM_keepMove ) Then MM_keepMove = Right(MM_keepMove, Len(MM_keepMove) 1) End If End If End If 39。 fontsize: 12px。 end Not MM_atTotal % /td td width=23% align=center% If Not MM_atTotal Then % a href=%=MM_moveLast%最后一頁 /a % End If 39。 CStr(MM_offset MM_size) End If % !DOCTYPE html PUBLIC //W3C//DTD XHTML Transitional//EN html xmlns= head meta equiv=ContentType content=text/html。 from the maintained parameters If (MM_size 1) Then MM_moveParam = offset If (MM_keepMove ) Then MM_paramList = Split(MM_keepMove, amp。 add the Form variables to the MM_keepForm string For Each MM_item In MM_nextItem = amp。 *** Move To Record: update recordset stats 39。index39。, 39。,39。39。 Set rs=(strSql) If not and not Then 39。如果是普通用戶，重定向到首頁；如果是管理員，重定向到管理員頁面 If Session(user_type)=A Then ELse End If Else 39。39。driver={microsoft access driver (*.mdb)}。 (user_name) amp。driver={microsoft access driver (*.mdb)}。,39。driver={microsoft access driver (*.mdb)}。如果沒有記錄，表示沒有該用戶，請(qǐng)給出提示信息 對(duì)不起，用戶名或密碼有誤，請(qǐng) a href=39。 管理員登錄界面 圖 11 管理員登陸（ ） 對(duì)輸入的用戶名和密碼進(jìn)行判斷代碼頁面 ： %=True% % 39。 第二章 系統(tǒng)分析 一、網(wǎng)站的需求分析 （一）、 功能 需求 用戶登陸、管理員的級(jí)別權(quán)限 ①、超級(jí)管理員： 超級(jí)管理員可實(shí)現(xiàn)對(duì)所有記錄進(jìn)行查詢、添加、刪除、修改、等操作，且能修改超級(jí)管理員賬號(hào)信息。 ASP 是一個(gè)位于服務(wù)器端的腳本運(yùn)行環(huán)境。 現(xiàn)今飛速發(fā)展的網(wǎng)絡(luò)為公司與帶來的便利性舉世皆知。更為公司帶來廣闊的發(fā)展空間。通過這種環(huán)境，用戶可以創(chuàng)建和運(yùn)行動(dòng)態(tài)的交互式 Web 服務(wù)器應(yīng)用程序，如交互 式動(dòng)態(tài)網(wǎng)頁，包括使用HTML 表單收集和處理信息、上傳與下載等。 超級(jí)管理員可任命管理員，可以添加管理賬號(hào)且能對(duì)所有管理員賬號(hào)信息等資料進(jìn)行修改。查看有無該用戶 dim db,strsql,rs set db=() dbq=amp。39。 dim strsql,user_name ,Password ,realname ,mobi,name name=(user_name) 39。amp。 dim strsql,Password ,id Password=(Password) StrSql=Update user Set Password=39。 39。 dim strsql,user_name ,Password,name name=(user_name) strSql=select * from users Where user_name=39。重新注冊(cè) /a end if % ： %=True% % 39。如果沒有記錄，表示沒有該用戶，請(qǐng)給出提示信息