Set oFS = CreateObject("Scripting.FileSystemObject")
Set oFile = oFS.OpenTextFile(log_file_name)
Content = oFile.ReadAll
oFile.Close
//Вот только я не помню, ява это или бейсик
//После выполнения содержимое файла log_file_name оказывается в переменной Content. Если я таки спутал и это Бейсик - то в Яве делается почти так же, только синтаксис другой.