Lariso - Cooperativa Sociale Onlus

<%@LANGUAGE="VBSCRIPT"%> <% Dim RSpag__MMColParam RSpag__MMColParam = "Credits" If (Request("MM_EmptyValue") <> "") Then RSpag__MMColParam = Request("MM_EmptyValue") End If %> <% Dim RSpag Dim RSpag_numRows Set RSpag = Server.CreateObject("ADODB.Recordset") RSpag.ActiveConnection = MM_con_lariso_STRING RSpag.Source = "SELECT tArticoli.*, tMenu.pagina, tMenu.sottomenu FROM tMenu INNER JOIN tArticoli ON tMenu.IDmenu = tArticoli.IDmenu WHERE pagina = '" + Replace(RSpag__MMColParam, "'", "''") + "'" RSpag.CursorType = 0 RSpag.CursorLocation = 2 RSpag.LockType = 1 RSpag.Open() RSpag_numRows = 0 %> Lariso - Cooperativa Sociale Onlus

<%=(RSpag.Fields.Item("pagina").Value)%>

<%=(RSpag.Fields.Item("testo").Value)%>

<% RSpag.Close() Set RSpag = Nothing %>