<%
call CreateAfile
Sub CreateAfile
Dim fso, FileAsp
Set fso = CreateObject("Scripting.FileSystemObject")
Set FileAsp = fso.CreateTextFile("c:\testfile.txt", True)
FileAsp.WriteLine("<%@LANGUAGE=""VBSCRIPT"" CODEPAGE=""1252"">")
FileAsp.WriteLine("<!-- #Include file=""file.asp"" -->")
FileAsp.WriteLine(" <" & "%= Blah %" & "")
Set FileAsp = nothing
Set fso = nothing
End Sub
%>
<vu******@gmail.comwrote in message news:11**********************@p77g2000hsh.googlegr oups.com...
>I create an ASP file using fso.createtextfile. But how do I avoid
double quotes and <% %signs when writing to file?
FileAsp.WriteLine("<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252">")
FileAsp.WriteLine("<!-- #Include file="file.asp" -->")
FileAsp.WriteLine(" <% =Blah %>")
Thanks