At skrive en fil

Jeg sidder og roder med et lille problem. Måske I kan hjælpe?

Jeg er igang med at prøve at lave et install-script til et lille stykke webapp jeg er igang med.
Den fil der skal skrives er en ASP-fil der skal indeholde en brugers MySQL oplysninger (såsom database-url, databasenavn, brugernavn og password).

Problemet er at den ikke kan skrive <%, %>, og anførselstegn (").

Koden:

<%
    Const ForReading = 1, ForWriting = 2, ForAppending = 8
    Const TristateUseDefault = -2 'Opens file using system default.
    Const TristateTrue = -1 'Opens the file as unicode.
    Const TristateFalse = 0 'Opens the file as ASCII.
    Dim objFS, objTextS, strLine
   
    '### CREATING AND/OR WRITING TO FILE
    Set objFS=Server.CreateObject("Scripting.FileSystemObject")
    IF objFS.FileExists("C:\inetpub\wwwroot\ASP\test scripts\ReadWrite File Test\test.asp") = TRUE THEN
        Set objTextS = objFS.OpenTextFile("C:\inetpub\wwwroot\ASP\test scripts\ReadWrite File Test\test.asp", ForWriting, False, TristateFalse)
    ELSE
        Set objTextS = objFS.CreateTextFile("C:\inetpub\wwwroot\ASP\test scripts\ReadWrite File Test\test.asp", False, False)
    END IF
    objTextS.WriteLine "strDatabaseURL =" & Request.Form("database_url")
    objTextS.WriteLine "strDatabaseName =" & Request.Form("database_name")
    objTextS.WriteLine "strUsername =" & Request.Form("username")
    objTextS.WriteLine "strPassword =" & Request.Form("password")
    objTextS.Close

    Set objTextS = Nothing
    Set objFS = Nothing
%>

Jeg håber I kan hjælpe mig med at løse problemet.