【文章內(nèi)容簡介】 (G_RowNumber) //the first column get the focus (1) 刪除： //得到當(dāng)前記錄 G_RowNumber=() //將當(dāng)前記錄中的員工號取出賦值給全局變量 emp_no deleterow(dw_1,g_rownumber) int a a=MessageBox(提示 ,確實要刪除嗎 ?,Question!, YesNoCancel!, 3) if a=1 then ( Clicked!) else () end if 保存： if update(dw_1,true,false)=1 then //保存修改成功，提交修改 () mit。 messagebox(提示 !!!,數(shù)據(jù)更新成功 !!!) else //保存修改失敗，取消所作的修改 rollback。 //彈出一個對話框警告 messagebox(錯誤 !!!,數(shù)據(jù)更新失敗 !!!) end if closequery 事件如前。 退出： close(parent) 修改讀者信息界面： 添加： //insert a row in the end of dw_1 g_RowNumber=(0) //dw_1 get the focus () //到當(dāng)前行 (G_RowNumber) //the first column get the focus (1) 刪除： //得到當(dāng)前記錄 G_RowNumber=() //將當(dāng)前記錄中的員工號取出賦值給全局變量 emp_no deleterow(dw_1,g_rownumber) int a a=MessageBox(提示 ,確實要刪除嗎 ?,Question!, YesNoCancel!, 3) if a=1 then ( Clicked!) else () end if 保存： if update(dw_1,true,false)=1 then //保存修改成功，提交修改 () mit。 messagebox(提示 !!!,數(shù)據(jù)更新成功 !!!) else //保存修改失敗，取消所作的修改 rollback。 //彈出一個對話框警告 messagebox(錯誤 !!!,數(shù)據(jù)更新失敗 !!!) end if 退出： close(parent) 添加讀者信息界面： 前一條： //定義參數(shù)當(dāng)前行行數(shù) integer row_current //數(shù)據(jù)窗口向前滾動一條記錄 row_current=() //如果已經(jīng)到達第一條記錄，則彈出一個對話框警告 if row_current=1 then MessageBox(警告 ,已經(jīng)是最前一條記錄 ) end if 后一條： //定義參數(shù) 表的總行數(shù) integer row_count //定義參數(shù) 當(dāng)前行 integer row_current //數(shù)據(jù)窗口向后滾動一條紀(jì)錄 row_current=() //得到表的總行數(shù) row_count=() //判斷是否是最后一條記錄 if row_current= row_count then MessageBox(警告 ,已經(jīng)是最后一條記錄 ) end if 保存： if update(dw_1,true,false)=1 then //保存修改成功，提交修改 () mit。 messagebox(提示 !!!,數(shù)據(jù)更新成功 !!!) else //保存修改失敗，取消所作的修改 rollback。 //彈出一個對話框警告 messagebox(錯誤 !!!,數(shù)據(jù)更新失敗 !!!) end if 添加： //insert a row in the end of dw_1 g_RowNumber=(0) //dw_1 get the focus () //到當(dāng)前行 (G_RowNumber) //the first column get the focus (1) 刪除： //得到當(dāng)前記錄 G_RowNumber=() //將當(dāng)前記錄中的員工號取出賦值給全局變量 emp_no deleterow(dw_1,g_rownumber) int a a=MessageBox(提示 ,確實要刪除嗎 ?,Question!, YesNoCancel!, 3) if a=1 then ( Clicked!) else () end if 退出： //定義兩個變量 int MCount //修改后沒有保存的行數(shù) int UpdateOrNot //是否修改 //得到修改后沒有保存的行數(shù) MCount=() if MCount=0 then //沒有未保存的修改 close(w_books) elseif Mcount0 then //詢問是否保存所做的修改 UpdateOrNot=MessageBox(保存修改 ,您修改了數(shù)據(jù)窗口中的數(shù)據(jù)，現(xiàn)在是否保存 ?,Question!,YesNoCancel!) if UpdateOrNot=1 then //保存 if update(,true,false)=1 then //保存修改成功，提交修改 () mit。 else //保存修改失敗，取消所作的修改 rollback。 //彈出一個對話框 警告 messagebox(錯誤 !!!,數(shù)據(jù)保存失敗 ) end if close(w_books) elseif UpdateOrNot=2 then //不保存 rollback。 close(w_books) end if end if 修改書籍界面如下： ： 添加： //insert a row in the end of dw_1 g_RowNumber=(0) //dw_1 get the focus () //到當(dāng)前行 (G_RowNumber) //the first column get the focus (1) 刪除： //得到當(dāng)前記錄 G_RowNumber=() //將當(dāng)前記錄中的員工號取出賦值給全局變量 emp_no deleterow(dw_1,g_rownumber) int a a=MessageBox(提示 ,確實要刪除嗎 ?,Question!, YesNoCancel!, 3) if a=1 then ( Clicked!) else () end if 保存： if update(dw_1,true,false)=1 then //保存修改成功，提交修改 () mit。 messagebox(提示 !!!,數(shù)據(jù)更新成功 !!!) else //保存修改失敗，取消所作的修改 rollback。 //彈出一個對話框警告 messagebox(錯誤 !!!,數(shù)據(jù) 更新失敗 !!!) end if 退出： close(parent) 書籍查詢界面如下： 查詢： //定義參數(shù)：查詢條件綜合結(jié)果 string LookforCondition1 string LookforCondition //定義參數(shù)：要查詢的列 string lookforItem1 //定義參數(shù)：查詢的符號 string lookforHow1 //定義參數(shù)：要查詢的內(nèi)容 string lookforWhat1 //定義參數(shù)：當(dāng)前的行號 int current_row1 //定義參數(shù)：總的行數(shù) int total_row1 //定義參數(shù)：滿足條件的行號 int find_row1 //date lookforWhat1 //查詢符號的選擇 lookforHow1= //查詢子段和查詢內(nèi)容的選擇 if =書號 then lookforItem1 =bookid lookforwhat1=39。+trim()+39。 elseif =書名 then lookforItem1=bookname lookforwhat1=39。+trim()+39。 elseif =種類 then lookforItem1=booktype lookforwhat1=39。+trim()+39。 elseif =出版社 then lookforItem1=bookpub lookforwhat1=39。+trim()+39。 elseif =作者 then lookforItem1=bookauthor lookforwhat1=39。+trim()+39。 elseif =是否借出 then lookforItem1=putup lookforwhat1=39。+trim()+39。 elseif =類型 then lookforItem1=booktype lookforwhat1=39。+trim()+39。 lookforCondition1=lookforItem1+lookforHow1+lookforwhat1 elseif =登記日期 then lookforItem1=bookindate lookforwhat1= elseif =出版日期 then lookforItem1=bookpubdate lookforwhat1= elseif =價格 then lookforItem1=price lookforwhat1= end if lookforCondition1=lookforItem1+lookforHow1+lookforwhat1 //定義參數(shù)：查詢條件綜合結(jié)果 string LookforCondition2 //定義參數(shù)：要查詢的列 string lookforItem2 //定義參數(shù)：查詢的符號 string lookforHow2 //定義參數(shù)：要查詢的內(nèi)容 string lookforWhat2 string operator1,operator2,operator3 //查詢符號的選擇 lookforHow2= //查詢子段和查詢內(nèi)容的選擇 if =書號 then lookforItem2 =bookid lookforwhat2=39。+trim()+39。 elseif =書名 then lookforItem2=bookname lookforwhat2=39。+trim()+39。 elseif =種類 then lookforItem2=booktype lookforwhat2=39。+trim()+39。 elseif =出版社 then lookforItem2=bookpub lookforwhat2=39。+trim()+39。 elseif =作者 then lookforItem2=bookauthor lookforwhat2=39。+trim()+39。 elseif =是否借出 then lookforItem2=putup lookforwhat2=39。+trim()+39。 elseif =類型 then lookforItem2=booktype lookforwhat2=39。+trim()+39。 lookforCondition2=lookforItem2+lookforHow2+lookforwhat2 elseif =登記日期 then lookforItem2=bookindate