<% if showPartner="" then %>
<% end if %>
<%
trailer_url = ""
trailer_target = ""
img_trailer_gross = ""
img_trailer_klein = ""
img_trailer_klein = "true"
%> <%
css_id = ""
if img_trailer_gross <> "" then
css_id = "trailerinhalt"
end if
if img_trailer_klein <> "" then
css_id = "trailerinhaltsmall"
end if
%>
Videos Themenwoche Ölpest
Videos Themenwoche Ölpest
<%
response.write getList("","56720.html","target=_self")
response.write getList("Startseite Themenwoche Ölpest","56716.html","")
response.write getList("Leidende Tiere","56722.html","")
response.write getList("Die unsichtbare Gefahr","56720.html","")
response.write getList(" Tiefseebohrungen","56721.html","")
response.write getList("Korruption und die Ölpest","56723.html","")
response.write getList("Düsterer Blick in die Zukunft","56724.html","")
response.write getList("Videos","57071.html","")
response.write getList("","","")
response.write getList("","","")
response.write getList("","","")
response.write getList("","","")
function getList(byval txt_LnkName, byval lnkURL, byval txtTarget)
dim strRet
if trim(txt_LnkName)="" then
strRet = ""
else
if trim(lnkURL)="" then
strRet = "- " & txt_LnkName & "
"
else
'if txtTarget <> "target=_blank" then
' txtTarget = ""
'end if
if instr(1, txtTarget, "target=_blank", 1)=0 then
txtTarget = ""
end if
strRet = "- " & txt_LnkName & "
"
end if
end if
getList = strRet
end function
%>