%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim language,doctype,titlened,titleus,pageback,cat language=request.querystring("lan") 'doctypes: '0 = beide talen (NED en US) '1 = alleen NED '2 = alleen US doctype=1 if doctype=1 then language="ned" elseif doctype=2 then language="us" else if language<>"ned" and language<>"us" then language="ned" end if end if titlened="FLASH INTRO" titleus="FLASH INTRO" pageback="../menu/menu_enlisted.asp" cat="Enlisted Men" %>