<%FunctionDownloadTime(intFileSize,strModemType)DimTimeInSeconds,ModemSpeed,strDownloadTime,AppendStringDimintYears,intWeeks,intDaysDimintHours,intMinutes,intSecondsintYears=0intWeeks=0intDays=0intHours=0intMinutes=0intSeconds=0strDownloadTime=""SelectCasestrModemTypeCase"Cable" ModemSpeed=4...