<%
' *****************************************************************************************************
' ******************************** PROJEKTRELEVEVANTE GLOBALE VARIABLEN *******************************
' *****************************************************************************************************
' GLOBALS
anc_index = "/index.htm"
anc_popup = "/235.htm"
anc_popup_galerie = "/popup_galerie.htm"
anc_slh_termine = "/veranstaltungen.htm"
new_ressorts = "20070903"
' REGISTRIERUNGEN
anc_newsletter_register = "/abonnements.htm"
anc_newsletter_edit = "/11014.htm"
anc_presseportal_register = "/11951.htm"
' NAVIGATION PLUGIN
nav_parser_topnavigation = "PlugIns\NavPluginSaarland\parser-topnavigation.asp"
nav_parser_breadcrumb = "PlugIns\NavPluginSaarland\parser-breadcrumb.asp"
nav_parser_contentnavigation = "PlugIns\NavPluginSaarland\parser-contentnavigation.asp"
contactbox_count = "0"
' PATHS
rdls_server_path = "http://www.saarland.de"
rdls_image_path = "" ' "/cps/rde/xbcr/saarland"
rdls_file_path = ""
rdls_image_path_newsletter = rdls_server_path ' & "/cps/rde/xbcr/saarland"
rdls_file_path_newsletter = "/cps/rde/xchg/SID-3E724395-2AD64389/saarland"
anc_js_flashmovie = rdls_image_path & "/files/js_flashmovie.js"
anc_js_panorama = rdls_image_path & "/files/js_panorama.js"
anc_xml_themenportale = "/themenportale.xml"
etracker_id = "YYmduV"
id_portal_fr = "11637"
anc_portal_fr = "/francais.htm"
id_portal_en = "11640"
anc_portal_en = "/english.htm"
id_portal_bbb = "34340"
anc_portal_bbb = "/bildung_baut_bruecken-formation_sans_frontieres.htm"
id_portal_bbb_de = "34341"
anc_portal_bbb_de = "/34341.htm"
id_portal_bbb_fr = "34342"
anc_portal_bbb_fr = "/34342.htm"
' *****************************************************************************************************
' ******************************** PROJEKTRELEVEVANTE FUNKTIONEN **************************************
' *****************************************************************************************************
FUNCTION isLiveserver()
IF "" = "" THEN
isLiveserver= true
ELSE
isLiveserver= false
END IF
END FUNCTION
FUNCTION RQLQuery(Query)
SET objData = Server.CreateObject("RDCMSAsp.RDPageData")
objData.XmlServerClassName = "RDCMSServer.XmlServer"
RQLQuery = objData.ServerExecuteXml(Query, sError)
IF sError <> "" THEN
Response.write "" & vbCrLF
END IF
SET objData = NOTHING
END FUNCTION
FUNCTION getWeekDayFromASPDate(asp_date)
num_day = DatePart("W", asp_date, VBMonday)
IF num_day = 1 THEN
getWeekDayFromASPDate = "Montag"
ELSEIF num_day = 2 THEN
getWeekDayFromASPDate = "Dienstag"
ELSEIF num_day = 3 THEN
getWeekDayFromASPDate = "Mittwoch"
ELSEIF num_day = 4 THEN
getWeekDayFromASPDate = "Donnerstag"
ELSEIF num_day = 5 THEN
getWeekDayFromASPDate = "Freitag"
ELSEIF num_day = 6 THEN
getWeekDayFromASPDate = "Samstag"
ELSEIF num_day = 7 THEN
getWeekDayFromASPDate = "Sonntag"
ELSE
getWeekDayFromASPDate = ""
END IF
END FUNCTION
FUNCTION getDayFromDate(string)
DIM arr
arr = Split(string, ",")
getDayFromDate = arr(0)
END FUNCTION
FUNCTION getDayMonthFromDate(string)
DIM arr
arr = Split(string, ".")
getDayMonthFromDate = arr(0) & "." & arr(1) & "."
END FUNCTION
FUNCTION getYearFromDate(string)
DIM arr
arr = Split(string, ".")
getYearFromDate = arr(2)
END FUNCTION
FUNCTION getTrimmedDate(string)
DIM arr
arr = Split(string, ".")
getTrimmedDate = arr(0) & "." & arr(1) & "." & Right(arr(2),2)
END FUNCTION
FUNCTION getSortDate(string)
DIM arr
arr = Split(string, ".")
IF UBOUND(arr) = 2 THEN
getSortDate = arr(2) & arr(1) & arr(0)
ELSE
getSortDate = ""
END IF
END FUNCTION
FUNCTION getSortTime(string)
DIM arr
arr = Split(string, ":")
IF UBOUND(arr) = 1 THEN
getSortTime = arr(0) & arr(1)
ELSE
getSortTime = "0000"
END IF
END FUNCTION
FUNCTION getFileExtension(string)
DIM arr
arr = Split(string, ".")
num_parts = UBOUND(arr)
getFileExtension = UCASE(arr(num_parts))
END FUNCTION
FUNCTION getOneToYes(string)
IF (string = 1) THEN
getOneToYes = "ja"
ELSE
getOneToYes = "nein"
END IF
END FUNCTION
FUNCTION getBreadcrumbElement(string,pos)
DIM arr
arr = Split(string, ",")
IF (UBOUND(arr) >= pos) THEN
getBreadcrumbElement = arr(pos)
ELSE
getBreadcrumbElement = ""
END IF
END FUNCTION
FUNCTION getKeywordList(string)
DIM arr, str
arr = Split(string, ";")
FOR EACH i IN arr
IF (instr(1, i, "_") = 0) THEN
Response.write("
" & i & "
")
END IF
NEXT
END FUNCTION
FUNCTION leading_zero_func(zahl)
IF zahl < 10 THEN
leading_zero_func = "0" & zahl
ELSE
leading_zero_func = zahl
END IF
END FUNCTION
' #################### old logo ##################
FUNCTION getTextFromOldSign(string,page_date)
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /ministerium_justiz.htm
IF (string = "MINISTERIUM_2009_01") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerium der Justiz"
END IF
ELSE
getTextFromOldSign = "Ministerium der Justiz"
END IF
ELSE
getTextFromOldSign = ""
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /ministerium_inneres_europaangelegenheiten.htm
IF (string = "MINISTERIUM_2009_02") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF (" Ministerium für Inneres und Europaangelegenheiten" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = " Ministerium für Inneres und Europaangelegenheiten"
ELSE
getTextFromOldSign = "Ministerium für Inneres, Kultur und Europa"
END IF
ELSE
getTextFromOldSign = "Ministerium für Inneres, Kultur und Europa"
END IF
ELSE
getTextFromOldSign = ""
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /ministerium_arbeit_familie_praevention_soziales_sport.htm
IF (string = "MINISTERIUM_2009_03") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerium für Arbeit, Familie, Prävention, Soziales und Sport"
END IF
ELSE
getTextFromOldSign = "Ministerium für Arbeit, Familie, Prävention, Soziales und Sport"
END IF
ELSE
getTextFromOldSign = ""
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /ministerium_wirtschaft_wissenschaft.htm
IF (string = "MINISTERIUM_2009_04") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerium für Wirtschaft und Wissenschaft"
END IF
ELSE
getTextFromOldSign = "Ministerium für Wirtschaft und Wissenschaft"
END IF
ELSE
getTextFromOldSign = ""
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /ministerium_gesundheit_verbraucherschutz.htm
IF (string = "MINISTERIUM_2009_05") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerium für Gesundheit und Verbraucherschutz"
END IF
ELSE
getTextFromOldSign = "Ministerium für Gesundheit und Verbraucherschutz"
END IF
ELSE
getTextFromOldSign = ""
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /ministerium_bildung.htm
IF (string = "MINISTERIUM_2009_06") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerium für Bildung"
END IF
ELSE
getTextFromOldSign = "Ministerium für Bildung"
END IF
ELSE
getTextFromOldSign = ""
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /ministerium_umwelt_energie_verkehr.htm
IF (string = "MINISTERIUM_2009_07") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerium für Umwelt, Energie und Verkehr"
END IF
ELSE
getTextFromOldSign = "Ministerium für Umwelt, Energie und Verkehr"
END IF
ELSE
getTextFromOldSign = ""
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /staatskanzlei.htm
IF (string = "STK") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerpräsidentin und Staatskanzlei"
END IF
ELSE
getTextFromOldSign = "Ministerpräsidentin und Staatskanzlei"
END IF
ELSE
getTextFromOldSign = "Ministerpräsident und Staatskanzlei"
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /ministerium_finanzen.htm
IF (string = "MDF") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerium der Finanzen"
END IF
ELSE
getTextFromOldSign = "Ministerium der Finanzen"
END IF
ELSE
getTextFromOldSign = "Ministerium der Finanzen"
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /59970.htm
IF (string = "MWA") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerium für Wirtschaft und Wissenschaft"
END IF
ELSE
getTextFromOldSign = "Ministerium für Wirtschaft und Wissenschaft"
END IF
ELSE
getTextFromOldSign = "Ministerium für Wirtschaft und Arbeit"
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /59969.htm
IF (string = "MIJUGS") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerium für Justiz, Arbeit, Gesundheit und Soziales"
END IF
ELSE
getTextFromOldSign = "Ministerium für Justiz, Arbeit, Gesundheit und Soziales"
END IF
ELSE
getTextFromOldSign = "Ministerium für Justiz, Gesundheit und Soziales"
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /59971.htm
IF (string = "MBKW") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerium für Bildung, Familie, Frauen und Kultur"
END IF
ELSE
getTextFromOldSign = "Ministerium für Bildung, Familie, Frauen und Kultur"
END IF
ELSE
getTextFromOldSign = "Ministerium für Bildung, Kultur und Wissenschaft"
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /59972.htm
IF (string = "MIFFS") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerium für Inneres und Sport"
END IF
ELSE
getTextFromOldSign = "Ministerium für Inneres und Sport"
END IF
ELSE
getTextFromOldSign = "Ministerium für Inneres, Familie, Frauen und Sport"
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /59973.htm
IF (string = "MFU") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Ministerium für Umwelt"
END IF
ELSE
getTextFromOldSign = "Ministerium für Umwelt"
END IF
ELSE
getTextFromOldSign = "Ministerium für Umwelt"
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /mein-saarland.htm
IF (string = "SLH") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Mein Saarland "
END IF
ELSE
getTextFromOldSign = "Mein Saarland "
END IF
ELSE
getTextFromOldSign = ""
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /polizei.htm
IF (string = "POLIZEI") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Polizei"
END IF
ELSE
getTextFromOldSign = "Polizei"
END IF
ELSE
getTextFromOldSign = "Polizei"
END IF
END IF
END IF
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /statistik.htm
IF (string = "STALA") THEN
IF (string = "STALA") THEN
getTextFromOldSign = "Statistisches Amt Saarland"
ELSE
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getTextFromOldSign = ""
ELSE
getTextFromOldSign = "Statistik"
END IF
ELSE
getTextFromOldSign = "Statistik"
END IF
ELSE
getTextFromOldSign = "Statistik"
END IF
END IF
END IF
END FUNCTION
FUNCTION getImageFromOldSign(string,page_date)
date_range = "" & DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
' /ministerium_justiz.htm
IF (string = "MINISTERIUM_2009_01") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/ministerium_01_rdax_187x60.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/ministerium_01_rdax_187x60.jpg"
END IF
ELSE
getImageFromOldSign = ""
END IF
END IF
' /ministerium_inneres_europaangelegenheiten.htm
IF (string = "MINISTERIUM_2009_02") THEN
IF (date_range >= new_ressorts) THEN
IF ("/bilder/Bereichsgrafiken/ministerium_02_rdax_187x66.jpg" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = "/bilder/Bereichsgrafiken/ministerium_02_rdax_187x66.jpg"
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/ministerium_02_02_rdax_187x66.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/ministerium_02_02_rdax_187x66.jpg"
END IF
ELSE
getImageFromOldSign = ""
END IF
END IF
' /ministerium_arbeit_familie_praevention_soziales_sport.htm
IF (string = "MINISTERIUM_2009_03") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/ministerium_03_rdax_187x66.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/ministerium_03_rdax_187x66.jpg"
END IF
ELSE
getImageFromOldSign = ""
END IF
END IF
' /ministerium_wirtschaft_wissenschaft.htm
IF (string = "MINISTERIUM_2009_04") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/logo-MWW_rdax_186x66.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/logo-MWW_rdax_186x66.jpg"
END IF
ELSE
getImageFromOldSign = ""
END IF
END IF
' /ministerium_gesundheit_verbraucherschutz.htm
IF (string = "MINISTERIUM_2009_05") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/Logo_MGUV_187x66_rdax_187x66.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/Logo_MGUV_187x66_rdax_187x66.jpg"
END IF
ELSE
getImageFromOldSign = ""
END IF
END IF
' /ministerium_bildung.htm
IF (string = "MINISTERIUM_2009_06") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/ministerium_06_rdax_187x60.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/ministerium_06_rdax_187x60.jpg"
END IF
ELSE
getImageFromOldSign = ""
END IF
END IF
' /ministerium_umwelt_energie_verkehr.htm
IF (string = "MINISTERIUM_2009_07") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/ministerium_07_rdax_187x66.JPG"
END IF
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/ministerium_07_rdax_187x66.JPG"
END IF
ELSE
getImageFromOldSign = ""
END IF
END IF
' /staatskanzlei.htm
IF (string = "STK") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/ressort_ministerpraesident_staatskanzlei/logo-stk_rdax_187x60.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/ressort_ministerpraesident_staatskanzlei/logo-stk_rdax_187x60.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/ressort_ministerpraesident_staatskanzlei/logo-stk_rdax_187x60.jpg"
END IF
END IF
' /ministerium_finanzen.htm
IF (string = "MDF") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/ressort_finanzen/logo-mdf_rdax_187x59.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/ressort_finanzen/logo-mdf_rdax_187x59.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/ressort_finanzen/logo-mdf_rdax_187x59.jpg"
END IF
END IF
' /59970.htm
IF (string = "MWA") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/logo-MWW_rdax_186x66.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/logo-MWW_rdax_186x66.jpg"
END IF
ELSE
getImageFromOldSign = ""
END IF
END IF
' /59969.htm
IF (string = "MIJUGS") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/logo-MJAGS_rdax_186x66.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/logo-MJAGS_rdax_186x66.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/ressort_justiz_gesundheit_und_soziales/logo-mijugs_rdax_187x66.jpg"
END IF
END IF
' /59971.htm
IF (string = "MBKW") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/logo-MBFFK_rdax_186x66.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/logo-MBFFK_rdax_186x66.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/ressort_bildung_kultur_und_wissenschaft/logo-mbkw_rdax_187x66.jpg"
END IF
END IF
' /59972.htm
IF (string = "MIFFS") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/logo-MFIS_rdax_186x66.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/Bereichsgrafiken/logo-MFIS_rdax_186x66.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/ressort_inneres_familie_frauen_und_sport/logo-miffs_rdax_187x66.jpg"
END IF
END IF
' /59973.htm
IF (string = "MFU") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/ressort_umwelt/logo-mfu_rdax_187x59.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/ressort_umwelt/logo-mfu_rdax_187x59.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/ressort_umwelt/logo-mfu_rdax_187x59.jpg"
END IF
END IF
' /mein-saarland.htm
IF (string = "SLH") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = ""
END IF
ELSE
getImageFromOldSign = ""
END IF
ELSE
getImageFromOldSign = ""
END IF
END IF
' /polizei.htm
IF (string = "POLIZEI") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/thema_polizei/logo-polizei-saarland_rdax_187x59.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/thema_polizei/logo-polizei-saarland_rdax_187x59.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/thema_polizei/logo-polizei-saarland_rdax_187x59.jpg"
END IF
END IF
' /statistik.htm
IF (string = "STALA") THEN
IF (date_range >= new_ressorts) THEN
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
getImageFromOldSign = ""
ELSE
getImageFromOldSign = "/bilder/thema_statistik/logo-statistisches-amt_rdax_187x60.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/thema_statistik/logo-statistisches-amt_rdax_187x60.jpg"
END IF
ELSE
getImageFromOldSign = "/bilder/thema_statistik/logo-statistisches-amt_rdax_187x60.jpg"
END IF
END IF
END FUNCTION
' ##################### old logo #################
FUNCTION getTextFromSign(string)
' /ministerium_justiz.htm
IF (string = "MINISTERIUM_2009_01") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium der Justiz"
END IF
END IF
' /ministerium_inneres_europaangelegenheiten.htm
IF (string = "MINISTERIUM_2009_02") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium für Inneres, Kultur und Europa"
END IF
END IF
' /ministerium_arbeit_familie_praevention_soziales_sport.htm
IF (string = "MINISTERIUM_2009_03") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium für Arbeit, Familie, Prävention, Soziales und Sport"
END IF
END IF
' /ministerium_wirtschaft_wissenschaft.htm
IF (string = "MINISTERIUM_2009_04") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium für Wirtschaft und Wissenschaft"
END IF
END IF
' /ministerium_gesundheit_verbraucherschutz.htm
IF (string = "MINISTERIUM_2009_05") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium für Gesundheit und Verbraucherschutz"
END IF
END IF
' /ministerium_bildung.htm
IF (string = "MINISTERIUM_2009_06") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium für Bildung"
END IF
END IF
' /ministerium_umwelt_energie_verkehr.htm
IF (string = "MINISTERIUM_2009_07") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium für Umwelt, Energie und Verkehr"
END IF
END IF
' /staatskanzlei.htm
IF (string = "STK") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerpräsidentin und Staatskanzlei"
END IF
END IF
' /ministerium_finanzen.htm
IF (string = "MDF") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium der Finanzen"
END IF
END IF
' /59970.htm
IF (string = "MWA") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium für Wirtschaft und Wissenschaft"
END IF
END IF
' /59969.htm
IF (string = "MIJUGS") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium für Justiz, Arbeit, Gesundheit und Soziales"
END IF
END IF
' /59971.htm
IF (string = "MBKW") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium für Bildung, Familie, Frauen und Kultur"
END IF
END IF
' /59972.htm
IF (string = "MIFFS") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium für Inneres und Sport"
END IF
END IF
' /59973.htm
IF (string = "MFU") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Ministerium für Umwelt"
END IF
END IF
' /mein-saarland.htm
IF (string = "SLH") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Mein Saarland "
END IF
END IF
' /polizei.htm
IF (string = "POLIZEI") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Polizei"
END IF
END IF
' /statistik.htm
IF (string = "STALA") THEN
IF (string = "STALA") THEN
getTextFromSign = "Statistisches Amt Saarland"
ELSE
getTextFromSign = "Statistik"
END IF
END IF
END FUNCTION
FUNCTION getImageFromSign(string)
' /ministerium_justiz.htm
IF (string = "MINISTERIUM_2009_01") THEN
getImageFromSign = "/bilder/Bereichsgrafiken/ministerium_01_rdax_187x60.jpg"
END IF
' /ministerium_inneres_europaangelegenheiten.htm
IF (string = "MINISTERIUM_2009_02") THEN
getImageFromSign = "/bilder/Bereichsgrafiken/ministerium_02_02_rdax_187x66.jpg"
END IF
' /ministerium_arbeit_familie_praevention_soziales_sport.htm
IF (string = "MINISTERIUM_2009_03") THEN
getImageFromSign = "/bilder/Bereichsgrafiken/ministerium_03_rdax_187x66.jpg"
END IF
' /ministerium_wirtschaft_wissenschaft.htm
IF (string = "MINISTERIUM_2009_04") THEN
getImageFromSign = "/bilder/Bereichsgrafiken/logo-MWW_rdax_186x66.jpg"
END IF
' /ministerium_gesundheit_verbraucherschutz.htm
IF (string = "MINISTERIUM_2009_05") THEN
getImageFromSign = "/bilder/Bereichsgrafiken/Logo_MGUV_187x66_rdax_187x66.jpg"
END IF
' /ministerium_bildung.htm
IF (string = "MINISTERIUM_2009_06") THEN
getImageFromSign = "/bilder/Bereichsgrafiken/ministerium_06_rdax_187x60.jpg"
END IF
' /ministerium_umwelt_energie_verkehr.htm
IF (string = "MINISTERIUM_2009_07") THEN
getImageFromSign = "/bilder/Bereichsgrafiken/ministerium_07_rdax_187x66.JPG"
END IF
' /staatskanzlei.htm
IF (string = "STK") THEN
getImageFromSign = "/bilder/ressort_ministerpraesident_staatskanzlei/logo-stk_rdax_187x60.jpg"
END IF
' /ministerium_finanzen.htm
IF (string = "MDF") THEN
getImageFromSign = "/bilder/ressort_finanzen/logo-mdf_rdax_187x59.jpg"
END IF
' /59970.htm
IF (string = "MWA") THEN
getImageFromSign = "/bilder/Bereichsgrafiken/logo-MWW_rdax_186x66.jpg"
END IF
' /59969.htm
IF (string = "MIJUGS") THEN
getImageFromSign = "/bilder/Bereichsgrafiken/logo-MJAGS_rdax_186x66.jpg"
END IF
' /59971.htm
IF (string = "MBKW") THEN
getImageFromSign = "/bilder/Bereichsgrafiken/logo-MBFFK_rdax_186x66.jpg"
END IF
' /59972.htm
IF (string = "MIFFS") THEN
getImageFromSign = "/bilder/Bereichsgrafiken/logo-MFIS_rdax_186x66.jpg"
END IF
' /59973.htm
IF (string = "MFU") THEN
getImageFromSign = "/bilder/ressort_umwelt/logo-mfu_rdax_187x59.jpg"
END IF
' /mein-saarland.htm
IF (string = "SLH") THEN
getImageFromSign = ""
END IF
' /polizei.htm
IF (string = "POLIZEI") THEN
getImageFromSign = "/bilder/thema_polizei/logo-polizei-saarland_rdax_187x59.jpg"
END IF
' /statistik.htm
IF (string = "STALA") THEN
getImageFromSign = "/bilder/thema_statistik/logo-statistisches-amt_rdax_187x60.jpg"
END IF
END FUNCTION
FUNCTION getLinkFromSign(string)
IF (string = "MINISTERIUM_2009_01") THEN
IF ("" <> "1") THEN
getLinkFromSign = "/ministerium_justiz.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "MINISTERIUM_2009_02") THEN
IF ("" <> "1") THEN
getLinkFromSign = "/ministerium_inneres_europaangelegenheiten.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "MINISTERIUM_2009_03") THEN
IF ("" <> "1") THEN
getLinkFromSign = "/ministerium_arbeit_familie_praevention_soziales_sport.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "MINISTERIUM_2009_04") THEN
IF ("" <> "1") THEN
getLinkFromSign = "/ministerium_wirtschaft_wissenschaft.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "MINISTERIUM_2009_05") THEN
IF ("" <> "1") THEN
getLinkFromSign = "/ministerium_gesundheit_verbraucherschutz.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "MINISTERIUM_2009_06") THEN
IF ("" <> "1") THEN
getLinkFromSign = "/ministerium_bildung.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "MINISTERIUM_2009_07") THEN
IF ("" <> "1") THEN
getLinkFromSign = "/ministerium_umwelt_energie_verkehr.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "STK") THEN
IF ("" <> "1") THEN
getLinkFromSign = "/staatskanzlei.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "MDF") THEN
IF ("" <> "1") THEN
getLinkFromSign = "/ministerium_finanzen.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "MWA") THEN
IF ("1" <> "1") THEN
getLinkFromSign = "/59970.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "MIJUGS") THEN
IF ("1" <> "1") THEN
getLinkFromSign = "/59969.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "MBKW") THEN
IF ("1" <> "1") THEN
getLinkFromSign = "/59971.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "MIFFS") THEN
IF ("1" <> "1") THEN
getLinkFromSign = "/59972.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "MFU") THEN
IF ("1" <> "1") THEN
getLinkFromSign = "/59973.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "SLH") THEN
IF ("" <> "1") THEN
getLinkFromSign = "/mein-saarland.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "POLIZEI") THEN
IF ("" <> "1") THEN
getLinkFromSign = "/polizei.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
IF (string = "STALA") THEN
IF ("" <> "1") THEN
getLinkFromSign = "/statistik.htm"
ELSE
getLinkFromSign = ""
END IF
END IF
END FUNCTION
FUNCTION getNewsletterSendType(string)
IF (string = "0") THEN
getNewsletterSendType = "Kein Versand"
ELSE
IF (string = "1") THEN
getNewsletterSendType = "Einmalversand"
ELSE
getNewsletterSendType = "Mehrfachversand"
END IF
END IF
END FUNCTION
' *****************************************************************************************************
' ******************************** GLOBALE SEITENINFORMATIONEN ****************************************
' *****************************************************************************************************
' *******************************************************************************
' ****************** SEITENAUTOREN UND CONTENT AREAS ****************************
' *******************************************************************************
Set themennewsletter = CreateObject("Scripting.Dictionary")
themennewsletter.Add "47037", "polizei"
themennewsletter.Add "47039", "mbkw"
themennewsletter.Add "47040", "mfu"
themennewsletter.Add "47038", "statistik"
' *************** Saarland heute ********************************************
global_area_slh_path = "/mein-saarland.htm"
global_area_slh_id = "79673"
global_area_slh_headline = "Mein Saarland "
global_area_slh_logo = ""
global_area_slh_sign = UCASE("SLH")
' *************** Staatskanzlei, Ministerpräsident **************************
global_area_stk_path = "/staatskanzlei.htm"
global_area_stk_id = "95"
global_area_stk_headline = "Ministerpräsidentin und Staatskanzlei"
global_area_stk_logo = "/bilder/ressort_ministerpraesident_staatskanzlei/logo-stk_rdax_187x60.jpg"
global_area_stk_sign = UCASE("STK")
global_area_stk_style = "/css/area-ministerium-stk.css"
' *************** Ministerium 2009 01 *********************
global_area_ministerium_2009_01_path = "/ministerium_justiz.htm"
global_area_ministerium_2009_01_id = "59736"
global_area_ministerium_2009_01_headline = "Ministerium der Justiz"
global_area_ministerium_2009_01_logo = "/bilder/Bereichsgrafiken/ministerium_01_rdax_187x60.jpg"
global_area_ministerium_2009_01_sign = UCASE("MINISTERIUM_2009_01")
global_area_ministerium_2009_01_style = ""
' *************** Ministerium 2009 02 *********************
global_area_ministerium_2009_02_path = "/ministerium_inneres_europaangelegenheiten.htm"
global_area_ministerium_2009_02_id = "59738"
global_area_ministerium_2009_02_headline = "Ministerium für Inneres, Kultur und Europa"
global_area_ministerium_2009_02_logo = "/bilder/Bereichsgrafiken/ministerium_02_02_rdax_187x66.jpg"
global_area_ministerium_2009_02_sign = UCASE("MINISTERIUM_2009_02")
global_area_ministerium_2009_02_style = ""
' *************** Ministerium 2009 03 *********************
global_area_ministerium_2009_03_path = "/ministerium_arbeit_familie_praevention_soziales_sport.htm"
global_area_ministerium_2009_03_id = "59739"
global_area_ministerium_2009_03_headline = "Ministerium für Arbeit, Familie, Prävention, Soziales und Sport"
global_area_ministerium_2009_03_logo = "/bilder/Bereichsgrafiken/ministerium_03_rdax_187x66.jpg"
global_area_ministerium_2009_03_sign = UCASE("MINISTERIUM_2009_03")
global_area_ministerium_2009_03_style = ""
' *************** Ministerium 2009 04 *********************
global_area_ministerium_2009_04_path = "/ministerium_wirtschaft_wissenschaft.htm"
global_area_ministerium_2009_04_id = "59740"
global_area_ministerium_2009_04_headline = "Ministerium für Wirtschaft und Wissenschaft"
global_area_ministerium_2009_04_logo = "/bilder/Bereichsgrafiken/logo-MWW_rdax_186x66.jpg"
global_area_ministerium_2009_04_sign = UCASE("MINISTERIUM_2009_04")
global_area_ministerium_2009_04_style = ""
' *************** Ministerium 2009 05 *********************
global_area_ministerium_2009_05_path = "/ministerium_gesundheit_verbraucherschutz.htm"
global_area_ministerium_2009_05_id = "59741"
global_area_ministerium_2009_05_headline = "Ministerium für Gesundheit und Verbraucherschutz"
global_area_ministerium_2009_05_logo = "/bilder/Bereichsgrafiken/Logo_MGUV_187x66_rdax_187x66.jpg"
global_area_ministerium_2009_05_sign = UCASE("MINISTERIUM_2009_05")
global_area_ministerium_2009_05_style = ""
' *************** Ministerium 2009 06 *********************
global_area_ministerium_2009_06_path = "/ministerium_bildung.htm"
global_area_ministerium_2009_06_id = "59742"
global_area_ministerium_2009_06_headline = "Ministerium für Bildung"
global_area_ministerium_2009_06_logo = "/bilder/Bereichsgrafiken/ministerium_06_rdax_187x60.jpg"
global_area_ministerium_2009_06_sign = UCASE("MINISTERIUM_2009_06")
global_area_ministerium_2009_06_style = ""
' *************** Ministerium 2009 07 *********************
global_area_ministerium_2009_07_path = "/ministerium_umwelt_energie_verkehr.htm"
global_area_ministerium_2009_07_id = "59743"
global_area_ministerium_2009_07_headline = "Ministerium für Umwelt, Energie und Verkehr"
global_area_ministerium_2009_07_logo = "/bilder/Bereichsgrafiken/ministerium_07_rdax_187x66.JPG"
global_area_ministerium_2009_07_sign = UCASE("MINISTERIUM_2009_07")
global_area_ministerium_2009_07_style = ""
' *******************************************************************************
' Ministerien vor Regierungsumbildung 2009
' *******************************************************************************
' *************** Ministerium für Wirtschaft und Wissenschaft *********************
global_area_mwa_path = "/73.htm"
global_area_mwa_id = "73"
global_area_mwa_headline = "Ministerium für Wirtschaft und Wissenschaft"
global_area_mwa_logo = "/bilder/Bereichsgrafiken/logo-MWW_rdax_186x66.jpg"
global_area_mwa_sign = "MWA"
global_area_mwa_style = "/css/area-ministerium-mwa.css"
' *************** Ministerium für Inneres und Sport *********
global_area_miffs_path = "/103.htm"
global_area_miffs_id = "103"
global_area_miffs_headline = "Ministerium für Inneres und Sport"
global_area_miffs_logo = "/bilder/Bereichsgrafiken/logo-MFIS_rdax_186x66.jpg"
global_area_miffs_sign = "MIFFS"
global_area_miffs_style = "/css/area-ministerium-miffs.css"
' *************** Ministerium der Finanzen ***********************************
global_area_mdf_path = "/ministerium_finanzen.htm"
global_area_mdf_id = "102"
global_area_mdf_headline = "Ministerium der Finanzen"
global_area_mdf_logo = "/bilder/ressort_finanzen/logo-mdf_rdax_187x59.jpg"
global_area_mdf_sign = "MDF"
global_area_mdf_style = "/css/area-ministerium-mdf.css"
' *************** Ministerium für Justiz, Arbeit, Gesundheit und Soziales ************
global_area_mijugs_path = "/104.htm"
global_area_mijugs_id = "104"
global_area_mijugs_headline = "Ministerium für Justiz, Arbeit, Gesundheit und Soziales"
global_area_mijugs_logo = "/bilder/Bereichsgrafiken/logo-MJAGS_rdax_186x66.jpg"
global_area_mijugs_sign = "MIJUGS"
global_area_mijugs_style = "/css/area-ministerium-mijugs.css"
' *************** Ministerium für Bildung, Familie, Frauen und Kultur ***********
global_area_mbkw_path = "/105.htm"
global_area_mbkw_id = "105"
global_area_mbkw_headline = "Ministerium für Bildung, Familie, Frauen und Kultur"
global_area_mbkw_logo = "/bilder/Bereichsgrafiken/logo-MBFFK_rdax_186x66.jpg"
global_area_mbkw_sign = "MBKW"
global_area_mbkw_style = "/css/area-ministerium-mbkw.css"
' *************** Ministerium für Umwelt *************************************
global_area_mfu_path = "/106.htm"
global_area_mfu_id = "106"
global_area_mfu_headline = "Ministerium für Umwelt"
global_area_mfu_logo = "/bilder/ressort_umwelt/logo-mfu_rdax_187x59.jpg"
global_area_mfu_sign = "MFU"
global_area_mfu_style = "/css/area-ministerium-mfu.css"
' ********************************************************************************
' ************************** SPEZIELLE THEMENPORTALE *****************************
' ********************************************************************************
' *************** Themenportale Einstieg*************************************
global_area_themen_path = "/themenportale.htm"
global_area_themen_id = "128"
' *************** Polizei ****************************************************
global_area_polizei_path = "/polizei.htm"
global_area_polizei_id = "335"
global_area_polizei_headline = "Polizei"
global_area_polizei_logo = "/bilder/thema_polizei/logo-polizei-saarland_rdax_187x59.jpg"
global_area_polizei_sign = UCASE("POLIZEI")
global_area_polizei_style = ""
' *************** Statistisches Amt ****************************************************
global_area_statistik_path = "/statistik.htm"
global_area_statistik_id = "343"
global_area_statistik_headline = "Statistik"
global_area_statistik_logo = "/bilder/thema_statistik/logo-statistisches-amt_rdax_187x60.jpg"
global_area_statistik_sign = UCASE("STALA")
' *************** Themenportal: Europa *******************************************
global_area_tpleuropa_path = "/europa.htm"
global_area_tpleuropa_id = "130"
global_area_tpleuropa_style = "/css/area-themenportal-europa.css"
' *************** Themenportal: Bildungsserver ***********************************
global_area_tplbildungsserver_path = "/bildungsserver.htm"
global_area_tplbildungsserver_id = "161"
global_area_tplbildungsserver_style = "/css/area-ministerium-mbkw.css"
' *************** Themenportal: Presseportal *************************************
global_area_tplpresseportal_path = "/presseportal.htm"
global_area_tplpresseportal_id = "336"
' *************** Themenportal: Landesvertretung Berlin **************************
global_area_tpllvberlin_path = "/landesvertretung_berlin.htm"
global_area_tpllvberlin_id = "64531"
global_area_tpllvberlin_style = "/css/area-themenportal-lvberlin.css"
' *************** Themenportal: LKVK *********************************************
global_area_tpllkvk_path = "/333.htm"
global_area_tpllkvk_id = "333"
global_area_tpllkvk_style = "/css/area-themenportal-lkvk.css"
str_themenportale_ministerium_01 = ","
' /ag-nk.htm
str_themenportale_ministerium_01 = str_themenportale_ministerium_01 & "80061,"
' /arbeitsgerichte.htm
str_themenportale_ministerium_01 = str_themenportale_ministerium_01 & "82138,"
' /forensik.htm
str_themenportale_ministerium_01 = str_themenportale_ministerium_01 & "31164,"
' /justiz.htm
str_themenportale_ministerium_01 = str_themenportale_ministerium_01 & "327,"
str_themenportale_ministerium_02 = ","
' /bibliotheken.htm
str_themenportale_ministerium_02 = str_themenportale_ministerium_02 & "7480,"
' /kultur.htm
str_themenportale_ministerium_02 = str_themenportale_ministerium_02 & "329,"
' /lava.htm
str_themenportale_ministerium_02 = str_themenportale_ministerium_02 & "45665,"
' /europawoche.htm
str_themenportale_ministerium_02 = str_themenportale_ministerium_02 & "35128,"
' /europa.htm
str_themenportale_ministerium_02 = str_themenportale_ministerium_02 & "130,"
' /saarlorlux.htm
str_themenportale_ministerium_02 = str_themenportale_ministerium_02 & "337,"
' /staedtepartnerschaften.htm
str_themenportale_ministerium_02 = str_themenportale_ministerium_02 & "18961,"
str_themenportale_ministerium_03 = ","
' /landesamt_soziales.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "74580,"
' /agentur_haushaltsnahe_arbeit.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "314,"
' /integration.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "28877,"
' /soziales.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "339,"
' /lph.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "51134,"
' /tarifregister.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "36089,"
' /strukturfondsfoerderung.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "35964,"
' /familie.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "320,"
' /familientag.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "40912,"
' /frauen.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "29275,"
' /landesjugendamt.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "52052,"
' /qualifizieren_in_der_kurzarbeit.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "52730,"
' /sport.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "340,"
' /arbeitsmarktfoerderung.htm
str_themenportale_ministerium_03 = str_themenportale_ministerium_03 & "315,"
str_themenportale_ministerium_04 = ","
' /reiseland.htm
str_themenportale_ministerium_04 = str_themenportale_ministerium_04 & "70083,"
' /interreg.htm
str_themenportale_ministerium_04 = str_themenportale_ministerium_04 & "34722,"
' /ausbildung.htm
str_themenportale_ministerium_04 = str_themenportale_ministerium_04 & "316,"
' /staatspreis_design.htm
str_themenportale_ministerium_04 = str_themenportale_ministerium_04 & "48591,"
' /innovation.htm
str_themenportale_ministerium_04 = str_themenportale_ministerium_04 & "325,"
' /wissenschaft.htm
str_themenportale_ministerium_04 = str_themenportale_ministerium_04 & "352,"
' /weiterbildung_qualifizierung.htm
str_themenportale_ministerium_04 = str_themenportale_ministerium_04 & "51824,"
' /einheitlicher_ansprechpartner.htm
str_themenportale_ministerium_04 = str_themenportale_ministerium_04 & "66306,"
' /biokom.htm
str_themenportale_ministerium_04 = str_themenportale_ministerium_04 & "34727,"
' /strukturfondsfoerderung.htm
str_themenportale_ministerium_04 = str_themenportale_ministerium_04 & "35964,"
' /wirtschaftsfoerderung.htm
str_themenportale_ministerium_04 = str_themenportale_ministerium_04 & "351,"
str_themenportale_ministerium_05 = ","
' /ernaehrung.htm
str_themenportale_ministerium_05 = str_themenportale_ministerium_05 & "88352,"
' /arbeitsschutz.htm
str_themenportale_ministerium_05 = str_themenportale_ministerium_05 & "19065,"
' /demographie.htm
str_themenportale_ministerium_05 = str_themenportale_ministerium_05 & "68060,"
' /lgv.htm
str_themenportale_ministerium_05 = str_themenportale_ministerium_05 & "73539,"
' /aktiv-gesund.htm
str_themenportale_ministerium_05 = str_themenportale_ministerium_05 & "36104,"
' /gesundheit.htm
str_themenportale_ministerium_05 = str_themenportale_ministerium_05 & "322,"
' /sozialversicherung.htm
str_themenportale_ministerium_05 = str_themenportale_ministerium_05 & "63246,"
' /verbraucherschutz.htm
str_themenportale_ministerium_05 = str_themenportale_ministerium_05 & "35926,"
str_themenportale_ministerium_06 = ","
' /weiterbildung.htm
str_themenportale_ministerium_06 = str_themenportale_ministerium_06 & "3401,"
' /bildungsserver.htm
str_themenportale_ministerium_06 = str_themenportale_ministerium_06 & "161,"
' /schuman-programm.htm
str_themenportale_ministerium_06 = str_themenportale_ministerium_06 & "77410,"
' /bildung_baut_bruecken-formation_sans_frontieres.htm
str_themenportale_ministerium_06 = str_themenportale_ministerium_06 & "34340,"
' /zustaendigestellen.htm
str_themenportale_ministerium_06 = str_themenportale_ministerium_06 & "48301,"
str_themenportale_ministerium_07 = ","
' /kataster_vermessung_karten.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "37945,"
' /wald_forstwirtschaft.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "74544,"
' /geoportal.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "30421,"
' /abfall.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "313,"
' /landesamt_umwelt_arbeitsschutz.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "37283,"
' /tierschutz.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "334,"
' /denkmal.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "44411,"
' /wasser.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "350,"
' /picobello.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "19292,"
' /energie.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "319,"
' /landesbetrieb_strassenbau.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "23052,"
' /bildung_nachhaltige_entwicklung.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "13368,"
' /bauen_wohnen.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "317,"
' /immissionsschutz.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "324,"
' /klimaschutz_wandel.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "328,"
' /naturschutz.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "439,"
' /stadt_land.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "341,"
' /umweltpakt.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "30585,"
' /umweltwirtschaft.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "345,"
' /verkehr.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "347,"
' /boden_altlasten.htm
str_themenportale_ministerium_07 = str_themenportale_ministerium_07 & "318,"
str_themenportale_stk = ","
' /landesarchiv.htm
str_themenportale_stk = str_themenportale_stk & "331,"
' /familientag.htm
str_themenportale_stk = str_themenportale_stk & "40912,"
' /konjunkturpakt.htm
str_themenportale_stk = str_themenportale_stk & "50436,"
' /moderne_verwaltung.htm
str_themenportale_stk = str_themenportale_stk & "11826,"
' /presseportal.htm
str_themenportale_stk = str_themenportale_stk & "336,"
str_themenportale_mdf = ","
' /ausschreibungen.htm
str_themenportale_mdf = str_themenportale_mdf & "440,"
' /bauen_wohnen.htm
str_themenportale_mdf = str_themenportale_mdf & "317,"
' /finanzaemter.htm
str_themenportale_mdf = str_themenportale_mdf & "321,"
' /haushalt_finanzen.htm
str_themenportale_mdf = str_themenportale_mdf & "323,"
' /steuern.htm
str_themenportale_mdf = str_themenportale_mdf & "344,"
' /cio.htm
str_themenportale_mdf = str_themenportale_mdf & "73819,"
str_themenportale_miffs = ","
str_themenportale_mwa = ","
str_themenportale_mijugs = ","
str_themenportale_mbkw = ","
str_themenportale_mfu = ","
' Mehrfach zugeordnete Themenportale
str_themenportale_multiple = ","
' /bauen_wohnen.htm
str_themenportale_multiple = str_themenportale_multiple & "317,"
' /bildung_nachhaltige_entwicklung.htm
str_themenportale_multiple = str_themenportale_multiple & "13368,"
' /familientag.htm
str_themenportale_multiple = str_themenportale_multiple & "40912,"
' /strukturfondsfoerderung.htm
str_themenportale_multiple = str_themenportale_multiple & "35964,"
' Themenportale als eigene Ressorts
str_themenportale_ressort = ","
' /wahlen.htm
str_themenportale_ressort = str_themenportale_ressort & "349,"
' /polizei.htm
str_themenportale_ressort = str_themenportale_ressort & "335,"
' /statistik.htm
str_themenportale_ressort = str_themenportale_ressort & "343,"
' /landesvertretung_berlin.htm
str_themenportale_ressort = str_themenportale_ressort & "64531,"
%>
<%
' ***** SEITENRELEVANTE UND NAVIGATIONSRELEVANTE GLOBALE VARIABLEN *****
txt_headline = "Eingriffregelung und Ökokonto"
page_type = "page"
page_id = "8880"
page_url = "/8880.htm"
page_iscopy = "0"
page_iscopy_url = ""
page_ischapter = "0"
page_ispreview = "0"
page_isportal = "0"
page_ishidden = "0"
page_isprotected = "0"
page_modify_date = "04.12.2006"
page_modify_timestamp = "20061204112420"
page_keywords = "_RDLS PAGE"
page_teaserimage = ""
page_broader_image = "no"
nav_breadcrumb = "18,128,439,8880"
nav_level2_id = getBreadcrumbElement(nav_breadcrumb, 1)
nav_level3_id = getBreadcrumbElement(nav_breadcrumb, 2)
array_breadcrumb = SPLIT(nav_breadcrumb,",")
BREADCRUMB_level_1 = array_breadcrumb(0)
IF (UBound(array_breadcrumb) > 0) THEN
BREADCRUMB_level_2 = array_breadcrumb(1)
END IF
IF (UBound(array_breadcrumb) > 1) THEN
BREADCRUMB_level_3 = array_breadcrumb(2)
END IF
IF (UBound(array_breadcrumb) > 2) THEN
BREADCRUMB_level_4 = array_breadcrumb(3)
END IF
IF (UBound(array_breadcrumb) > 3) THEN
BREADCRUMB_level_5 = array_breadcrumb(4)
END IF
IF (UBound(array_breadcrumb) > 4) THEN
BREADCRUMB_level_6 = array_breadcrumb(5)
END IF
IF (UBound(array_breadcrumb) > 5) THEN
BREADCRUMB_level_7 = array_breadcrumb(6)
END IF
IF (UBound(array_breadcrumb) > 6) THEN
BREADCRUMB_level_8 = array_breadcrumb(7)
END IF
IF (UBound(array_breadcrumb) > 7) THEN
BREADCRUMB_level_9 = array_breadcrumb(8)
END IF
IF (UBound(array_breadcrumb) > 8) THEN
BREADCRUMB_level_10 = array_breadcrumb(9)
END IF
IF (UBound(array_breadcrumb) > 9) THEN
BREADCRUMB_level_11 = array_breadcrumb(10)
END IF
IF (UBound(array_breadcrumb) > 10) THEN
BREADCRUMB_level_12 = array_breadcrumb(11)
END IF
IF (UBound(array_breadcrumb) > 11) THEN
BREADCRUMB_level_13 = array_breadcrumb(12)
END IF
IF (UBound(array_breadcrumb) > 12) THEN
BREADCRUMB_level_14 = array_breadcrumb(13)
END IF
DIM contentXML
contentXML = "Eingriffregelung und Ökokonto
" ' ***********************************************************************
count_subpages = 0
' ***********************************************************************
%>
<!IoRangePreExecute><%=txt_headline %><!/IoRangePreExecute> | Saarland.de
<% IF (page_isformgen = "1") THEN %>
<% END IF %>
<% IF (page_fl <> "") THEN %>
<% END IF %>
<%
' Globale Variable für String-Vergleiche (CSS-Tausch)
str_nav_level3 = "," & nav_level3_id & ","
%>
<% IF (is_index <> 1) THEN %>
<% IF (nav_level3_id <> "" AND instr(str_themenportale_multiple, str_nav_level3) = 0) THEN %>
<% IF (global_area_ministerium_2009_01_id = nav_level3_id OR instr(str_themenportale_ministerium_01, nav_level3_id) <> 0) THEN %>
<% END IF %>
<% IF (global_area_ministerium_2009_02_id = nav_level3_id OR instr(str_themenportale_ministerium_02, nav_level3_id) <> 0) THEN %>
<% END IF %>
<% IF (global_area_ministerium_2009_03_id = nav_level3_id OR instr(str_themenportale_ministerium_03, nav_level3_id) <> 0) THEN %>
<% END IF %>
<% IF (global_area_ministerium_2009_04_id = nav_level3_id OR instr(str_themenportale_ministerium_04, nav_level3_id) <> 0) THEN %>
<% END IF %>
<% IF (global_area_ministerium_2009_05_id = nav_level3_id OR instr(str_themenportale_ministerium_05, nav_level3_id) <> 0) THEN %>
<% END IF %>
<% IF (global_area_ministerium_2009_06_id = nav_level3_id OR instr(str_themenportale_ministerium_06, nav_level3_id) <> 0) THEN %>
<% END IF %>
<% IF (global_area_ministerium_2009_07_id = nav_level3_id OR instr(str_themenportale_ministerium_07, nav_level3_id) <> 0) THEN %>
<% END IF %>
<% IF (global_area_mdf_id = nav_level3_id OR instr(str_themenportale_mdf, nav_level3_id) <> 0) THEN %>
<% END IF %>
<% IF (global_area_miffs_id = nav_level3_id OR instr(str_themenportale_miffs, str_nav_level3) <> 0) THEN %>
<% END IF %>
<% IF (global_area_mwa_id = nav_level3_id OR instr(str_themenportale_mwa, str_nav_level3) <> 0) THEN %>
<% END IF %>
<% IF (global_area_mijugs_id = nav_level3_id OR instr(str_themenportale_mijugs, str_nav_level3) <> 0) THEN %>
<% END IF %>
<% IF (global_area_mbkw_id = nav_level3_id OR instr(str_themenportale_mbkw, str_nav_level3) <> 0) THEN %>
<% END IF %>
<% IF (global_area_mfu_id = nav_level3_id OR instr(str_themenportale_mfu, str_nav_level3) <> 0) THEN %>
<% END IF %>
<% IF (global_area_stk_id = nav_level3_id OR instr(str_themenportale_stk, str_nav_level3) <> 0) THEN %>
<% END IF %>
<% IF (global_area_tpleuropa_id = nav_level3_id) THEN %>
<% END IF %>
<% IF (global_area_tpllvberlin_id = nav_level3_id) THEN %>
<% END IF %>
<% IF (global_area_tplbildungsserver_id = nav_level3_id) THEN %>
<% END IF %>
<% IF (global_area_tpllkvk_id = nav_level3_id) THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
IF (is_saarlandheute = "1") THEN
Response.write("")
END IF
%>
<% ' IF (page_fl <> "") THEN %>
<% ' IF (page_fl = "page_fl_index") THEN %>
<% ' END IF %>
<% IF (page_fl = "page_fl_magazin") THEN %>
<% END IF %>
<% ' END IF %>
<%
FUNCTION getAttributeFromNavXML(xml_string, page_id, attribute_name)
SET gafnx_xmldoc = Server.CreateObject("Msxml2.DOMDocument.4.0")
xml_string = "" & REPLACE(xml_string, "&", "&") & ""
gafnx_xmldoc.loadXML (xml_string)
SET gafnx_objNode = gafnx_xmldoc.selectSingleNode("//blockquote[@id = '" & page_id & "']")
IF NOT gafnx_objNode IS NOTHING THEN
getAttributeFromNavXML = gafnx_objNode.getAttribute(attribute_name)
ELSE
getAttributeFromNavXML = ""
END IF
END FUNCTION
%>
<% IF (is_index = 1) THEN %>
EnglishFrançais
<% END IF %>
BenutzerhinweiseInhaltSuche
<% IF (id_portal_fr <> nav_level3_id AND id_portal_en <> nav_level3_id) THEN %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20060919114710" > page_modify_timestamp) THEN
page_modify_date = "19.09.2006"
page_modify_timestamp = "20060919114710"
END IF
%>
<%
' === Last modified info in footer ===
IF ("20060717140217" > page_modify_timestamp) THEN
page_modify_date = "17.07.2006"
page_modify_timestamp = "20060717140217"
END IF
%>
<% IF (bereich_id <> 355) THEN %>
<% END IF %>
<% IF (nav_level3_id <> "" AND nav_level2_id = global_area_themen_id AND page_ispressedienst <> 1 AND template_area <> "right") THEN %>
Herausgeber des Portals:
<% END IF %>
<% IF (nav_level3_id = id_portal_bbb) THEN %>
<% IF (template_area = "right") THEN %>
<% ELSE %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20091106221921" > page_modify_timestamp) THEN
page_modify_date = "06.11.2009"
page_modify_timestamp = "20091106221921"
END IF
area_path = "/ministerium_justiz.htm"
area_name = "Ministerium der Justiz"
area_img = "/bilder/Bereichsgrafiken/ministerium_01_rdax_187x60.jpg"
area_inactive = ""
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/Bereichsgrafiken/ministerium_01_rdax_187x60.jpg"
area_name = "Ministerium der Justiz"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = ""
area_name = ""
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = ""
area_name = ""
END IF
area_img_2 = ""
area_id = "59736"
area_sign = UCASE("MINISTERIUM_2009_01")
show_right_only = "0"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
' /justiz.htm
str_themenportale = str_themenportale & "327,"
' /forensik.htm
str_themenportale = str_themenportale & "31164,"
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20091106221821" > page_modify_timestamp) THEN
page_modify_date = "06.11.2009"
page_modify_timestamp = "20091106221821"
END IF
area_path = "/ministerium_inneres_europaangelegenheiten.htm"
area_name = "Ministerium für Inneres, Kultur und Europa"
area_img = "/bilder/Bereichsgrafiken/ministerium_02_02_rdax_187x66.jpg"
area_inactive = ""
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/Bereichsgrafiken/ministerium_02_02_rdax_187x66.jpg"
area_name = "Ministerium für Inneres, Kultur und Europa"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("/bilder/Bereichsgrafiken/ministerium_02_rdax_187x66.jpg" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = "/bilder/Bereichsgrafiken/ministerium_02_rdax_187x66.jpg"
area_name = " Ministerium für Inneres und Europaangelegenheiten"
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = ""
area_name = ""
END IF
area_img_2 = ""
area_id = "59738"
area_sign = UCASE("MINISTERIUM_2009_02")
show_right_only = "0"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
' /bibliotheken.htm
str_themenportale = str_themenportale & "7480,"
' /europa.htm
str_themenportale = str_themenportale & "130,"
' /europawoche.htm
str_themenportale = str_themenportale & "35128,"
' /kultur.htm
str_themenportale = str_themenportale & "329,"
' /saarlorlux.htm
str_themenportale = str_themenportale & "337,"
' /staedtepartnerschaften.htm
str_themenportale = str_themenportale & "18961,"
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20110118165835" > page_modify_timestamp) THEN
page_modify_date = "18.01.2011"
page_modify_timestamp = "20110118165835"
END IF
area_path = "/ministerium_gesundheit_verbraucherschutz.htm"
area_name = "Ministerium für Gesundheit und Verbraucherschutz"
area_img = "/bilder/Bereichsgrafiken/Logo_MGUV_187x66_rdax_187x66.jpg"
area_inactive = ""
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/Bereichsgrafiken/Logo_MGUV_187x66_rdax_187x66.jpg"
area_name = "Ministerium für Gesundheit und Verbraucherschutz"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = ""
area_name = ""
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = ""
area_name = ""
END IF
area_img_2 = ""
area_id = "59741"
area_sign = UCASE("MINISTERIUM_2009_05")
show_right_only = "0"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
' /arbeitsschutz.htm
str_themenportale = str_themenportale & "19065,"
' /aktiv-gesund.htm
str_themenportale = str_themenportale & "36104,"
' /demographie.htm
str_themenportale = str_themenportale & "68060,"
' /gesundheit.htm
str_themenportale = str_themenportale & "322,"
' /lgv.htm
str_themenportale = str_themenportale & "73539,"
' /sozialversicherung.htm
str_themenportale = str_themenportale & "63246,"
' /verbraucherschutz.htm
str_themenportale = str_themenportale & "35926,"
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20091106221503" > page_modify_timestamp) THEN
page_modify_date = "06.11.2009"
page_modify_timestamp = "20091106221503"
END IF
area_path = "/ministerium_bildung.htm"
area_name = "Ministerium für Bildung"
area_img = "/bilder/Bereichsgrafiken/ministerium_06_rdax_187x60.jpg"
area_inactive = ""
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/Bereichsgrafiken/ministerium_06_rdax_187x60.jpg"
area_name = "Ministerium für Bildung"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = ""
area_name = ""
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = ""
area_name = ""
END IF
area_img_2 = ""
area_id = "59742"
area_sign = UCASE("MINISTERIUM_2009_06")
show_right_only = "0"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
' /bildung_baut_bruecken-formation_sans_frontieres.htm
str_themenportale = str_themenportale & "34340,"
' /bildungsserver.htm
str_themenportale = str_themenportale & "161,"
' /mint.htm
str_themenportale = str_themenportale & "19122,"
' /schuman-programm.htm
str_themenportale = str_themenportale & "77410,"
' /weiterbildung.htm
str_themenportale = str_themenportale & "3401,"
' /zustaendigestellen.htm
str_themenportale = str_themenportale & "48301,"
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20070902154426" > page_modify_timestamp) THEN
page_modify_date = "02.09.2007"
page_modify_timestamp = "20070902154426"
END IF
area_path = "/59971.htm"
area_name = "Ministerium für Bildung, Familie, Frauen und Kultur"
area_img = "/bilder/Bereichsgrafiken/logo-MBFFK_rdax_186x66.jpg"
area_inactive = "1"
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/Bereichsgrafiken/logo-MBFFK_rdax_186x66.jpg"
area_name = "Ministerium für Bildung, Familie, Frauen und Kultur"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = ""
area_name = ""
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = "/bilder/ressort_bildung_kultur_und_wissenschaft/logo-mbkw_rdax_187x66.jpg"
area_name = "Ministerium für Bildung, Kultur und Wissenschaft"
END IF
area_img_2 = ""
area_id = "120"
area_sign = UCASE("MBKW")
show_right_only = "0"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
Unsere Themenportale
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20060906153005" > page_modify_timestamp) THEN
page_modify_date = "06.09.2006"
page_modify_timestamp = "20060906153005"
END IF
area_path = "/59973.htm"
area_name = "Ministerium für Umwelt"
area_img = "/bilder/ressort_umwelt/logo-mfu_rdax_187x59.jpg"
area_inactive = "1"
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/ressort_umwelt/logo-mfu_rdax_187x59.jpg"
area_name = "Ministerium für Umwelt"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = ""
area_name = ""
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = "/bilder/ressort_umwelt/logo-mfu_rdax_187x59.jpg"
area_name = "Ministerium für Umwelt"
END IF
area_img_2 = ""
area_id = "118"
area_sign = UCASE("MFU")
show_right_only = "0"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
Unsere Themenportale
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20070902150547" > page_modify_timestamp) THEN
page_modify_date = "02.09.2007"
page_modify_timestamp = "20070902150547"
END IF
area_path = "/59972.htm"
area_name = "Ministerium für Inneres und Sport"
area_img = "/bilder/Bereichsgrafiken/logo-MFIS_rdax_186x66.jpg"
area_inactive = "1"
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/Bereichsgrafiken/logo-MFIS_rdax_186x66.jpg"
area_name = "Ministerium für Inneres und Sport"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = ""
area_name = ""
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = "/bilder/ressort_inneres_familie_frauen_und_sport/logo-miffs_rdax_187x66.jpg"
area_name = "Ministerium für Inneres, Familie, Frauen und Sport"
END IF
area_img_2 = ""
area_id = "117"
area_sign = UCASE("MIFFS")
show_right_only = "0"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
Unsere Themenportale
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20070902150634" > page_modify_timestamp) THEN
page_modify_date = "02.09.2007"
page_modify_timestamp = "20070902150634"
END IF
area_path = "/59969.htm"
area_name = "Ministerium für Justiz, Arbeit, Gesundheit und Soziales"
area_img = "/bilder/Bereichsgrafiken/logo-MJAGS_rdax_186x66.jpg"
area_inactive = "1"
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/Bereichsgrafiken/logo-MJAGS_rdax_186x66.jpg"
area_name = "Ministerium für Justiz, Arbeit, Gesundheit und Soziales"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = ""
area_name = ""
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = "/bilder/ressort_justiz_gesundheit_und_soziales/logo-mijugs_rdax_187x66.jpg"
area_name = "Ministerium für Justiz, Gesundheit und Soziales"
END IF
area_img_2 = ""
area_id = "116"
area_sign = UCASE("MIJUGS")
show_right_only = "0"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
Unsere Themenportale
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20070902150711" > page_modify_timestamp) THEN
page_modify_date = "02.09.2007"
page_modify_timestamp = "20070902150711"
END IF
area_path = "/59970.htm"
area_name = "Ministerium für Wirtschaft und Wissenschaft"
area_img = "/bilder/Bereichsgrafiken/logo-MWW_rdax_186x66.jpg"
area_inactive = "1"
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/Bereichsgrafiken/logo-MWW_rdax_186x66.jpg"
area_name = "Ministerium für Wirtschaft und Wissenschaft"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = ""
area_name = ""
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = ""
area_name = "Ministerium für Wirtschaft und Arbeit"
END IF
area_img_2 = ""
area_id = "115"
area_sign = UCASE("MWA")
show_right_only = "0"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
Unsere Themenportale
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20090608165903" > page_modify_timestamp) THEN
page_modify_date = "08.06.2009"
page_modify_timestamp = "20090608165903"
END IF
area_path = "/mein-saarland.htm"
area_id = "79673"
%>
<% IF (template_area = "left") THEN %>
<% IF (area_id = nav_level2_id) THEN %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20061106112456" > page_modify_timestamp) THEN
page_modify_date = "06.11.2006"
page_modify_timestamp = "20061106112456"
END IF
area_path = "/polizei.htm"
area_name = "Polizei"
area_img = "/bilder/thema_polizei/logo-polizei-saarland_rdax_187x59.jpg"
area_inactive = ""
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/thema_polizei/logo-polizei-saarland_rdax_187x59.jpg"
area_name = "Polizei"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = ""
area_name = ""
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = "/bilder/thema_polizei/logo-polizei-saarland_rdax_187x59.jpg"
area_name = "Polizei"
END IF
area_img_2 = ""
area_id = "335"
area_sign = UCASE("POLIZEI")
show_right_only = "1"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
Unsere Themenportale
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20061106113210" > page_modify_timestamp) THEN
page_modify_date = "06.11.2006"
page_modify_timestamp = "20061106113210"
END IF
area_path = "/statistik.htm"
area_name = "Statistik"
area_img = "/bilder/thema_statistik/logo-statistisches-amt_rdax_187x60.jpg"
area_inactive = ""
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/thema_statistik/logo-statistisches-amt_rdax_187x60.jpg"
area_name = "Statistik"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = ""
area_name = ""
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = "/bilder/thema_statistik/logo-statistisches-amt_rdax_187x60.jpg"
area_name = "Statistik"
END IF
area_img_2 = ""
area_id = "343"
area_sign = UCASE("STALA")
show_right_only = "0"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
Unsere Themenportale
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20061121103113" > page_modify_timestamp) THEN
page_modify_date = "21.11.2006"
page_modify_timestamp = "20061121103113"
END IF
area_path = "/landesvertretung_berlin.htm"
area_name = "Vertretung des Saarlandes beim Bund in Berlin"
area_img = "/bilder/thema_landesvertretung_berlin/logo-lv-berlin_rdax_187x54.jpg"
area_inactive = ""
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/thema_landesvertretung_berlin/logo-lv-berlin_rdax_187x54.jpg"
area_name = "Vertretung des Saarlandes beim Bund in Berlin"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = ""
area_name = ""
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = ""
area_name = ""
END IF
area_img_2 = ""
area_id = "64531"
area_sign = UCASE("")
show_right_only = "0"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
Unsere Themenportale
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% END IF %>
<% END IF %>
<% END IF %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20061123150215" > page_modify_timestamp) THEN
page_modify_date = "23.11.2006"
page_modify_timestamp = "20061123150215"
END IF
area_path = "/wahlen.htm"
area_name = "Wahlen"
area_img = "/bilder/thema_wahlen/logo-landeswahlleiterin_rdax_187x60.jpg"
area_inactive = ""
date_range = DatePart("YYYY", page_date) & leading_zero_func(DatePart("M", page_date)) & leading_zero_func(DatePart("D", page_date))
IF (date_range >= new_ressorts) THEN
area_img = "/bilder/thema_wahlen/logo-landeswahlleiterin_rdax_187x60.jpg"
area_name = "Wahlen"
END IF
' Facelifting und Kabinettsumbildug 2011
IF ("" <> "") THEN
IF (date_range > new_ressorts and date_range < "20110824") THEN
area_img = ""
area_name = ""
END IF
END IF
IF (date_range < new_ressorts and date_range > "19000101") THEN
area_img = ""
area_name = ""
END IF
area_img_2 = "/bilder/thema_statistik/logo-statistisches-amt_rdax_187x60.jpg"
area_id = "349"
area_sign = UCASE("")
show_right_only = "0"
' Globale Variable für String-Vergleiche (Herausgeberboxen)
str_portal_id = "," & bereich_id & ","
str_themenportale = ","
%>
<% IF (template_area = "left" AND nav_level3_id <> "" AND page_ispressedienst <> 1) THEN %>
<% IF (instr(str_themenportale_ressort, str_portal_id) <> 0) THEN %>
<% IF (area_id = nav_level3_id) THEN %>
<% END IF %>
<% ELSE %>
<% IF (area_id = nav_level3_id OR instr(str_themenportale, str_portal_id) <> 0) THEN %>
Unsere Themenportale
<% END IF %>
<% END IF %>
<% END IF %>
<% IF (template_area = "right") THEN %>
<% IF (area_id <> nav_level3_id) THEN %>
<% IF (page_author = area_sign AND page_author <> "") THEN %>
<% IF page_broader_image = "yes" THEN %>
<% END IF %>
Eingriffsregelung und Ökokonto
<% IF (id_portal_fr <> nav_level3_id AND id_portal_en <> nav_level3_id) THEN %>
<% END IF %>
Was ist ein Eingriff? Veränderungen der Gestalt oder Nutzung von Grundflächen, die zu erheblichen oder nachhaltigen Beeinträchtigungen des Naturhaushaltes und des Landschaftsbildes führen können, sind als Eingriffe in Natur und Landschaft im Sinne der Naturschutzgesetze zu bewerten; offensichtliche Beispiele hierfür sind der Bau einer neuen Straße oder die Errichtung von Abwasseranlagen. Die Eingriffsregelung sieht bei solchen Vorhaben eine strikte Prüfabfolge, die sogenannte Entscheidungskaskade der Eingriffsregelung vor:
Im ersten Schritt ist zu prüfen, ob die geplanten Eingriffe vermeidbar sind, das heißt gibt es Alternativen, die zu keinen oder geringeren erheblichen Beeinträchtigungen führen. Ist dies im Rahmen der Zumutbarkeit möglich, sind diese Alternativen zu wählen.
Für die nicht vermeidbaren und minimierbaren Eingriffswirkungen sind dann vorrangig Ausgleichsmaßnahmen vorzusehen; Ausgleichsmaßnahmen sind Maßnahmen des Naturschutzes, die die verloren gehenden Werte und Funktionen des Naturhaushaltes und des Landschaftsbildes gleichartig kompensieren, zum Beispiel ein Tümpel geht durch einen Eingriff verloren, dafür wird im betroffenen Raum ein neuer Tümpel angelegt.
Sind die Möglichkeiten an Ausgleichsmaßnahmen erschöpft, und der Eingriff ist noch nicht vollständig kompensiert, sind zusätzlich Ersatzmaßnahmen durchzuführen. Ersatzmaßnahmen sind Maßnahmen des Naturschutzes, die die verloren gehenden Werte und Funktionen des Naturhaushaltes und des Landschaftsbildes gleichwertig kompensieren, das heißt durch einen Eingriff geht beispielsweise eine Streuobstwiese verloren und als Ersatzmaßnahme wird dafür eine Hecke angelegt. Bei der Auswahl der Ersatzmaßnahme sollte so weit möglich auf eine hohe Ähnlichkeit der geplanten Strukturen mit den verloren gehenden Strukturen geachtet werden.
2. Was ist das Ökokonto? Im Rahmen des Ökokontos sollen Maßnahmen des Naturschutzes ohne konkreten Eingriffsbezug geplant und durchgeführt werden, um dann später bei Eingriffsvorhaben als Kompensationsmaßnahme, in der Regel als Ersatzmaßnahme, verwendet zu werden. Das Ökokonto ist somit ein Pool von Flächen mit Maßnahmen des Naturschutzes, es hat also nur im übertragenen Sinn etwas mit dem landläufigen Begriff eines Kontos zu tun. Es gibt zwar Kontoinhaber, auf den jeweiligen Konten werden aber keine Geldbeträge eingezahlt und abgehoben, sondern es werden Ökologische Werteinheiten, die nach dem Leitfaden Eingriffsbewertung ermittelt werden, ein- und ausgebucht.
3. Was ist der Leitfaden Eingriffsbewertung? Der Leitfaden Eingriffsbewertung dient der Bewertung der Eingriffe, der Ausgleichs- und Ersatzmaßnahmen und der Ökokontomaßnahmen. Aus Gründen der praktischen Anwendung setzt sich die Methode ganz bewusst vorrangig mit dem biotischen Teil des Naturhaushaltes, der Pflanzen- und Tierwelt auseinander. Bei besonderer Betroffenheit der abiotischen Naturgüter sind diese gesondert zu behandeln. Der Schutzgutkomplex Landschaftsbild ist grundsätzlich gesondert zu behandeln. Des Weiteren wird es mit der Methodik ermöglicht, Biotoptypen und Maßnahmen mit landesweiter Schwerpunktsetzung des Naturschutzes besonders herauszuheben und Anreize für die Planung und Umsetzung solcher Maßnahmen zu schaffen.
<% template_area = "right" %>
<% IF page_broader_image <> "yes" THEN %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20060818142932" > page_modify_timestamp) THEN
page_modify_date = "18.08.2006"
page_modify_timestamp = "20060818142932"
END IF
%>
<%
' === Last modified info in footer ===
IF ("20100309091106" > page_modify_timestamp) THEN
page_modify_date = "09.03.2010"
page_modify_timestamp = "20100309091106"
END IF
contactbox_count = contactbox_count + 1
%>
<% IF (template_area = "right") THEN %>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20061017101729" > page_modify_timestamp) THEN
page_modify_date = "17.10.2006"
page_modify_timestamp = "20061017101729"
END IF
%>
<% puborder_count = 0 %>
Publikationen
<%
' === Last modified info in footer ===
IF ("20061017101358" > page_modify_timestamp) THEN
page_modify_date = "17.10.2006"
page_modify_timestamp = "20061017101358"
END IF
%>
Downloads
Empfehlungen der LANA zu „Anforderungen an die Prüfung der Erheblichkeit von Beeinträchtigungen der Natura 2000-Gebiete gemäß § 34 BNatSchG im Rahmen einer FFH-Verträglichkeitsprüfung (FFH-VP)“
<%
' === Last modified info in footer ===
IF ("20061017101541" > page_modify_timestamp) THEN
page_modify_date = "17.10.2006"
page_modify_timestamp = "20061017101541"
END IF
snippet_test = "Prüfung der Erheblichkeit"
IF (snippet_test = "") THEN
the_snippet_headline = "SNIPPET Download - Prüfung der Erheblichkeit"
ELSE
the_snippet_headline = "Prüfung der Erheblichkeit"
END IF
%>
<%
' === Last modified info in footer ===
IF ("20061017100802" > page_modify_timestamp) THEN
page_modify_date = "17.10.2006"
page_modify_timestamp = "20061017100802"
END IF
%>
Downloads
Hinweise der LANA zur Anwendung des europäischen Artenschutzrechts bei der Zulassung von Vorhaben und bei Planungen
<%
' === Last modified info in footer ===
IF ("20061017100950" > page_modify_timestamp) THEN
page_modify_date = "17.10.2006"
page_modify_timestamp = "20061017100950"
END IF
snippet_test = "Besonderer Artenschutz bei Vorhaben"
IF (snippet_test = "") THEN
the_snippet_headline = "SNIPPET Download - Artenschutz bei Vorhaben"
ELSE
the_snippet_headline = "Besonderer Artenschutz bei Vorhaben"
END IF
%>
<%
FUNCTION cutSublevels (str)
SET RegularExpressionObject = NEW RegExp
WITH RegularExpressionObject
.Pattern = "/?(([^/]*?(//[^/]*?)*/){1,4}).*"
.IgnoreCase = True
END WITH
cutstr = RegularExpressionObject.Replace(str&"/", "$1")
WITH RegularExpressionObject
.Pattern = "^(.*?)/*$"
.IgnoreCase = True
END WITH
cutstr = RegularExpressionObject.Replace(cutstr, "$1")
SET RegularExpressionObject = NOTHING
cutSublevels = cutstr
END FUNCTION
str_breadcrumb_etracker = REPLACE(str_breadcrumb, "/", "//")
SET RegularExpressionObject = NEW RegExp
WITH RegularExpressionObject
.Pattern = "\W*»\W*"
.IgnoreCase = True
.Global = True
END WITH
str_breadcrumb_etracker = RegularExpressionObject.Replace(str_breadcrumb_etracker, "/")
SET RegularExpressionObject = NOTHING
str_breadcrumb_etracker = cutSublevels(str_breadcrumb_etracker)
str_breadcrumb_etracker = REPLACE(str_breadcrumb_etracker, ",", "")
str_breadcrumb_etracker = Server.URLEncode(str_breadcrumb_etracker)
page_title_etracker = REPLACE(txt_headline, "/", "//")
page_title_etracker = page_title_etracker & " (" & page_id & ")"
IF is_index = "1" THEN
page_title_etracker = Server.URLEncode("_INDEX_" & page_title_etracker)
ELSE
page_title_etracker = Server.URLEncode(page_title_etracker)
END IF
%>
<% IF isLiveserver() THEN %>
<% END IF %>
