[ASP] Tekstfile waardes vervangen

[Polderdijk]

Ik ben even bezig om een config file automatisch te laten maken in ASP. Hiervoor heb ik onderstaande code geschreven welke een voorbeeld bestand moet inlezen. In dit voorbeeld bestand heb ik variabelen gemaakt die moeten worden vervangen ([domein] en [iisnummer]).

ASP:

<%
Domein = Request.Form("Domein")
IISNummer = Request.Form("IISNummer")

If Domein <> "" AND IISNummer <> "" Then
    Dim FSO
    Const ForReading = 1, ForWriting = 2, ForAppending = 8

    Set FSO = CreateObject("Scripting.FileSystemObject")
    Set txtFile = FSO.OpenTextFile("D:\xxx\awstats.[domein].conf", ForReading)
    tmpData = txtFile.ReadAll
    
    Response.Write tmpData 'Data wordt weegegeven
    tmpData = Replace(tmpDate, "[domein]", Domein)
    Response.Write tmpData 'Data wordt NIET meer weergegeven!
    tmpData = Replace(tmpDate, "[iisnummer]", IISNummer)
    FileName = "D:\xxx\" & Replace("awstats.[domein].conf", "[domein]", Domein)

    If NOT FSO.FileExists(FileName) Then
        FSO.CreateTextFile(FileName)
        Set txtFile2 = FSO.OpenTextFile(FileName, ForWriting)
        txtFile2.Write tmpData
    Else
        Response.Write "This file (""" & FileName & """) already exists."
    End If

    Set FSO = Nothing
End If
%>
[hier de html-code]

Maar als ik dit script uitvoer dan krijg ik wél een tekstfile zoals awstats.www.test.nl.conf maar deze is helemaal leeg. De eerste Response.Write tmpData geeft het volledige inhoud van de config file, maar bij de 2e Response.Write tmpData is deze helemaal leeg. Ik heb dus het idee dat ik met wat grotere data (zo'n 300 regels) ik niet meer de Replace functie kan gebruiken.

Weet iemand toevallig wat ik fout doe, of een misschien wel betere oplossing?

[Verwijderd]

je hebt een tikfout in je code staan, in de replace-regels. er staat 1 keer tmpData en daarna tmpDate

[gorgi_19]

Zie boven; kwestie van debuggen.. Tip van de dag: Option Explicit