Set objTextFile = objFSO.CreateTextFile(strConfigPath) objTextFile.WriteLine "[" & strAppName & "]" objTextFile.WriteLine "Version=" & strVersion objTextFile.WriteLine "InstallDate=" & Now objTextFile.WriteLine "LastRun=" & Now objTextFile.WriteLine "Location=" & strScriptPath objTextFile.Close