perchè ti serve proprio rtf? Potresti farlo direttamente html. L'utente potrà aprirlo nel browser e stamparlo allo stesso modo in cui farebbe con un rtf su Word o WordPad.

Comunque, focalizzando sul problema, dovresti aprire Word e creare una tabella proprio come serve a te. In ogni cella in cui poi inserirai il testo del db, mettici dei segnaposto tipo #id# oppure #azienda#, ecc.. Ora salva il documento come rtf.

Il file rtf è fondamentalmente un file di testo, per cui se lo apri con blocco note, in mezzo all'ingarbugliamento ci ritroverai i tuoi segnaposto #id#,...

Dalla pagina asp quindi, apri il file in lettura con filesystemobject, butta tutto il contenuto in una variabile e comincia a fare dei replace per sostituire i segnaposto con i dati veri:

contenuto = Replace(contenuto, "#id#", rs("id"))
contenuto = Replace(contenuto, "#azienda#", rs("azienda"))
ecc...

apri in scrittura un nuovo file di testo, sempre con fso, e buttaci dentro la variabile contenuto. Chiudi gli oggetti e avrai ottenuto un nuovo rtf con i dati estratti dal db.
ciao

ps. sto vedendo che l'rtf non ha un buon supporto per le tabelle... cioè, esistono ma ad esempio non puoi centare il testo in una cella o allinearlo a destra senza che si scombini tutta la riga. ciao

in effetti è incasinato un bel po' l'rtf che viene salvato da word... anzi è proprio pessimo. Però puoi rimediare:

fai la tua tabella in word, creala di una sola riga (quella che poi dovrai ripetere). Salva come rtf.
Adesso apri il file con wordPad e seleziona tutta la riga con un clic all'immediata sinistra della prima cella. Copia.

Apri un nuovo file rtf sempre su WordPad e Incolla.
Adesso avrai un file rtf che contiene una tabella e che è depurato da tutte le zozzerie che Word ci aveva buttato dentro. Salvalo.

Apri questo file con blocco note e noterai che il codice è mooooolto più semplice. Ad esempio la mia riga è questa:

#campo1#\cell #campo2#\cell #campo3#\cell\f1\row

mi basterebbe quindi metterla in un ciclo per creare dinamicamente quante righe mi servono:

<%
while not rs.Eof
%>
<%=rs("campo1")%>\cell <%=rs("campo2")%>\cell <%=rs("campo3")%>\cell\f1\row
<%
rs.Movenext
wend
%>

se agisci in questo modo neanche ti servono quei segnaposto che ti dicevo prima. Infatti al loro posto basta mettere <%=rs("nomecampo")%>

ciao.

eccotelo qui...
magari ci capisci più di me...

http://forum.aspitalia.com/forum/topic.aspx?PostID=211102