【正文】 ，增強(qiáng)對(duì)管理活動(dòng)的科學(xué)認(rèn)識(shí)，同時(shí)運(yùn)用先進(jìn)的信息技術(shù)，開(kāi)發(fā) 藥店信息管理系統(tǒng)的需求，是深化管理體制改革的有力措施。 現(xiàn)今飛速發(fā)展的網(wǎng)絡(luò)為公司與帶來(lái)的便利性舉世皆知。 本系統(tǒng)論文主要是管理產(chǎn)品的在線發(fā)布。 編號(hào) : 填學(xué)號(hào) 畢 業(yè) 設(shè) 計(jì) 題 目 藥店信息管理系統(tǒng) 指導(dǎo)教師 學(xué)生姓名 專 業(yè) 計(jì)算機(jī)科學(xué)與技術(shù) 教學(xué)單位 （蓋章） 摘要 隨著科學(xué)技術(shù)的發(fā) 展，計(jì)算機(jī)領(lǐng)域不斷取得新的研究成果。重點(diǎn)介紹其功能：新聞發(fā)布、留言板、后臺(tái)登陸、后臺(tái)登陸的權(quán)限，不用權(quán)限的用戶登陸到不同的后臺(tái)，登陸到后臺(tái)后能實(shí)現(xiàn)、信息添加、信息修改、信息的刪除及信息查詢，能用用戶的資料進(jìn)行修改，如修改密碼等。更為公司帶來(lái)廣闊的發(fā)展空間。 建立 藥店信息管理 系統(tǒng)，采用計(jì)算機(jī) 網(wǎng)絡(luò) 對(duì) 藥店產(chǎn)品 進(jìn)行管理，進(jìn)一步提高辦 事效益和現(xiàn)代化水平。因此開(kāi)發(fā)一套 基于計(jì)算機(jī)網(wǎng)絡(luò)的管理 系統(tǒng)是很有必要的。 ASP 是在服務(wù)器端腳本編譯環(huán)境，使用它可以創(chuàng)建和運(yùn)行動(dòng)態(tài)、交互的 Web服務(wù)器應(yīng)用程序。通過(guò)這種環(huán)境，用戶可以創(chuàng)建和運(yùn)行動(dòng)態(tài)的交互式 Web 服務(wù)器應(yīng)用程序，如交互 式動(dòng)態(tài)網(wǎng)頁(yè)，包括使用HTML 表單收集和處理信息、上傳與下載等。而隨著 Web技術(shù)的發(fā)展，用戶希望能夠看到根據(jù)要求而動(dòng)態(tài)生成的主頁(yè)，例如響應(yīng)用戶查詢數(shù)據(jù)庫(kù)的要求而生成報(bào)表等。當(dāng)同時(shí)有很多請(qǐng)求時(shí)，程序擠占系統(tǒng)資源，造成效率低下。 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ī)用戶即可掌握并使用它。 超級(jí)管理員可任命管理員，可以添加管理賬號(hào)且能對(duì)所有管理員賬號(hào)信息等資料進(jìn)行修改。 ④、 注冊(cè) 用戶 登陸 后，能對(duì)自已的賬號(hào)信息等資料進(jìn)行修改。 （二）、性能 需求 硬件需求： cpu :intel pentiumII 或等效處理器、 300MHZ 或更高 內(nèi)存： 96MB 可用內(nèi)存 硬盤： 275MB 以上可用磁盤空間 顯示器：可達(dá) 800 600 像素的 256色顯示器或更高 軟件需求：操作系統(tǒng) windouw 98/2021/NT(或更高版本 ) 瀏覽器： scape 或 microsoft inter 或更高本 。 （ 2） 產(chǎn)品管理 包括對(duì)產(chǎn)品的添加與修改。查看有無(wú)該用戶 dim db,strsql,rs set db=() dbq=amp。 Where user_name=39。 And password=39。 Set rs=(strSql) If not and not Then 39。39。 3）整個(gè)版面不是很整齊，以后改進(jìn)。 第六章、參考文獻(xiàn) 1.《 ASP 信息化系統(tǒng)建設(shè)案例 》 人民郵電出版社 陳嫻、雒海濤編著 2.《 Dreamweaver8+ASP 動(dòng)態(tài)網(wǎng)站開(kāi)發(fā) 》 電子工業(yè)出版社 載一波編著 3.《 網(wǎng)站全程設(shè)計(jì)技術(shù) 》 清華大學(xué)出版社 姜韡 、 吳濤編著 4.《 網(wǎng)站設(shè)計(jì)與開(kāi)發(fā) 》 機(jī)械工業(yè)出版社 楊曉鐘 編著 致 謝 在這里我非常感謝我的指導(dǎo)老師劉利東，在經(jīng)過(guò)他的教育下，使我在此完成我的 畢業(yè)設(shè)計(jì)，在此特向劉老師致謝！謝謝劉利東老師孜孜不倦的教導(dǎo)，以及對(duì)我們的重視，讓我能順利地完成這個(gè)課程設(shè)計(jì)。期待再見(jiàn)！ 我知道在這次的課程設(shè)計(jì)中自已有許多的欠缺，在以后的日子中，我一定得更加嚴(yán)格要求自己，改正缺點(diǎn)，不斷努力，不斷進(jìn)步。 dim strsql,user_name ,Password ,realname ,mobi,name name=(user_name) 39。 39。amp。amp。amp。amp。amp。39。 dim strsql,Password ,id Password=(Password) StrSql=Update user Set Password=39。Where user_name=39。 (strsql) else 請(qǐng)將所有信息填寫(xiě)完整 A HREF=39。driver={microsoft access driver (*.mdb)}。 39。amp。amp。39。 dim strsql,user_name ,Password,name name=(user_name) strSql=select * from users Where user_name=39。 Set rs=(strSql) If not then 對(duì)不起，用戶名已被注冊(cè)，請(qǐng) a href=39。user_nameamp。Passwordamp。重新注冊(cè) /a end if % ： %=True% % 39。 strSql=Select user_name,password,user_type From users strSql=strSql amp。 39。 39。如果沒(méi)有記錄，表示沒(méi)有該用戶，請(qǐng)給出提示信息 對(duì)不起，用戶名或密碼有誤，請(qǐng) a href=39。()amp。 amp。 amp。如果有記錄，表示有該用戶，則將用戶名和用戶類型保存到 Session 中 Session(user_name)=rs(user_name) Session(password)=rs(password) 39。返回首頁(yè) /a重新登錄 End If % 超級(jí)管理員后臺(tái)界面（ ） %LANGUAGE=VBSCRIPT CODEPAGE=936% !include file=Connections/ % 39。 boolean to abort record edit MM_abortEdit = false 39。39。 39。 ? amp。 End If End If End If % % 39。 escape quotes MM_formVal = 39。39。 , MM_dbValues = MM_dbValues amp。 MM_editTable amp。 MM_dbValues amp。39。 set the number of rows displayed on this page If (rs1_numRows 0) Then rs1_numRows = rs1_total Elseif (rs1_numRows = 0) Then rs1_numRows = 1 End If 39。t know the record count, manually count them If (rs1_total = 1) Then 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。 or 39。 if we have a record count, check if we are past the end of the recordset If (MM_rsCount 1) Then If (MM_offset = MM_rsCount Or MM_offset = 1) Then 39。 set MM_offset to the last possible record End If End If % % 39。 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 = MM_offset + 1 rs1_last = MM_offset + MM_size If (MM_rsCount 1) Then If (rs1_first MM_rsCount) Then rs1_first = MM_rsCount End If If (rs1_last MM_rsCount) Then rs1_last = MM_rsCount End If End If 39。index= If (MM_paramName ) Then MM_removeList = MM_removeList amp。 = End If MM_keepURL= MM_keepForm= MM_keepBoth= MM_keepNone= 39。 = If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL amp。 amp。 ((MM_item)) End If Next 39。 from each of the strings MM_keepBoth = MM_keepURL amp。 *** Move To Record: set the strings for the first, last, next, and previous links Dim MM_keepMove Dim MM_moveParam Dim MM_moveFirst Dim MM_moveLast Dim MM_moveNext Dim MM_movePrev Dim MM_urlStr Dim MM_paramList Dim MM_paramIndex Dim MM_nextParam MM_keepMove = MM_keepBoth MM_moveParam = index 39。) MM_keepMove = For MM_paramIndex = 0 To UBound(MM_paramList) MM_nextParam = Left(MM_paramList(MM_paramIndex), InStr(MM_paramList(MM_paramIndex),=) 1) If (StrComp(MM_nextParam,MM_moveParam,1) 0) Then MM_keepMove = MM_keepMove amp。 set the strings for the move to links If (MM_keepMove ) Then MM_keepMove = (MM_keepMove) amp。 MM_keepMove amp。 1 MM_moveNext = MM_urlStr amp。 charset=gb2312 / title無(wú)標(biāo)題文檔 /title style typ