<%
' *****************************************************************************************************
' ******************************** 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-A5EE201B/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 = "Saarlouis"
page_type = "page"
page_contenttype = "text"
page_id = "11686"
page_url = "/11686.htm"
page_iscopy = "0"
page_iscopy_url = ""
page_ischapter = "0"
page_ispreview = "0"
page_isportal = "0"
page_ishidden = "0"
page_isprotected = "0"
page_author = ""
page_modify_timestamp = "20091214130814"
page_modify_date = "14.12.2009"
page_keywords = "_RDLS PAGE;_RDLS Textpage"
page_teaserimage = ""
nav_breadcrumb = "18,128,343,13918"
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 = "Saarlouis
" ' ***********************************************************************
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 %>
<%
bild = ""
bildtext = ""
IF (bild <> "" AND bildtext <> "") THEN
%>
<%
END IF
%>
<%
' === Last modified info in footer ===
IF ("20090319085603" > page_modify_timestamp) THEN
page_modify_date = "19.03.2009"
page_modify_timestamp = "20090319085603"
END IF
%>
<% IF ("left" = "middle") THEN %>
<%
bild = "/bilder/thema_statistik/staa_saarlouis(2).jpg"
bildtext = "Wappen der Kreisstadt Saarlouis"
IF (bild <> "" AND bildtext <> "") THEN
%>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20081022145519" > page_modify_timestamp) THEN
page_modify_date = "22.10.2008"
page_modify_timestamp = "20081022145519"
END IF
%>
<% IF ("left" = "middle") THEN %>
<%
bild = ""
bildtext = ""
IF (bild <> "" AND bildtext <> "") THEN
%>
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20071123153052" > page_modify_timestamp) THEN
page_modify_date = "23.11.2007"
page_modify_timestamp = "20071123153052"
END IF
%>
<%
' === Last modified info in footer ===
IF ("20110908114328" > page_modify_timestamp) THEN
page_modify_date = "08.09.2011"
page_modify_timestamp = "20110908114328"
END IF
%>
<%
' === Last modified info in footer ===
IF ("20110908101112" > page_modify_timestamp) THEN
page_modify_date = "08.09.2011"
page_modify_timestamp = "20110908101112"
END IF
%>
<%
' === Last modified info in footer ===
IF ("20080409164801" > page_modify_timestamp) THEN
page_modify_date = "09.04.2008"
page_modify_timestamp = "20080409164801"
END IF
%>
<% IF ("left" = "middle") THEN %>
<%
bild = ""
bildtext = ""
IF (bild <> "" AND bildtext <> "") THEN
%>
<%
END IF
%>
Eckdaten:
<% ELSE %>
<%
bild = ""
vollbild = ""
bildtext = ""
IF (bild <> "" AND bildtext <> "") THEN
%>
<%
END IF
%>
Eckdaten:
<% END IF %>
<%
' === Last modified info in footer ===
IF ("20110907142549" > page_modify_timestamp) THEN
page_modify_date = "07.09.2011"
page_modify_timestamp = "20110907142549"
END IF
%>
Fläche in km² darunter: Gebäude- u. Freifläche (%) Verkehrsfläche (%) Landwirtschaftsfläche (%) Waldfläche (%) Bevölkerungsdichte (Einw./km²) Bevölkerung insgesamt Bevölkerung männlich Bevölkerung weiblich (%) Ausländeranteil (%) Geburten Sterbefälle Zuzüge Fortzüge Sozialversicherungspflichtig Beschäftigte (am Arbeitsort) Schulden je Einwohner (EUR) Wohngebäude Wohnungen
<%
' === Last modified info in footer ===
IF ("20080722134743" > page_modify_timestamp) THEN
page_modify_date = "22.07.2008"
page_modify_timestamp = "20080722134743"
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 %>
.jpg "Wappen der Kreisstadt Saarlouis")