at anvende readTextFile på en asp fil

Jeg skal sende en automatisk velkomstemail ud, når man tilmelder sig, og dertil har jeg lavet en asp side: velkomst.asp

Jeg skriver ud således:

function readTextFile(fname)
  fname = server.MapPath(fname)
 
  set fobj = Server.CreateObject("Scripting.FileSystemObject")
  set txtFile = fobj.getFile(fname)
  Set TextStream = txtFile.OpenAsTextStream(1)
    Do     While Not TextStream.AtEndOfStream
        S = S & TextStream.ReadLine
    Loop
    TextStream.Close

    readTextFile = S
 
end function
------------------
og jeg har en funktion

function SendMail (BEmail, TjekNr)

hvori:

dim bodytemplate
bodytemplate = readTextFile("velkomst.asp")
Mailer.BodyText = bodytemplate

--------
Problemet er, at velkomst.asp skal bruge de to variable BEmail og TjekNr i teksten. Hvordan får jeg det til at lykkes?