VBS初心者です。

あるWebページにpreタグが1か所あります。そのタグの内容を変数elementsに取得して、Msgboxで画面に表示するスクリプトを下記の通り作成して実行したら、最後の行でステートメントがありませんというエラーが出ます。

どう直せばよいかアドバイスをお願いします。

----<start of code>----
Dim elements

Set objFSO = WScript.CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(writeFilePath, 8, True)

Set elements = document.GetElementsByTagName("pre")

MsgBox "elementsは" & vbCrLf & CStr(elements)

----<end of code>----