<%@ Language=VBScript %>
<% if cnsito.state=0 then cnsito.open end if set rsP=server.CreateObject("ADODB.Recordset") rsp.Open "SELECT * FROM Tv",cnSito,3,3 Response.Write(rsp("Titolo")) %>

<%=formatstr(rsp("Articolo"))%>