Niveau
..........
En rapport...

écrire dans un fichier

Cette petite fonction permet d'écrire dans un fichier.
Elle comporte 3 paramètres :

asp
function fileWrite(byVal fileName, byVal contents, byVal append)
	dim oFS, iMode, oTF
	on error resume next
	set oFs = server.createobject("Scripting.FileSystemObject")
	if append = true then
		iMode = 8
	else 
		iMode = 2
	end if
	set oTF = oFs.OpenTextFile(fileName, iMode, True)
	oTF.Write contents
	oTF.Close
	set oTF = nothing
	set oFS = nothing
	on error goto 0
end function


06/03/2007 09:25 -

iDo –