' --------------------Ссылки на музеи Sub linka_OnClick If nov.Style.Visibility=show Then nov.Style.Visibility="hidden" linc.Style.Visibility=show linka.innerText="Новости" Else nov.Style.Visibility=show linc.Style.Visibility="hidden" linka.innerText="Ссылки" End If End Sub ' ----------------------Новости / Мероприятия Function NewWindow(url) Dim strFeatures Select Case url Case "Actions/grant_2009.htm" strFeatures = "top=1,left=1,width=550,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/grant_6.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Gramota_vibe.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Omsk_konferencia_2008.htm" strFeatures = "top=1,left=1,width=700,height=630, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Calehard_Rogd. podarki_2007.htm" strFeatures = "top=1,left=1,width=600,height=370, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Calehard_Sokolov_2007.htm" strFeatures = "top=1,left=1,width=600,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Predprinimat.htm" strFeatures = "top=1,left=1,width=600,height=680, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Day_5 avg2007.htm" strFeatures = "top=1,left=1,width=700,height=630, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Kolchak.htm" strFeatures = "top=1,left=1,width=470,height=470, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/seminar_izo.htm" strFeatures = "top=1,left=1,width=470,height=670, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/noch_v_musee.htm" strFeatures = "top=1,left=1,width=770,height=670, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/nashe_kulturnoe_nasledie.htm" strFeatures = "top=1,left=1,width=500,height=670, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/salehard_9.htm" strFeatures = "top=1,left=1,width=500,height=670, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Vseross_mus_sov_dec2006.htm" strFeatures = "top=1,left=1,width=500,height=670, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Seminar_13okt_2006.htm" strFeatures = "top=1,left=1,width=600,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/inf_brief.htm" strFeatures = "top=1,left=1,width=650,height=600, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/lubino.htm" strFeatures = "top=1,left=1,width=850,height=600, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/luchshiy mus rabotnik 2006.htm" strFeatures = "top=1,left=1,width=700,height=600, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/iii_vaganovskie.htm" strFeatures = "top=1,left=1,width=450,height=200, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/flot1.htm" strFeatures = "top=1,left=1,width=650,height=600, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/flot.htm" strFeatures = "top=1,left=1,width=650,height=600, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/V-M flot 2006.htm" strFeatures = "top=1,left=1,width=650,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Prezent_2 book_2006.htm" strFeatures = "top=1,left=1,width=650,height=600, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Pokrov_Yarmarka2005.htm" strFeatures = "top=1,left=1,width=650,height=600, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/IZO_dec_dialog2005.htm" strFeatures = "top=1,left=1,width=650,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/PROGECT_river of Sibir.htm" strFeatures = "top=1,left=1,width=600,height=385, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Plakat_USA.htm" strFeatures = "top=1,left=1,width=700,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/IZO_GEO.htm" strFeatures = "top=1,left=1,width=700,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/IZO_09.09.2005.htm" strFeatures = "top=1,left=1,width=650,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Intermuseum_2005.htm" strFeatures = "top=1,left=1,width=550,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Prezent_katalog.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Uch_sovet_may2005.htm" strFeatures = "top=1,left=1,width=600,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Plakat_2005.htm" strFeatures = "top=1,left=1,width=600,height=250, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Omsk_2004_5.htm" strFeatures = "top=1,left=1,width=650,height=250, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Omsk_2004_3.htm" strFeatures = "top=1,left=1,width=650,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/victori_60.htm" strFeatures = "top=1,left=1,width=650,height=590, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Omsk_2004_2.htm" strFeatures = "top=1,left=1,width=650,height=380, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Omsk_2004.htm" strFeatures = "top=1,left=1,width=650,height=380, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Tobolsk_2004.htm" strFeatures = "top=1,left=1,width=650,height=380, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Hanti_Mans_2004_2.htm" strFeatures = "top=1,left=1,width=650,height=380, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Moskva_2004.htm" strFeatures = "top=1,left=1,width=650,height=420, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Hanti_Mans_2004_1.htm" strFeatures = "top=1,left=1,width=650,height=350, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Tomsk_2004.htm" strFeatures = "top=1,left=1,width=650,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/TOKM_2004.htm" strFeatures = "top=1,left=1,width=650,height=550, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Krasnoyar2004.htm" strFeatures = "top=1,left=1,width=650,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Blagov.htm" strFeatures = "top=1,left=1,width=650,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Vrubel_collokw.htm" strFeatures = "top=1,left=1,width=650,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Vag.htm" strFeatures = "top=1,left=1,width=650,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Celle.htm" strFeatures = "top=1,left=1,width=500,height=270, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Ex_Doch.htm" strFeatures = "top=1,left=1,width=600,height=550, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/grant_Potanin.htm" strFeatures = "top=1,left=1,width=600,height=550, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/AMK.htm" strFeatures = "top=1,left=1,width=600,height=550, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Ex_sobit.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/VIII_mol_konf.htm" strFeatures = "top=1,left=1,width=600,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Ex-AGRO-TRAST.htm" strFeatures = "top=1,left=1,width=600,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Meshok-AGRO-TRAST.htm" strFeatures = "top=1,left=1,width=650,height=460, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Barnaul.htm" strFeatures = "top=1,left=1,width=600,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Konference2003.htm" strFeatures = "top=1,left=1,width=650,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Kamis.htm" strFeatures = "top=1,left=1,width=650,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/CMR_itog.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Tomsk_resh.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Tomilov_2.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Tomilov_1.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Surgut.htm" strFeatures = "top=1,left=1,width=550,height=430, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Gurnal.htm" strFeatures = "top=1,left=1,width=550,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Novosib_gal.htm" strFeatures = "top=1,left=1,width=550,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Pasha_katol.htm" strFeatures = "top=1,left=1,width=550,height=330, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Minigrafika.htm" strFeatures = "top=1,left=1,width=550,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Tomsk_2003_1.htm" strFeatures = "top=1,left=1,width=550,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Kiril_Mefod.htm" strFeatures = "top=1,left=1,width=550,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Foto_Novosib.htm" strFeatures = "top=1,left=1,width=550,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Novosib_prom.htm" strFeatures = "top=1,left=1,width=550,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/OGIK_zasedanie.htm" strFeatures = "top=1,left=1,width=650,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/OGIK_vera_vernost.htm" strFeatures = "top=1,left=1,width=600,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/OGIK_Kaleidoskop.htm" strFeatures = "top=1,left=1,width=600,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Noyab_DMC.htm" strFeatures = "top=1,left=1,width=550,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Black_white.htm" strFeatures = "top=1,left=1,width=550,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Inov_center.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Krasn_03.htm" strFeatures = "top=1,left=1,width=550,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Tomsk_2003.htm" strFeatures = "top=1,left=1,width=500,height=430, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Pavlodar_03.htm" strFeatures = "top=1,left=1,width=550,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/3_Nov_bienale.htm" strFeatures = "top=1,left=1,width=600,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Ural.htm" strFeatures = "top=1,left=1,width=600,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Tobol_2003.htm" strFeatures = "top=1,left=1,width=600,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Paradigma_VII.htm" strFeatures = "top=1,left=1,width=600,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/1_Chteniya.htm" strFeatures = "top=1,left=1,width=500,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/ADIT_2003.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Zol_gora.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/V_sib_duh.htm" strFeatures = "top=1,left=1,width=650,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Tobol_03.htm" strFeatures = "top=1,left=1,width=570,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/New_projekt.htm" strFeatures = "top=1,left=1,width=570,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Noyab_2003g.htm" strFeatures = "top=1,left=1,width=500,height=200, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Dom_Romanov.htm" strFeatures = "top=1,left=1,width=600,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Altay_II.htm" strFeatures = "top=1,left=1,width=600,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Altay_V.htm" strFeatures = "top=1,left=1,width=600,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Otkr_mir.htm" strFeatures = "top=1,left=1,width=600,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/aficha_Novosib_03.htm" strFeatures = "top=1,left=1,width=500,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Cam_Lusida.htm" strFeatures = "top=1,left=1,width=500,height=300, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Nov_igrushka.htm" strFeatures = "top=1,left=1,width=500,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/V_kongress.htm" strFeatures = "top=1,left=1,width=600,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/aficha_Novosib.htm" strFeatures = "top=1,left=1,width=500,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Konf_al_vek2003g.htm" strFeatures = "top=1,left=1,width=500,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/VII_mol_konf.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Om_kraeved.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Megaproject.htm" strFeatures = "top=1,left=1,width=650,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/New_exib.htm" strFeatures = "top=1,left=1,width=500,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/German_inf.htm" strFeatures = "top=1,left=1,width=600,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Unik_dar.htm" strFeatures = "top=1,left=1,width=480,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Irkutsk_Reshenie.htm" strFeatures = "top=1,left=1,width=500,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Art_Novosib.htm" strFeatures = "top=1,left=1,width=500,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Krasn_sept.htm" strFeatures = "top=1,left=1,width=500,height=350, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Konf_ADIT2002.htm" strFeatures = "top=1,left=1,width=400,height=310, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Int_2002.htm" strFeatures = "top=1,left=1,width=400,height=310, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/poz.htm" strFeatures = "top=1,left=1,width=400,height=310, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Slovcov_2002.htm" strFeatures = "top=1,left=1,width=550,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Koshkul.htm" strFeatures = "top=1,left=1,width=550,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Sem_men_mark.htm" strFeatures = "top=1,left=1,width=550,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Lev.htm" strFeatures = "top=1,left=1,width=550,height=470, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Fialk.htm" strFeatures = "top=1,left=1,width=550,height=470, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Sev_kvn.htm" strFeatures = "top=1,left=1,width=500,height=470, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Tomsk_conf.htm" strFeatures = "top=1,left=1,width=570,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Nauch_sov_Tomsk.htm" strFeatures = "top=1,left=1,width=550,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Hist_prir.htm" strFeatures = "top=1,left=1,width=530,height=360, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/nem_sib.htm" strFeatures = "top=1,left=1,width=530,height=410, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Ist_put.htm" strFeatures = "top=1,left=1,width=530,height=410, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Sohr_vospr.htm" strFeatures = "top=1,left=1,width=530,height=410, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Mus_fond.htm" strFeatures = "top=1,left=1,width=530,height=380, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Tar_priirt.htm" strFeatures = "top=1,left=1,width=530,height=420, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Kem_seminar.htm" strFeatures = "top=1,left=1,width=587,height=480, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Old_Om.htm" strFeatures = "top=1,left=1,width=600,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/vist_lll.htm" strFeatures = "top=1,left=1,width=650,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Melehin.htm" strFeatures = "top=1,left=1,width=605,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/koll_Usupov.htm" strFeatures = "top=1,left=1,width=605,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Vospominanie.htm" strFeatures = "top=1,left=1,width=600,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Darenie.htm" strFeatures = "top=1,left=1,width=570,height=350, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Marianov_ubily.htm" strFeatures = "top=1,left=1,width=570,height=350, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Pushkin.htm" strFeatures = "top=1,left=1,width=570,height=510, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/CMR.htm" strFeatures = "top=1,left=1,width=550,height=460, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Det_mus.htm" strFeatures = "top=1,left=1,width=550,height=460, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Mamontovka.htm" strFeatures = "top=1,left=1,width=550,height=460, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/salehard.htm" strFeatures = "top=1,left=1,width=580,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/kurgan_50.htm" strFeatures = "top=1,left=1,width=580,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/s_ezd.htm" strFeatures = "top=1,left=1,width=500,height=470, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/orugie.htm" strFeatures = "top=1,left=1,width=700,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Obr.htm" strFeatures = "top=1,left=1,width=700,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Pirat.htm" strFeatures = "top=1,left=1,width=700,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/pisanica1.htm" strFeatures = "top=1,left=1,width=700,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/katalog.htm" strFeatures = "top=1,left=1,width=700,height=280, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/novokuznetsk.htm" strFeatures = "top=1,left=1,width=700,height=300, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/biennale.htm" strFeatures = "top=1,left=1,width=700,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/kurgan.htm" strFeatures = "top=1,left=1,width=700,height=250, toolbar=no,scrollbars=no,menubar=no,location=no,directories=no" ' Северск Case "Actions/seversk_1.htm" strFeatures = "top=1,left=1,width=700,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/ADIT.htm" strFeatures = "top=1,left=1,width=700,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/dinozavr.htm" strFeatures = "top=1,left=1,width=700,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/seversk.htm" strFeatures = "top=1,left=1,width=700,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/kynst.html" strFeatures = "top=1,left=1,width=770,height=470, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/kykli.html" strFeatures = "top=1,left=1,width=770,height=300, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/rus_indiya.html" strFeatures = "top=1,left=1,width=770,height=400, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/avangard_chempion.htm" strFeatures = "top=1,left=1,width=770,height=500, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/prezent_sb8.htm" strFeatures = "top=1,left=1,width=770,height=530, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/yamal_nen.htm" strFeatures = "top=1,left=1,width=700,height=450, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/old_omsk.htm" strFeatures = "top=1,left=1,width=700,height=490, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/Decision.htm" strFeatures = "top=1,left=1,width=670,height=530, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/child_museum.htm" strFeatures = "top=1,left=1,width=670,height=530, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/sibir.htm" strFeatures = "top=1,left=1,width=670,height=530, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/hokkey.htm" strFeatures = "top=1,left=1,width=670,height=530, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/deportacia.htm" strFeatures = "top=1,left=1,width=670,height=530, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/nem.htm" strFeatures = "top=1,left=1,width=650,height=380, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/krasn.htm" strFeatures = "top=1,left=1,width=650,height=335, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/urod.htm" strFeatures = "top=1,left=1,width=600,height=300, toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/agress.htm" strFeatures = "top=1,left=1,width=600,height=250,toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/program.htm" strFeatures = "top=1,left=1,width=600,height=350,toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/inf_letter.htm" strFeatures = "top=1,left=1,width=600,height=450,toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/tret_galer.htm" strFeatures = "top=1,left=1,width=600,height=290,toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/vologda.htm" strFeatures = "top=1,left=1,width=600,height=240,toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/foto.htm" strFeatures = "top=1,left=1,width=600,height=240,toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/vlad.htm" strFeatures = "top=1,left=1,width=600,height=405,toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "NEWS/seminar.htm" strFeatures = "top=1,left=1,width=600,height=520,toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "NEWS/izvest7.htm" strFeatures = "top=1,left=1,width=600,height=200,toolbar=no,scrollbars=no,menubar=no,location=no,directories=no" Case "Actions/deport.htm" strFeatures = "top=1,left=1,width=600,height=250,toolbar=no,scrollbars=no,menubar=no,location=no,directories=no" Case "Actions/exib_seminar.htm" strFeatures = "top=1,left=1,width=600,height=280,toolbar=no,scrollbars=no,menubar=no,location=no,directories=no" Case "Actions/crossroad.htm" strFeatures = "top=1,left=1,width=600,height=230,toolbar=no,scrollbars=no,menubar=no,location=no,directories=no" Case "Actions/zelenogorsk.htm" strFeatures = "top=1,left=1,width=600,height=480,toolbar=no,scrollbars=no,menubar=no,location=no,directories=no" Case "NEWS/novosib.htm" strFeatures = "top=1,left=1,width=600,height=350,toolbar=no,scrollbars=no,menubar=no,location=no,directories=no" Case "NEWS/tomsk.htm" strFeatures = "top=1,left=1,width=600,height=350,toolbar=no,scrollbars=no,menubar=no,location=no,directories=no" Case "Actions/plakat.htm" strFeatures = "top=1,left=1,width=750,height=370,toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" Case "Actions/bienalle.htm" strFeatures = "top=1,left=1,width=750,height=350,toolbar=no,scrollbars=yes,menubar=no,location=no,directories=no" End Select objNewWindow = window.open(url, "News", strFeatures) End Function ' Выравнивание слоев по длине. Sub LayerAlign Dim s,a,b a=linc.offsetHeight b=nov.offsetHeight if a>b Then s=a Else s=b end if if s<550 Then s=550 end if gorod.Style.Height=s linc.Style.Height=s nov.Style.Height=s End Sub