Quote:

$file[$line] = Join(Split($file[$line],$sOldString1),$newstring)



Finally... Thank you for your help.

Code:

Function Test
	$filename = 'C:\xfer.txt'
	$sOldString1= "%" + "windir" + "%"
	$newstring = '%systemdrive%'+ Split('%windir%',':')[1]
	$file = ReadFile($filename)
	For $line=0 to Ubound($file)-1
		If InStr($file[$line],$sOldString1)
			$file[$line] = Join(Split($file[$line],$sOldString1),$newstring) 
		EndIf
	Next 
	$Write = WriteFile('C:\xfer2.txt',$file)
EndFunction

Edited by dataspike (2006-02-22 09:30 PM)