$rc = Open(1, "d:\oldfile.html", 2)
$rc = Open(2, "d:\newfile.html", 5)
$line = ReadLine(1)
While @ERROR = 0
	If InStr($line, "$")
		While InStr($line, "$")
			;translate any var in string to actual value
		Loop
		$rc = WriteLine(2, $line + @CRLF)
	Else
		$rc = WriteLine(2, $line + @CRLF)
	EndIf
	$line = ReadLine(1)
Loop
$rc = Close(1)
$rc = Close(2)

[postprep]$rc = Open(1, "d:\oldfile.html", 2)
if @error "couldn't open the source file: " @error ? get $ endif
if exist("d:\newfile.html") del "d:\newfile.html" endif
$rc = Open(2, "d:\newfile.html", 5)
$line = ReadLine(1)
While @ERROR = 0
	While InStr($line, "$")
		;translate any var in string to actual value
	Loop
	$rc = WriteLine(2, $line + @CRLF)
	$line = ReadLine(1)
Loop
$rc = Close(1)
$rc = Close(2)

[postprep]$rc = Open(1, "d:\oldfile.html", 2)
if @error "couldn't open the source file: " @error ? get $ endif
if exist("d:\newfile.html") del "d:\newfile.html" endif
$rc = Open(2, "d:\newfile.html", 5)
$line = ReadLine(1)
While @ERROR = 0
	If InStr($line, "$$")
		"vars on this line: " ?
		$line=Split($line,"$$")
		For $c=1 to Ubound($line)
		 $line[$c]="$$"+Trim(Split($line[$c],"<")[0])
		 $line[$c] ?
		Next
		?
		$line=join($line,"")
	Endif
	$rc = WriteLine(2, $line + @CRLF)
	$line = ReadLine(1)
Loop
"done, good night." get $
$rc = Close(1)
$rc = Close(2)

; ======================================================================
; Search a string for macros & replace with assigned data
Function ProcessMacros($_String)

  Dim $_Macro						; macro enumerator
  Dim $_Replace						; replacement value
  Dim $_I						; index pointer

  ; Environment Variable Processing
  $_String = ExpandEnvironmentVars($_String)		; expand vars first

  For $_I = 0 to UBound($aMACROS, 2)
    $_Macro = $aMACROS[0, $_I]				; macro name
    $_Replace = $aMACROS[1, $_I]			; replacement value

    ; replace the macro with the value
    If $_Replace
      $_String = Join(Split($_String, $_Macro), $_Replace)
    EndIf
  Next

  $ProcessMacros = $_String
  Exit 0

EndFunction

....
If Exist("D:\TempFiles\pickuprequest.html")
	Del "D:\TempFiles\pickuprequest.html"
EndIf
$rc = Open(1, "D:\Templates\Template_pickuprequest.html", 2)
$rc = Open(2, "D:\TempFiles\pickuprequest.html", 5)
$variables = "$$LabelDateTodayDate.Text", "$$TextBoxOurReference.Text", "$$LabelLoadingDate.Text", "$$TextBoxPackages.Text",
					"$$TextBoxWeight.Text", "$$ComboBoxPackaging.Text", "$$ComboBoxDescription.Text", "$$TextBoxSize.Text",
					"$$LabelRecipientText.Text", "$$TextBoxAttn.Text", "$$LabelAddressText.Text", "$$LabelZipcodeText.Text",
					"$$LabelCityText.Text", "$$LabelPhoneText.Text", "$$LabelCountryText.Text", "$$ComboBoxADR.Text",
					"$$ComboBoxStackable.Text", "$$ComboBoxSwapPackaging.Text"
			
$line = ReadLine(1)
While Not @ERROR
	While InStr($line, "$")
		For Each $variable in $variables	
			If InStr($line, $variable)
				$rc = Execute("$$variabletext = $variable")
				$line = Join(Split($line, $variable), $variabletext)
			EndIf
		Next					
	Loop
	$rc = WriteLine(2, $line + @CRLF)
	$line = ReadLine(1)
Loop
$rc = Close(1)
$rc = Close(2)
$ie = ReadValue("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\IEXPLORE.EXE", "")
$shellline = $ie + " " + '"D:\TempFiles\pickuprequest.html"'
Run $shellline
....