<% ' spracherkennung if request.QueryString("l")<>"" then l=request.QueryString("l") session("l")=l session("sprachwechsel")=true else if session("l")="" then user_l = lcase(Request.ServerVariables("HTTP_ACCEPT_LANGUAGE")) if instr(user_l, "en")>0 then l="en" end if if instr(user_l, "de")>0 then l="de" end if end if if l<>"" then session("l")=l end if end if if session("l")="" then session("l")="de" end if l=session("l") sql="SELECT navi.* FROM navi WHERE (((navi.lang)='de') AND ((navi.del)='N') AND ((navi.pos)='molekuel') AND ((navi.parent_id)=0)) ORDER BY navi.sort_id;" set rs=creaters(sql) do while not rs.eof nid=rs("nid") sid=rs("sort_id") txt=rs("navi_txt") if v_de="" then v_de=nid&":'"&txt&"'" else v_de=v_de&", "&nid&":'"&txt&"'" end if rs.movenext loop rs.close set rs=nothing sql="SELECT navi.* FROM navi WHERE (((navi.lang)='en') AND ((navi.del)='N') AND ((navi.pos)='molekuel') AND ((navi.parent_id)=0)) ORDER BY navi.sort_id;" set rs=creaters(sql) do while not rs.eof nid=rs("nid") sid=rs("sort_id") txt=rs("navi_txt") if v_en="" then v_en=nid&":'"&txt&"'" else v_en=v_en&", "&nid&":'"&txt&"'" end if rs.movenext loop rs.close set rs=nothing ' bilder fьr animation in array dim aImg(100) sql="SELECT dateien.* FROM dateien WHERE (((dateien.typ)='hauptbild') AND ((dateien.del)='N')) ORDER BY dateien.titel;" set rs=creaters(sql) do while not rs.eof zweck=rs("zweck") if zweck="animation" then bilder=bilder+1 aImg(bilder)=rs("datei") else if zweck="kontakt" then bild_kontakt=rs("datei") end if if zweck="management" then bild_management=rs("datei") end if end if rs.movenext loop rs.close set rs=nothing %> Liese Technology + Marketing GmbH
<% if l="de" then %> English <% else %> Deutsch <% end if %> | Home
<% do while i"" then if i=1 then css="filter:alpha(opacity=100); -moz-opacity:1; opacity:1; z-index:2;" else css="filter:alpha(opacity=0); -moz-opacity:.0; opacity:.0; z-index:1; " end if %> <% end if loop %>

<% if l="de" then %> «Die Fдhigkeit der Menschen, zu verstehen, ist unbegrenzt. Es wird keinen Bereich der Wirklichkeit geben, in dem der menschliche Geist nicht doch einen Weg finden wird.? <% else %> «The human ability to understand is unlimited. There will be no area of reality in which the human spirit will not find a way.? <% end if %>

Werner Heisenberg