Creare file con oggetto stream di ADO Non tutti sanno che l'oggetto Stream di ADO puo` manipolare benissimo anche file testuali. Perche` usarlo rispetto a FSO? E' piu` performante nel caso di grossi file.
In questo esempio vediamo come creare un file di testo:
<!--METADATA TYPE="typelib"
UUID="00000205-0000-0010-8000-00AA006D2EA4"
NAME="ADODB Type Library"
-->
<%
UserFile = Server.MapPath("prova.text")
contenuto = "file creato il " & Now)()
'ADODB.Stream
Set oStream = Server.CreateObject("ADODB.Stream")
' apro lo stream
oStream.Open
' charset
oStream.Charset = "ascii"
' tipo di scrittura: testo
oStream.Type = adTypeText
' scrivo il testo e salvo su file
oStream.WriteText contenuto
oStream.SaveToFile userFile, adSaveCreateOverWrite
' chiudo lo stream
oStream.Close
set oStream = Nothing
%>
|
|