VBS

    Dim FSO : Set FSO = CreateObject(“Scripting.FileSystemObject”)
FSO.CopyFile cHtmlFilPath & ”\belaegning-“ & sSite & ”.html”, cHtmlFilPathbsappl104 & ”\belaegning-“ & sSite & ”.html”