Salve a tutti,
dalla mia applicazione asp con linguaggio vbscript, ho la necessità di effettuare delle stampe su word leggendo i dati da un db accass.
Ho utilizzato il metodo della sostituzione di parametri fissi nel mio template:

'Nome del modulo da utilizzare
NomeReport= request("NomeReport")

percorso= server.mappath("/moduli/" & NomeReport &".rtf")

'Per leggere il documento utilizzo FSO
Set fso = CreateObject("Scripting.FileSystemObject")

'doc.rtf e' il documento di base che contiene i tag
Set f = fso.OpenTextFile(Percorso, 1)

'Leggo tutto il contenuto del documento
Documento = f.ReadAll

'chiudo subito
f.Close
Set f = Nothing

Documento = Replace(Documento,"<<Codice>>",Codice)
Documento = Replace(Documento,"<<Nome>>",Nome)

'creo un nuovo documento con dati reali al posto dei TAG
NomeFile=NomeReport &"_" & time()
NomeFile=replace(NomeFile,":","_")&".rtf"
percorso=server.mappath("/webSoc/Doc/" & NomeFile)
Set f = fso.OpenTextFile(Percorso, 2,True)

f.Write Documento

f.Close
Set f = Nothing

Alla fine con un comando javascript apro quanto creato
<SCRIPT language="javascript">
location.href('http://<%=Nomeserver%>/webSoc/doc/<%=NomeFile%>');
</SCRIPT>


Tutto ok!
Il problema sorge quando devo passare più record contemporaneamente al mio documento (Es: devo passare l'elenco delle fatture emesse)

Avevo pensato questo: 1) creo una macro nel documento rtf che copi la struttura del mip template 2) ad ogni nuovo record letto, eseguo la macro nel documento



No riesco a trovare il modo per leggere la macro. Come posso fare? avete altre idee?

---

Modificato da ddtdavide il 07 settembre 2006 12.22 -