Sun Mar 27, 2011 10:51 pm
<%
Dim folderStream, fileStream
Set folderStream= CreateObject("Scripting.FileSystemObject")
Set fileStream= folderStream.CreateTextFile("c:\codemiles.txt", True)
fileStream.WriteLine("Codemiles text case.")
fileStream.Close
Set fileStream= folderStream.GetFile("c:\codemiles.txt")
// copy file.
fileStream.Copy ("c:\copy.txt")
%>
Codemiles.com is a participant in the Amazon Services LLC Associates Program, an affiliate advertising program designed to provide a means for sites to earn advertising fees by advertising and linking to Amazon.com
Powered by phpBB © phpBB Group.