%@LANGUAGE="VBSCRIPT"%> <% Dim ceny__MMColParam ceny__MMColParam = "1" if (Request("MM_EmptyValue") <> "") then ceny__MMColParam = Request("MM_EmptyValue") %> <% set ceny = Server.CreateObject("ADODB.Recordset") ceny.ActiveConnection = MM_citroen_STRING ceny.Source = "SELECT * FROM Ceny WHERE ID = " + Replace(ceny__MMColParam, "'", "''") + "" ceny.CursorType = 0 ceny.CursorLocation = 2 ceny.LockType = 3 ceny.Open() ceny_numRows = 0 %> <% Dim soubory__MMColParam soubory__MMColParam = "1" if (Request("MM_EmptyValue") <> "") then soubory__MMColParam = Request("MM_EmptyValue") %> <% set soubory = Server.CreateObject("ADODB.Recordset") soubory.ActiveConnection = MM_citroen_STRING soubory.Source = "SELECT * FROM Ceniky WHERE ID = " + Replace(soubory__MMColParam, "'", "''") + "" soubory.CursorType = 0 soubory.CursorLocation = 2 soubory.LockType = 3 soubory.Open() soubory_numRows = 0 %>
![]() |
![]() |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|