output APS ma contenuto TXT

[iz7auh]

Ciao a tutti,
ho il seguente problema, ho realizzato una pagina di ricerca che come risultato deve avere un contenuto settato come TXT, pertanto vorrei capire come realizzare i codici

</P> e
nei codici
chr(13) chr(10)

Mi date una mano?
Ecco il codice:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
	Option Explicit
%>
<%  Dim QSQuery, QSLast, QSLog, MGR, oreco, QSO, SQN, RS, SQL, p
		QSQuery = Request.QueryString("iia")
%>
  
<%
	Set RS = Server.CreateObject("ADODB.RecordSet")
		SQL = " SELECT * FROM iia WHERE IIA_REF = '" & QSQuery & "' "
		Set RS = Conn.Execute(SQL)
				
if rs.eof then 
response.redirect("http://www.ilradioamatore.it/log-search/no_found.asp")
end if
%>
<%
	If Not RS.EOF Then RS.MoveFirst
	Do While Not RS.EoF
%>



IIA research for < <%=RS("IIA_REF")%>  > started...

  

  <%=RS("IIA_REF")%> -> <%=RS("IIA_NAME")%>

  

  IIA research for < <%=RS("IIA_NAME")%> > ended...

<%
	RS.MoveNext
	Loop
%>
</p>


Powered Francesco, IZ7AUH 

</p>

Saluti

[Roby_72]

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Option Explicit

Dim QSQuery, QSLast, QSLog, MGR, oreco, QSO, SQN, RS, SQL, p

QSQuery = Request.QueryString("iia")
%>

<%
Set RS = Server.CreateObject("ADODB.RecordSet")
SQL = " SELECT * FROM iia WHERE IIA_REF = '" & QSQuery & "' "
Set RS = Conn.Execute(SQL)
				
if rs.eof then 
	response.redirect("http://www.ilradioamatore.it/log-search/no_found.asp")
end if
If Not RS.EOF Then RS.MoveFirst
Do While Not RS.EoF
	Response.Write(VbCrLf &"IIA research for < "& RS("IIA_REF") &"  > started..."& VbCrlF)
	Response.Write(RS("IIA_REF") &" -> "& RS("IIA_NAME") & VbCrlF)
	Response.Write("IIA research for < "& RS("IIA_NAME") &" > ended..."& chr(10))
<%RS.MoveNext
Loop
%>
</p>


Powered Francesco, IZ7AUH 

</p>

Roby

[iz7auh]

Grazie Roby72,
solo adesso posso leggere la tua risposta.
Grazie!!!!

[Roby_72]

Meglio tardi che mai...

Roby