<% check_security(4) %> <% sql = "SELECT * FROM tariff WHERE T_r_type = 'Single'" sqle = "SELECT * FROM tariff WHERE T_r_type = 'Executive'" sql2 = "SELECT * FROM tariff WHERE T_r_type = 'Double'" sql3 = "SELECT * FROM tariff WHERE T_r_type = 'Double_single'" sql4 = "SELECT * FROM tariff WHERE T_r_type = 'Family'" sqlsp = "SELECT * FROM tariff WHERE T_r_type = 'Single'" sqlspe = "SELECT * FROM tariff WHERE T_r_type = 'Executive'" sqlsp2 = "SELECT * FROM tariff WHERE T_r_type = 'Double'" sqlsp3 = "SELECT * FROM tariff WHERE T_r_type = 'Double_single'" sqlsp4 = "SELECT * FROM tariff WHERE T_r_type = 'Family'" sqlsp2_1 = "SELECT * FROM tariff WHERE T_r_type = 'Single'" sqlsp2_1e = "SELECT * FROM tariff WHERE T_r_type = 'Executive'" sqlsp2_2 = "SELECT * FROM tariff WHERE T_r_type = 'Double'" sqlsp2_3 = "SELECT * FROM tariff WHERE T_r_type = 'Double_single'" sqlsp2_4 = "SELECT * FROM tariff WHERE T_r_type = 'Family'" sqlsp3_1 = "SELECT * FROM tariff WHERE T_r_type = 'Single'" sqlsp3_1e = "SELECT * FROM tariff WHERE T_r_type = 'Executive'" sqlsp3_2 = "SELECT * FROM tariff WHERE T_r_type = 'Double'" sqlsp3_3 = "SELECT * FROM tariff WHERE T_r_type = 'Double_single'" sqlsp3_4 = "SELECT * FROM tariff WHERE T_r_type = 'Family'" set rs = cn.execute(sql) while not rs.eof mt_s_bb = rs("mt_bb") mt_s_dbb = rs("mt_dbb") fs_s_bb = rs("fs_bb") fs_s_dbb = rs("fs_dbb") rs.movenext Wend set rs = cn.execute(sqle) while not rs.eof mt_e_bb = rs("mt_bb") mt_e_dbb = rs("mt_dbb") fs_e_bb = rs("fs_bb") fs_e_dbb = rs("fs_dbb") rs.movenext Wend set rs = cn.execute(sql2) while not rs.eof mt_d_bb = rs("mt_bb") mt_d_dbb = rs("mt_dbb") fs_d_bb = rs("fs_bb") fs_d_dbb = rs("fs_dbb") rs.movenext Wend set rs = cn.execute(sql3) while not rs.eof mt_ds_bb = rs("mt_bb") mt_ds_dbb = rs("mt_dbb") fs_ds_bb = rs("fs_bb") fs_ds_dbb = rs("fs_dbb") rs.movenext Wend set rs = cn.execute(sql4) while not rs.eof mt_f_bb = rs("mt_bb") mt_f_dbb = rs("mt_dbb") fs_f_bb = rs("fs_bb") fs_f_dbb = rs("fs_dbb") rs.movenext Wend set rs = cn.execute(sqlsp) on error goto 0 while not rs.eof sp_dte_frm = rs("sp_dte_frm") sp_dte_to = rs("sp_dte_to") sp_mt_s_bb = rs("sp_mt_bb") sp_mt_s_dbb = rs("sp_mt_dbb") sp_fs_s_bb = rs("sp_fs_bb") sp_fs_s_dbb = rs("sp_fs_dbb") sp_nights = rs("sp_nights") sp_active = rs("sp_active") rs.movenext Wend set rs = cn.execute(sqlspe) on error goto 0 while not rs.eof sp_mt_e_bb = rs("sp_mt_bb") sp_mt_e_dbb = rs("sp_mt_dbb") sp_fs_e_bb = rs("sp_fs_bb") sp_fs_e_dbb = rs("sp_fs_dbb") rs.movenext Wend set rs = cn.execute(sqlsp2) while not rs.eof sp_mt_d_bb = rs("sp_mt_bb") sp_mt_d_dbb = rs("sp_mt_dbb") sp_fs_d_bb = rs("sp_fs_bb") sp_fs_d_dbb = rs("sp_fs_dbb") rs.movenext Wend set rs = cn.execute(sqlsp3) while not rs.eof sp_mt_ds_bb = rs("sp_mt_bb") sp_mt_ds_dbb = rs("sp_mt_dbb") sp_fs_ds_bb = rs("sp_fs_bb") sp_fs_ds_dbb = rs("sp_fs_dbb") rs.movenext Wend set rs = cn.execute(sqlsp4) while not rs.eof sp_mt_f_bb = rs("sp_mt_bb") sp_mt_f_dbb = rs("sp_mt_dbb") sp_fs_f_bb = rs("sp_fs_bb") sp_fs_f_dbb = rs("sp_fs_dbb") rs.movenext Wend set rs = cn.execute(sqlsp2_1) on error goto 0 while not rs.eof sp1_dte_frm = rs("sp1_dte_frm") sp1_dte_to = rs("sp1_dte_to") sp1_mt_s_bb = rs("sp1_mt_bb") sp1_mt_s_dbb = rs("sp1_mt_dbb") sp1_fs_s_bb = rs("sp1_fs_bb") sp1_fs_s_dbb = rs("sp1_fs_dbb") sp1_nights = rs("sp1_nights") sp1_active = rs("sp1_active") rs.movenext Wend set rs = cn.execute(sqlsp2_1e) on error goto 0 while not rs.eof sp1_mt_e_bb = rs("sp1_mt_bb") sp1_mt_e_dbb = rs("sp1_mt_dbb") sp1_fs_e_bb = rs("sp1_fs_bb") sp1_fs_e_dbb = rs("sp1_fs_dbb") rs.movenext Wend set rs = cn.execute(sqlsp2_2) while not rs.eof sp1_mt_d_bb = rs("sp1_mt_bb") sp1_mt_d_dbb = rs("sp1_mt_dbb") sp1_fs_d_bb = rs("sp1_fs_bb") sp1_fs_d_dbb = rs("sp1_fs_dbb") rs.movenext Wend set rs = cn.execute(sqlsp2_3) while not rs.eof sp1_mt_ds_bb = rs("sp1_mt_bb") sp1_mt_ds_dbb = rs("sp1_mt_dbb") sp1_fs_ds_bb = rs("sp1_fs_bb") sp1_fs_ds_dbb = rs("sp1_fs_dbb") rs.movenext Wend set rs = cn.execute(sqlsp2_4) while not rs.eof sp1_mt_f_bb = rs("sp1_mt_bb") sp1_mt_f_dbb = rs("sp1_mt_dbb") sp1_fs_f_bb = rs("sp1_fs_bb") sp1_fs_f_dbb = rs("sp1_fs_dbb") rs.movenext Wend set rs = cn.execute(sqlsp3_1) on error goto 0 while not rs.eof sp2_dte_frm = rs("sp2_dte_frm") sp2_dte_to = rs("sp2_dte_to") sp2_mt_s_bb = rs("sp2_mt_bb") sp2_mt_s_dbb = rs("sp2_mt_dbb") sp2_fs_s_bb = rs("sp2_fs_bb") sp2_fs_s_dbb = rs("sp2_fs_dbb") sp2_nights = rs("sp2_nights") sp2_active = rs("sp2_active") rs.movenext Wend set rs = cn.execute(sqlsp3_1e) on error goto 0 while not rs.eof sp2_mt_e_bb = rs("sp2_mt_bb") sp2_mt_e_dbb = rs("sp2_mt_dbb") sp2_fs_e_bb = rs("sp2_fs_bb") sp2_fs_e_dbb = rs("sp2_fs_dbb") rs.movenext Wend set rs = cn.execute(sqlsp3_2) while not rs.eof sp2_mt_d_bb = rs("sp2_mt_bb") sp2_mt_d_dbb = rs("sp2_mt_dbb") sp2_fs_d_bb = rs("sp2_fs_bb") sp2_fs_d_dbb = rs("sp2_fs_dbb") rs.movenext Wend set rs = cn.execute(sqlsp3_3) while not rs.eof sp2_mt_ds_bb = rs("sp2_mt_bb") sp2_mt_ds_dbb = rs("sp2_mt_dbb") sp2_fs_ds_bb = rs("sp2_fs_bb") sp2_fs_ds_dbb = rs("sp2_fs_dbb") rs.movenext Wend set rs = cn.execute(sqlsp3_4) while not rs.eof sp2_mt_f_bb = rs("sp2_mt_bb") sp2_mt_f_dbb = rs("sp2_mt_dbb") sp2_fs_f_bb = rs("sp2_fs_bb") sp2_fs_f_dbb = rs("sp2_fs_dbb") rs.movenext Wend sub update_standard t_id = 1 sql = "UPDATE tariff SET " & _ "mt_bb = " & to_sql(request("mt_s_bb"),"number") & ", " & _ "mt_dbb = " & to_sql(request("mt_s_dbb"),"number") & ", " & _ "fs_bb = " & to_sql(request("fs_s_bb"),"number") & ", " & _ "fs_dbb = " & to_sql(request("fs_s_dbb"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 2 sql = "UPDATE tariff SET " & _ "mt_bb = " & to_sql(request("mt_d_bb"),"number") & ", " & _ "mt_dbb = " & to_sql(request("mt_d_dbb"),"number") & ", " & _ "fs_bb = " & to_sql(request("fs_d_bb"),"number") & ", " & _ "fs_dbb = " & to_sql(request("fs_d_dbb"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 6 sql = "UPDATE tariff SET " & _ "mt_bb = " & to_sql(request("mt_ds_bb"),"number") & ", " & _ "mt_dbb = " & to_sql(request("mt_ds_dbb"),"number") & ", " & _ "fs_bb = " & to_sql(request("fs_ds_bb"),"number") & ", " & _ "fs_dbb = " & to_sql(request("fs_ds_dbb"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 5 sql = "UPDATE tariff SET " & _ "mt_bb = " & to_sql(request("mt_f_bb"),"number") & ", " & _ "mt_dbb = " & to_sql(request("mt_f_dbb"),"number") & ", " & _ "fs_bb = " & to_sql(request("fs_f_bb"),"number") & ", " & _ "fs_dbb = " & to_sql(request("fs_f_dbb"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 7 sql = "UPDATE tariff SET " & _ "mt_bb = " & to_sql(request("mt_e_bb"),"number") & ", " & _ "mt_dbb = " & to_sql(request("mt_e_dbb"),"number") & ", " & _ "fs_bb = " & to_sql(request("fs_e_bb"),"number") & ", " & _ "fs_dbb = " & to_sql(request("fs_e_dbb"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 End sub sub update_special1 t_id = 1 if sp_active = "True" then sp_active = -1 else sp_active = 0 end if sql = "UPDATE tariff SET " & _ "sp_mt_bb = " & to_sql(request("sp_mt_s_bb"),"number") & ", " & _ "sp_mt_dbb = " & to_sql(request("sp_mt_s_dbb"),"number") & ", " & _ "sp_fs_bb = " & to_sql(request("sp_fs_s_bb"),"number") & ", " & _ "sp_fs_dbb = " & to_sql(request("sp_fs_s_dbb"),"number") & ", " & _ "sp_dte_frm = " & to_sql(request("sp_dte_frm"),"date") & ", " & _ "sp_dte_to = " & to_sql(request("sp_dte_to"),"date") & ", " & _ "sp_nights = " & to_sql(request("sp_nights"),"number") & ", " & _ "sp_active = " & to_sql(request("sp_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 2 sql = "UPDATE tariff SET " & _ "sp_mt_bb = " & to_sql(request("sp_mt_d_bb"),"number") & ", " & _ "sp_mt_dbb = " & to_sql(request("sp_mt_d_dbb"),"number") & ", " & _ "sp_fs_bb = " & to_sql(request("sp_fs_d_bb"),"number") & ", " & _ "sp_fs_dbb = " & to_sql(request("sp_fs_d_dbb"),"number") & ", " & _ "sp_dte_frm = " & to_sql(request("sp_dte_frm"),"date") & ", " & _ "sp_dte_to = " & to_sql(request("sp_dte_to"),"date") & ", " & _ "sp_nights = " & to_sql(request("sp_nights"),"number") & ", " & _ "sp_active = " & to_sql(request("sp_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 6 sql = "UPDATE tariff SET " & _ "sp_mt_bb = " & to_sql(request("sp_mt_ds_bb"),"number") & ", " & _ "sp_mt_dbb = " & to_sql(request("sp_mt_ds_dbb"),"number") & ", " & _ "sp_fs_bb = " & to_sql(request("sp_fs_ds_bb"),"number") & ", " & _ "sp_fs_dbb = " & to_sql(request("sp_fs_ds_dbb"),"number") & ", " & _ "sp_dte_frm = " & to_sql(request("sp_dte_frm"),"date") & ", " & _ "sp_dte_to = " & to_sql(request("sp_dte_to"),"date") & ", " & _ "sp_nights = " & to_sql(request("sp_nights"),"number") & ", " & _ "sp_active = " & to_sql(request("sp_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 5 sql = "UPDATE tariff SET " & _ "sp_mt_bb = " & to_sql(request("sp_mt_f_bb"),"number") & ", " & _ "sp_mt_dbb = " & to_sql(request("sp_mt_f_dbb"),"number") & ", " & _ "sp_fs_bb = " & to_sql(request("sp_fs_f_bb"),"number") & ", " & _ "sp_fs_dbb = " & to_sql(request("sp_fs_f_dbb"),"number") & ", " & _ "sp_dte_frm = " & to_sql(request("sp_dte_frm"),"date") & ", " & _ "sp_dte_to = " & to_sql(request("sp_dte_to"),"date") & ", " & _ "sp_nights = " & to_sql(request("sp_nights"),"number") & ", " & _ "sp_active = " & to_sql(request("sp_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 7 sql = "UPDATE tariff SET " & _ "sp_mt_bb = " & to_sql(request("sp_mt_e_bb"),"number") & ", " & _ "sp_mt_dbb = " & to_sql(request("sp_mt_e_dbb"),"number") & ", " & _ "sp_fs_bb = " & to_sql(request("sp_fs_e_bb"),"number") & ", " & _ "sp_fs_dbb = " & to_sql(request("sp_fs_e_dbb"),"number") & ", " & _ "sp_dte_frm = " & to_sql(request("sp_dte_frm"),"date") & ", " & _ "sp_dte_to = " & to_sql(request("sp_dte_to"),"date") & ", " & _ "sp_nights = " & to_sql(request("sp_nights"),"number") & ", " & _ "sp_active = " & to_sql(request("sp_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 end sub sub update_special2 t_id = 1 if sp1_active = "True" then sp1_active = -1 else sp1_active = 0 end if sql = "UPDATE tariff SET " & _ "sp1_mt_bb = " & to_sql(request("sp1_mt_s_bb"),"number") & ", " & _ "sp1_mt_dbb = " & to_sql(request("sp1_mt_s_dbb"),"number") & ", " & _ "sp1_fs_bb = " & to_sql(request("sp1_fs_s_bb"),"number") & ", " & _ "sp1_fs_dbb = " & to_sql(request("sp1_fs_s_dbb"),"number") & ", " & _ "sp1_dte_frm = " & to_sql(request("sp1_dte_frm"),"date") & ", " & _ "sp1_dte_to = " & to_sql(request("sp1_dte_to"),"date") & ", " & _ "sp1_nights = " & to_sql(request("sp1_nights"),"number") & ", " & _ "sp1_active = " & to_sql(request("sp1_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 2 sql = "UPDATE tariff SET " & _ "sp1_mt_bb = " & to_sql(request("sp1_mt_d_bb"),"number") & ", " & _ "sp1_mt_dbb = " & to_sql(request("sp1_mt_d_dbb"),"number") & ", " & _ "sp1_fs_bb = " & to_sql(request("sp1_fs_d_bb"),"number") & ", " & _ "sp1_fs_dbb = " & to_sql(request("sp1_fs_d_dbb"),"number") & ", " & _ "sp1_dte_frm = " & to_sql(request("sp1_dte_frm"),"date") & ", " & _ "sp1_dte_to = " & to_sql(request("sp1_dte_to"),"date") & ", " & _ "sp1_nights = " & to_sql(request("sp1_nights"),"number") & ", " & _ "sp1_active = " & to_sql(request("sp1_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 6 sql = "UPDATE tariff SET " & _ "sp1_mt_bb = " & to_sql(request("sp1_mt_ds_bb"),"number") & ", " & _ "sp1_mt_dbb = " & to_sql(request("sp1_mt_ds_dbb"),"number") & ", " & _ "sp1_fs_bb = " & to_sql(request("sp1_fs_ds_bb"),"number") & ", " & _ "sp1_fs_dbb = " & to_sql(request("sp1_fs_ds_dbb"),"number") & ", " & _ "sp1_dte_frm = " & to_sql(request("sp1_dte_frm"),"date") & ", " & _ "sp1_dte_to = " & to_sql(request("sp1_dte_to"),"date") & ", " & _ "sp1_nights = " & to_sql(request("sp1_nights"),"number") & ", " & _ "sp1_active = " & to_sql(request("sp1_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 5 sql = "UPDATE tariff SET " & _ "sp1_mt_bb = " & to_sql(request("sp1_mt_f_bb"),"number") & ", " & _ "sp1_mt_dbb = " & to_sql(request("sp1_mt_f_dbb"),"number") & ", " & _ "sp1_fs_bb = " & to_sql(request("sp1_fs_f_bb"),"number") & ", " & _ "sp1_fs_dbb = " & to_sql(request("sp1_fs_f_dbb"),"number") & ", " & _ "sp1_dte_frm = " & to_sql(request("sp1_dte_frm"),"date") & ", " & _ "sp1_dte_to = " & to_sql(request("sp1_dte_to"),"date") & ", " & _ "sp1_nights = " & to_sql(request("sp1_nights"),"number") & ", " & _ "sp1_active = " & to_sql(request("sp1_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 7 sql = "UPDATE tariff SET " & _ "sp1_mt_bb = " & to_sql(request("sp1_mt_e_bb"),"number") & ", " & _ "sp1_mt_dbb = " & to_sql(request("sp1_mt_e_dbb"),"number") & ", " & _ "sp1_fs_bb = " & to_sql(request("sp1_fs_e_bb"),"number") & ", " & _ "sp1_fs_dbb = " & to_sql(request("sp1_fs_e_dbb"),"number") & ", " & _ "sp1_dte_frm = " & to_sql(request("sp1_dte_frm"),"date") & ", " & _ "sp1_dte_to = " & to_sql(request("sp1_dte_to"),"date") & ", " & _ "sp1_nights = " & to_sql(request("sp1_nights"),"number") & ", " & _ "sp1_active = " & to_sql(request("sp1_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 End sub sub update_special3 t_id = 1 if sp2_active = "True" then sp2_active = -1 else sp2_active = 0 end if sql = "UPDATE tariff SET " & _ "sp2_mt_bb = " & to_sql(request("sp2_mt_s_bb"),"number") & ", " & _ "sp2_mt_dbb = " & to_sql(request("sp2_mt_s_dbb"),"number") & ", " & _ "sp2_fs_bb = " & to_sql(request("sp2_fs_s_bb"),"number") & ", " & _ "sp2_fs_dbb = " & to_sql(request("sp2_fs_s_dbb"),"number") & ", " & _ "sp2_dte_frm = " & to_sql(request("sp2_dte_frm"),"date") & ", " & _ "sp2_dte_to = " & to_sql(request("sp2_dte_to"),"date") & ", " & _ "sp2_nights = " & to_sql(request("sp2_nights"),"number") & ", " & _ "sp2_active = " & to_sql(request("sp2_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 2 sql = "UPDATE tariff SET " & _ "sp2_mt_bb = " & to_sql(request("sp2_mt_d_bb"),"number") & ", " & _ "sp2_mt_dbb = " & to_sql(request("sp2_mt_d_dbb"),"number") & ", " & _ "sp2_fs_bb = " & to_sql(request("sp2_fs_d_bb"),"number") & ", " & _ "sp2_fs_dbb = " & to_sql(request("sp2_fs_d_dbb"),"number") & ", " & _ "sp2_dte_frm = " & to_sql(request("sp2_dte_frm"),"date") & ", " & _ "sp2_dte_to = " & to_sql(request("sp2_dte_to"),"date") & ", " & _ "sp2_nights = " & to_sql(request("sp2_nights"),"number") & ", " & _ "sp2_active = " & to_sql(request("sp2_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 6 sql = "UPDATE tariff SET " & _ "sp2_mt_bb = " & to_sql(request("sp2_mt_ds_bb"),"number") & ", " & _ "sp2_mt_dbb = " & to_sql(request("sp2_mt_ds_dbb"),"number") & ", " & _ "sp2_fs_bb = " & to_sql(request("sp2_fs_ds_bb"),"number") & ", " & _ "sp2_fs_dbb = " & to_sql(request("sp2_fs_ds_dbb"),"number") & ", " & _ "sp2_dte_frm = " & to_sql(request("sp2_dte_frm"),"date") & ", " & _ "sp2_dte_to = " & to_sql(request("sp2_dte_to"),"date") & ", " & _ "sp2_nights = " & to_sql(request("sp2_nights"),"number") & ", " & _ "sp2_active = " & to_sql(request("sp2_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 5 sql = "UPDATE tariff SET " & _ "sp2_mt_bb = " & to_sql(request("sp2_mt_f_bb"),"number") & ", " & _ "sp2_mt_dbb = " & to_sql(request("sp2_mt_f_dbb"),"number") & ", " & _ "sp2_fs_bb = " & to_sql(request("sp2_fs_f_bb"),"number") & ", " & _ "sp2_fs_dbb = " & to_sql(request("sp2_fs_f_dbb"),"number") & ", " & _ "sp2_dte_frm = " & to_sql(request("sp2_dte_frm"),"date") & ", " & _ "sp2_dte_to = " & to_sql(request("sp2_dte_to"),"date") & ", " & _ "sp2_nights = " & to_sql(request("sp2_nights"),"number") & ", " & _ "sp2_active = " & to_sql(request("sp2_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 t_id = 7 sql = "UPDATE tariff SET " & _ "sp2_mt_bb = " & to_sql(request("sp2_mt_e_bb"),"number") & ", " & _ "sp2_mt_dbb = " & to_sql(request("sp2_mt_e_dbb"),"number") & ", " & _ "sp2_fs_bb = " & to_sql(request("sp2_fs_e_bb"),"number") & ", " & _ "sp2_fs_dbb = " & to_sql(request("sp2_fs_e_dbb"),"number") & ", " & _ "sp2_dte_frm = " & to_sql(request("sp2_dte_frm"),"date") & ", " & _ "sp2_dte_to = " & to_sql(request("sp2_dte_to"),"date") & ", " & _ "sp2_nights = " & to_sql(request("sp2_nights"),"number") & ", " & _ "sp2_active = " & to_sql(request("sp2_active"),"number") & " WHERE " & _ "t_id = " & t_id & "" on error resume next cn.execute(sql) if err.number <> 0 then b_error = true error_list.add "db_update_edit_Users" & err.Number ,"The database update failed. " & err.Description else end if on error goto 0 End sub action = lcase(request("action")) ':: handle the action select case action case "update_standard" ' request form data and update an existing database record update_standard response.redirect ("tarif_admin.asp") case "update_special1" ' request form data and update an existing database record update_special1 response.redirect ("tarif_admin.asp") case "update_special2" ' request form data and update an existing database record update_special2 response.redirect ("tarif_admin.asp") case "update_special3" ' request form data and update an existing database record update_special3 response.redirect ("tarif_admin.asp") end select %> Queensgate Hotel Tariffs - Administration <% display_errs display_msg %>

The Queensgate Hotel

Tariff Manager

Welcome to the Tariff manager. From here you can update the rack rate tariff, special offer tariffs, and activate and deactivate the 3 special offer tariffs as required.

To update a tariff make the required change in the relevant box(es) in the relevant tariff section and then click the "Save Changes" Button.

To make a special room rate unavailable in a special offer enter a 0 value.
To remove a "Minimum stay .. nights" in an offer enter a 0 value.

Note that for a special offer tariff to activated to the tariff page on the website it MUST be activated. if the Activate/Deactivate check box is ticked the tariff is ACTIVE on the website. If un-ticked the tariff is NOT ACTIVE on the website.

Tariffs

Standard Room rates (Rack Rate) <%=Year(Now)%>

Monday - Friday

Saturday - Sunday

Bed & Breakfast

Dinner, Bed and Breakfast

Bed & Breakfast

Dinner, Bed and Breakfast

Single

Executive

Double / Twin

Family

Double (as Single)

 

 

Special Offer Rates from   to  

Minimum stay nights.            Activate / Deactivate Offer: <%if sp_active = True then%> <%else%> <%end if%>

Single

Executive

Double / Twin

Family

Double (as Single)

 

 

Special Offer Rates from   to  

Minimum stay nights.            Activate / Deactivate Offer:  <%if sp1_active = True then%> <%else%> <%end if%>

Single

Executive

Double / Twin

Family

Double (as Single)

 

 

Special Offer Rates from   to  

Minimum stay nights.            Activate / Deactivate Offer: <%if sp2_active = True then%> <%else%> <%end if%>

Single

Executive

Double / Twin

Family

Double (as Single)