:: Model Hobby magazín

<% Dim kraj, strSearch, strKraj kraj = Request.QueryString("k") If kraj = 0 Then strKraj = "VŠECHNY MODELY" End If If kraj = 1 Then strKraj = "VOLNÉ BEZMOTOROVÉ" End If If kraj = 2 Then strKraj = "VOLNÉ MOTOROVÉ" End If If kraj = 3 Then strKraj = "UPOUTANÉ" End If If kraj = 4 Then strKraj = "RC BEZMOTORVÉ" End If If kraj = 5 Then strKraj = "RC MOTOROVÉ" End If If kraj = 6 Then strKraj = "RC POLOMAKETY" End If If kraj = 7 Then strKraj = "RC MAKETY" End If If kraj = 8 Then strKraj = "RC AKROBATICKÉ" End If If kraj = 9 Then strKraj = "VOLNÉ MINIMAKETY" End If Dim strPlany, mdbPlany Set strPlany = Server.CreateObject("ADODB.Recordset") If kraj = 0 Then mdbPlany = "SELECT ID, Nazev, Popis FROM Planky ORDER BY ID ASC" Else mdbPlany = "SELECT ID, Nazev, Popis FROM Planky WHERE Kategorie = "&kraj&" ORDER BY ID ASC" End If strPlany.ActiveConnection = Cnn strPlany.Open mdbPlany, Cnn %> :: Model Hobby magazín

Stavební plány

POZOR! NOVÉ CENY STAVEBNÍCH PLÁNŮ PLATNÉ OD 1.4.2005
(ceny se vztahují na dobírkové objednávky i objednávky poštovní poukázkou doručené po 1.4.2005!)
OBJEDNÁVKA NA DOBÍRKU
Při objednávce plánku na dobírku je připočten poplatek za dobírku 60,- Kč - cena platí pro celou objednávku.

POZOR! AKČNÍ NABÍDKA - SKANDÁLNÍ CENY

<%While Not strPlany.EOF%> <%strPlany.MoveNext Wend%>

();" class="text_b">

<%=strPlany("Nazev")%>, <%=strPlany("Popis")%>

();" class="text01">detail

Dělení podle kategorie