<%@LANGUAGE="VBSCRIPT"%> <% set RecordsetTI = Server.CreateObject("ADODB.Recordset") RecordsetTI.ActiveConnection = MM_connUDE_STRING RecordsetTI.Source = "SELECT * FROM Text_Files Where ID = '" & request.querystring("IDTXT") & "'" RecordsetTI.CursorType = 0 RecordsetTI.CursorLocation = 2 RecordsetTI.LockType = 3 RecordsetTI.Open() RecordsetTI_numRows = 0 %> <% IDITEMHTML="1" %> <%=trim(RecordsetTI("Html_Tags"))%>
<% On Error Resume Next%> <%=Trim(RecordsetTI("Main_Text"))%> <%RecordsetTI.close%>