【正文】 b Edit() % % Set Rs = () Sql=Select * From words Where 編號(hào) =amp。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。管理員登陸接口 酒店預(yù)定畢業(yè)論文 % % Sub Admin_Login() % br table width=760 border=0 cellspacing=1 cellpadding=4 align=center form name=reply method=post action= tr td colspan=2 align=center管理登錄 /td /tr tr td align=right valign=top width=105 用戶名 ： /td td width=226 input type=text name=username class=input1 /td /tr tr td align=right valign=top width=105 密 碼 ： /td td width=226 input type=password name=password class=input1 input type=hidden name=action_e value=admin /td /tr tr align=center td colspan=2 input type=submit name=Submit32 value= class=b /td /tr /form /table 酒店預(yù)定畢業(yè)論文 br % End Sub% % 39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。id=%=Rs(id)%【編輯】 /a % End If % 酒店預(yù)定畢業(yè)論文 /td /tr /table table width=760 border=0 cellspacing=0 cellpadding=0 align=center tr td height=16 background=images//td /tr /table % i=i+1 loop Set Rs = Nothing % table width=760 border=0 cellspacing=1 cellpadding=4 align=center tr td align=right height=20共有 %=TotalRecord%條預(yù)訂信息 分頁 % For m = 1 To PageCount % [a href=?page=%=m%%=m%/a] % Next % /td td align=right /td /tr /table % End Sub % % 39。每頁顯示預(yù)訂的數(shù)目 PageSize = 酒店預(yù)定畢業(yè)論文 PageCount= If page= Then = 1 Else = page End If % table width=499 border=0 cellspacing=1 cellpadding=4 align=center tr /tr /table table width=499 border=0 cellspacing=0 cellpadding=0 align=center tr tdp align=centerimg src=IMAGES/ width=470 height=1/td/p /tr /table br % do while i PageSize And not % table width=760 border=0 cellspacing=1 cellpadding=4 align=center style=tablelayout:fixed。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。主程序 Select Case action_e 酒店預(yù)定畢業(yè)論文 Case Case Add_New ‘添加客房預(yù)定的信息 Call Add_New_Execute() 調(diào)用客房預(yù)訂的函數(shù) Case reply ‘ 客房預(yù)訂的回復(fù) Call Reply_Execute() 調(diào)用客房預(yù)訂的函數(shù) Case admin ‘ 管理員登錄 Call Admin_Login_Execute() 調(diào)用管理員登錄模塊 Case EditPWD 修改當(dāng)前操作員密碼 Call EditPWD_Execute() 調(diào)用修改當(dāng)前操作員密碼模塊 Case Edit 修改預(yù)訂信息 Call Edit_Execute() 調(diào)用修改預(yù)訂信息 End Select Call Main_Menu() 進(jìn)入管理員調(diào)用主菜單 Select Case action ‘ 選擇調(diào)用情況 Case UbbHelp Call UbbHelp() Case Admin_Login 管理員登錄 Call Admin_Login() 調(diào)用管理員登錄模塊 Case Exit 如果選擇退出管理員登錄 Call Exit_Admin() 調(diào)用了退出管理員登錄 Call View_Words() 調(diào)用瀏覽預(yù)訂信息瀏覽模塊 Case Call View_Words() 調(diào)用瀏覽預(yù)訂信息瀏覽模塊 Case Add_New 如果是“添加預(yù)訂信息” Call Add_New() 調(diào)用“添加預(yù)訂信息” Case reply 如果是回復(fù)預(yù)訂信息 Call Reply() 調(diào)用回復(fù)預(yù)訂信息模塊 Case View_Words如果是瀏覽預(yù)訂信息 Call View_Words()調(diào)用瀏覽預(yù)訂信息模塊 Case Delete如果是刪除預(yù)訂信息 Call Delete() 調(diào)用刪除預(yù)訂信息模塊 Call View_Words() 調(diào)用預(yù)訂瀏覽信息模塊 Case EditPWD 如果是是修改密碼 Call EditPWD() 調(diào)用修改密碼模塊 Case Edit 如果是編輯預(yù)訂信息 酒店預(yù)定畢業(yè)論文 Call Edit() 調(diào)用編輯預(yù)訂信息模塊 End Select Call Copyrights() 調(diào)用版權(quán)信息 % /td /tr /table HR width=95% color=000000 noShade SIZE=1 table width=760 height=43 border=0 align=center cellpadding=0 cellspacing=0 tr td align=center bgcolor=F0F0F0 height=22 font color=000000 程序設(shè)計(jì) ： 康賓 大豐廣播電視大學(xué) /font p /p /td /tr tr td background=images/ height=21 /td /tr /table/td /tr /table % 39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。39。 strongbr /strong/td /tr /table/td /tr /table/td /tr tr td height=46 valign=toptable width=760 border=0 align=center cellpadding=0 cellspacing=0 bgcolor=F0F0F0 tr td align=center valign=top class=input1 % 39。} } // /script body leftmargin=0 topmargin=0 marginwidth=0 marginheight=0 bgcolor=FFFFFF table width=760 border=0 cellpadding=0 cellspacing=0 align=center trtd width=199 align=center height=16img border=0 src=images/ width=425 height=26/tdtd width=331 align=center height=16img border=0 src=images/ width=333 height=26/td/tr /table table width=760 border=0 align=center cellpadding=0 cellspacing=0 class=boder !DWLayoutTable tr td valign=toptable width=760 border=0 cellpadding=0 cellspacing=0 align=center bgcolor=F0F0F0 !DWLayoutTable tr td width=627 height=16 align=right valign=middle background=images/strongimg border=0 src=images/ width=755 height=100/strong/td /tr tr td height=16 valign=top!DWLayoutEmptyCell /td /tr tr 酒店預(yù)定畢業(yè)論文 td height=72 v