CURSO DE ADMINISTRAÇÃO - APRESENTAÇÃO
<%
set rsTexto = Server.CreateObject("ADODB.Recordset")
rsTexto.ActiveConnection = MM_connDUportal_STRING
rsTexto.Source = "select texto from flfadmapresentacao"
rsTexto.CursorType = 0
rsTexto.CursorLocation = 2
rsTexto.LockType = 3
rsTexto.Open()
rsTexto_numRows = 0
dim texto
texto = rsTexto.Fields("texto").Value
rsTexto.Close()
Response.Write(texto)
%>