<% @Language = VBScript %> <% Response.Status = "301 Moved Permanently" Response.AddHeader "Location", "http://" & Request.ServerVariables("server_name") & "/vollmer.aspx" %> <% strQ = strQ & "SELECT txtSystem, " strQ = strQ & "txtItemNumber, " strQ = strQ & "txtItemMfr, " strQ = strQ & "txtCountry, " strQ = strQ & "bolNLA, " strQ = strQ & "txtRailway, " strQ = strQ & "txtEra, " strQ = strQ & "txtItemDesc, " strQ = strQ & "txtYear, " strQ = strQ & "intInterface, " strQ = strQ & "lngNumericSort, " strQ = strQ & "txtDigitalDecoder, " strQ = strQ & "curSuperSale, " strQ = strQ & "curSalePrice, " strQ = strQ & "txtGrid " strQ = strQ & "FROM tblwebitems " strQ = strQ & "WHERE ((tblwebitems.txtSystem) " strQ = strQ & "='HO')AND " strQ = strQ & "((tblwebitems.txtItemMfr) " strQ = strQ & "='Vollmer')AND " strQ = strQ & "((tblwebitems.bolNLA) " strQ = strQ & "='0') ORDER BY RAND() LIMIT 1" objRS.Open strQ %> Vollmer Models
<% Randomize intChoice = Int(Rnd * 8) '2 is the number of case items Select Case intChoice %> <% Case 0 %> <% Case 1 %> <% Case 2 %> <% Case 3 %> <% Case 4 %> <% Case 5 %> <% Case 6 %> <% Case 7 %> <% End Select%>
Vollmer is considered by many modelers to be the absolute best and perfectly fitting structures on the market. Vollmer offers a complete selection of HO, N, Z and 1 Gauge structures and accessories. Reynauld's stock the complete Vollmer product line and our prices are fantastic. When it comes to Vollmer think of Reynauld's!
FEATURED ITEM
Vollmer HO Scale
Stations & Platforms
Vehicles
Bridges & Tunnels
Train Service Areas
Engine Sheds
Signal Boxes
Factories & Industrial Areas
Shops, Inns & Restaurants
Churches & Government
Houses & Apartments
Farms & Rural Areas
Amusement Park & Recreation
Accessories
Figures
Design Wall Plates
Road Foils
Starter Series
Vollmer N Scale
Stations & Platforms
Bridges & Tunnels
Service & Industrial Areas
Shops & Restaurants
Churches & Government
Houses & Apartments
Farms & Rural Areas
Amusement Park
Accessories
Wall Plates & Road Foils
Vollmer Z Scale
Backgrounds
Vollmer Price List
Vollmer 2008 New Items
<% objRS.Close Set objRS = Nothing objConn.Close Set objConn = Nothing %>