【正文】 (該用戶名已存在！ )。 } Clear()。 ()。 } 修改密碼 模塊 修改密碼時為了安全起見，需要輸入登錄密碼 。 另外，新密碼需要輸入兩次，兩次輸入相同則修改成功，以免用戶輸入出錯而丟失密碼。 如圖 18 所示。 圖 18 修改密碼 界面 藥品管理系統(tǒng)的設計與實現 第 19 頁，共 48 頁 主要代碼如下： private void btnSave_Click(object sender, EventArgs e) { string strNew = 。 SqlConnection conn = GetConnection()。 try { if ( == ||!=) { (原密碼錯誤！ )。 } else { if ( == || == ) { (密碼不能為空！ )。 } else { if ( != ) { (兩次密碼不一致 !)。 = null。 = null。 } else { SqlCommand cmd = new SqlCommand(@update Login set pw=@pw where username=@username, conn)。 ()。 (@username, ).Value = 。 (@pw, ).Value = strNew。 ()。 (修改成功！ )。 ()。 = null。 = null。 = null。 } } } } 藥品管理系統(tǒng)的設計與實現 第 20 頁，共 48 頁 catch (Exception ex) { (點擊按鈕事件異常： \n + ())。 } } 藥品信息管理 模塊 藥品信息管理模塊可進行藥品信息的增、刪、改，存儲藥品的基本信息 ，添加藥品時編號以及拼音碼自動生成。 輸入藥品名稱后，系統(tǒng)會自動獲得由首字母組成的拼音碼。計量單位選擇框在窗體加載時會查詢藥品信息表里所有的計量單位以供選擇，用戶也可自行錄入。 查詢 選擇藥品后，如果要刪除已經入庫的商品，為了保證數據完善性，系統(tǒng)提示阻止刪除，但可以修改庫存低限。藥品信息管理模塊流程圖如圖 19 所示。 圖 19 藥品信息管理模塊 流程圖 藥品管理系統(tǒng)的設計與實現 第 21 頁，共 48 頁 藥品管理界面 如圖 20 所示。 圖 20 藥品信息管理 界面 窗體加載時會查詢顯示藥品信息表里所有的計量單位的代碼如下： SqlConnection conn = GetConnection()。 ()。 //根據數據庫里的數據綁定到計量單位選擇框 ******************** = null。 ()。 string sqlstring = @select unit from Drug group by unit。 SqlDataAdapter sda = new SqlDataAdapter(sqlstring, conn)。 DataSet ds = new DataSet()。 (ds)。 = [0]。 = unit。 = unit。 ()。 //********************************************************** 系統(tǒng)自動獲得拼音碼 的 代碼如下： //using 。//引用微軟相關類庫后會有GetFirstPinyin(string str)方法 public static string GetFirstPinyin(string str) { string r = 。 foreach (char obj in str) { 藥品管理系統(tǒng)的設計與實現 第 22 頁，共 48 頁 try{ ChineseChar chineseChar = new ChineseChar(obj)。 string t = [0].ToString()。 r += (0, 1)。} catch{r += ()。} } return r。 } private void txtName_Leave(object sender, EventArgs e) { // = ()。 = GetFirstPinyin().ToUpper()。 } 入庫登記 模塊 入庫登記是系統(tǒng)的重要組成部分。進入入庫登記窗口后，需填寫必要信息。入庫編號 、 入庫時間和操作員由系統(tǒng)提取生成 。進貨單位下拉框自動查詢顯示之前的進貨單位記錄。填寫藥品拼音碼后，則把藥品信息表里存在的相應藥品信息顯示到輔助錄入區(qū)，同時把可能的生產廠家綁定到生產廠家下拉框。填寫相關信息后，入庫總額由系統(tǒng)自動計算。 保存時利用事務處理把相關信息保存到入庫信息表以及庫存表中， 保存后如果發(fā)現信息有誤，在已入庫藥品尚未發(fā) 生業(yè)務前可以刪除相應記錄并重新錄入。 入庫登記模塊流程圖如圖 21 所示。 圖 21 入庫登記模 塊 流程圖 藥品管理系統(tǒng)的設計與實現 第 23 頁，共 48 頁 入庫登記界面 如圖 22 所示。 圖 22 入庫登記 界面 自動編號的存儲過程 proc_AutoID 如下： USE [DrugStore] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO ALTER proc [dbo].[proc_AutoID] (@newID varchar(20) output) as declare @id varchar(20) set @id=(select MAX(ID) from Ruku) if(@id is null OR substring(@id,5,8)!=substring(convert(varchar,getdate(),112),1,8)) set @id=(select 39。RKBH39。+(substring(convert(varchar,getdate(),112),1,8)+39。000039。)) set@newID=(select39。RKBH39。+(substring(convert(varchar,getdate(),112),1,8)+(select STUFF(CONVERT(int,10000+(substring(@id,13,4)+1)),1,1,39。39。)))) 藥品管理系統(tǒng)的設計與實現 第 24 頁，共 48 頁 調用存儲過程 proc_AutoID 的代碼如下： private void AutoID() { SqlConnection conn = GetConnection()。 //實例化數據庫連接類對象 ()。 //打開數據庫連接 Binddgv()。 SqlCommand sqlcmd = new SqlCommand(proc_AutoID, conn)。 //實例化SqlCommand對象 = 。 //指定執(zhí)行存儲過程 //為存儲過程添加參數 SqlParameter outValue = (@newID, , 20)。 = 。 //定義存儲過程輸出參數 ()。 //執(zhí)行存儲過程 ()。 //關閉數據庫連接 = ()。 } 點擊保存按鈕的代碼如下： string strSql = null。 Liststring strSqls = new Liststring()。 //插入到入庫表 strSql = … … 。//省略部分代碼 (strSql)。 //將執(zhí)行的 SQL語句添加到 List泛型集合中 //插入到庫存表 strSql = … … 。//省略部分代碼 (strSql)。 //將執(zhí)行的 SQL語句添加到 List泛型集合中 //如何輸入的拼音碼在藥品信息表找不到記錄，則插入到藥品信息表 string sqlstring1 = @select count(*) from Drug where pinyinma=39。 + + 39。 SqlCommand n = new SqlCommand(sqlstring1, conn)。 if ((()) == 0)//所輸入的拼音碼在藥品信息表找不到記錄 { strSql = insert into Drug(pinyinma,drugname,spec,unit,lowwarning)values(39。 + + 39。,39。 + + 39。,39。 + + 39。,39。 + + 39。, + () + )。 藥品管理系統(tǒng)的設計與實現 第 25 頁，共 48 頁 (strSql)。 } try { if ((strSqls))//調用事務 { (添加成功！ , 軟件提示 )。