<% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "Forum","","" SqlForum = "SELECT * FROM ElencoForum" Set Forum = Server.CreateObject("ADODB.Recordset") Forum.Open SqlForum, Conn, 3, 3 %> <% Forum.close Conn.close Set Forum=nothing Set Conn=nothing %>