<% dim theProduct theProduct = "Navman M400" %>

Navman M Series

Navman M400

<% j = 0 %> <% if (j = 0) then %> <% end if j = j + 1 %> <% if (j = 0) then %> <% end if j = j + 1 %>
<% k = 0 %> <% if (k = 0) then %> <% end if k = k + 1 %> <% if (k = 0) then %> <% end if k = k + 1 %>
Navman M400 Navman M400 Navman M400 Navman M400
    <%i=0%> <%init = 1%> <% checkCurrPage = InStr("/en_gb/navman-m400.htm","AB3D889CC16A49628680A915FC99A1AF") if (checkCurrPage > 0) then init = 0 end if%> <% checkCurrPage = InStr("/en_gb/navman-m400.htm","DD000B55256D4523A900337D0273204F") if (checkCurrPage > 0) then init = 0 end if%> <% checkCurrPage = InStr("/en_gb/navman-m400.htm","AB3D889CC16A49628680A915FC99A1AF") selectedPage = "" firstLi = "" if (checkCurrPage > 0) then selectedPage = "class='selected'" end if if (i = 0 AND init = 1)then selectedPage = "class='selected'" end if if (i = 0) then firstLi = "class='first'" end if i = i + 1 %>
  • > href="/en_gb/specifications.htm">Specifications
  • <% checkCurrPage = InStr("/en_gb/navman-m400.htm","DD000B55256D4523A900337D0273204F") selectedPage = "" firstLi = "" if (checkCurrPage > 0) then selectedPage = "class='selected'" end if if (i = 0 AND init = 1)then selectedPage = "class='selected'" end if if (i = 0) then firstLi = "class='first'" end if i = i + 1 %>
  • > href="/en_gb/accessories.htm">Accessories
<% Function GetNavTitle() GetNavTitle="Specifications" End Function %>

Top Specifications

    • 4.3" LCD Touchscreen
    • GPS SiRFStarIII InstantFixII
    • 2GB memory

<%=theProduct%> Datasheet


  1. 4.3" LCD Touchscreen
  2. Mini-USB port
  3. Loudspeaker
  4. Power on/off switch
  5. Windscreen mounting bracket slot

Complete Specifications

<% ' LOAD THE MENU XML NOW 'TEST xmlContent = "D:\Websites\test_mio_europe\xml_new\uk_en\specifications\specs_menu_small.xml" 'LIVE 'xmlContent = "D:\Websites\test_mio_europe\xml_new\en-gb\specifications\specs_menu_small.xml" set xml_0 = Server.CreateObject("Microsoft.XMLDOM") xml_0.async = false xml_0.Load (xmlContent) totProds = 0 i = 0 j = 1 k = 1 If xml_0.parseError.errorcode <> 0 then Response.Write ("") else response.write("") end if %> <% i = i + 1 Execute("set xml_" & i & " = Server.CreateObject(""Microsoft.XMLDOM"")") Execute("xml_" & i & ".async = false") Execute("xml_" & i & ".Load (""D:\Websites\test_mio_europe\xml_new\uk_en\specifications\6012.xml"")") %> <% If xml_0.parseError.errorcode <> 0 then 'Response.Write "Sorry, an error occurred retrieving information.: " & xml_0.parseError.errorcode else Set objLst = xml_0.getElementsByTagName("menu") group_name = "true" for each childel in objLst.item(0).childNodes trClass = childel.getAttribute("trclass") if (trClass = "group_name") then k = 1 if (j > 1) then response.write("
") & vbcrlf end if if (j mod 2 = 1) then response.write("
") & vbcrlf else response.write("
") & vbcrlf end if response.write("
") & vbcrlf response.write("
" & childel.text & "
") & vbcrlf j = j + 1 else if (k mod 2 = 1) then response.write("
") & vbcrlf else response.write("
") & vbcrlf end if response.write("
" & childel.text & "
") & vbcrlf currMenuId = childel.getAttribute("id") & "" if (currMenuId <> "")then Execute("Set theLabel = xml_" & i & ".getElementsByTagName(currMenuId)") response.write("
" & theLabel.item(0).Text & "
") & vbcrlf response.write("
") & vbcrlf end if k = k + 1 end if next end if Execute("set xml_" & i & " = nothing") set xml_0 = nothing %>