vbs

set fs =createobject("scripting.filesystemobject")
set f=fs.opentextfile("C:/Users/Administrator/AppData/Roaming/BCompare/BCompare.ini",2)
f.writeline "[BCompare]"
f.writeline "InstallTime=" & DateDiff("s", "01/01/1970 00:00:00", Now()) 
f.writeline "LastLoading=" & DateDiff("s", "01/01/1970 00:00:00", Now()) 
f.close