指定classのテキスト取得→エレメントが存在しないエラー

IEのバージョンは１１だったのですが、IE操作（指定CLASS内のテキスト取得）では取得できなかったため

こちらの回答にある【getElementsByClassNameメソッドを使わない方法】のスクリプト変更をしたのですが

エラーが出て、1011　'='がありませんとでます。

どこを直せばいいのでしょうか。

回答の内容から抜き出させていただいてます↓

Set element = Nothing から Call SetUMSVariable($取得文字$, hitText)までの行を下記のスクリプトに置き換えます。

Set element = Nothing

Set all = document.document.all
count = 0
For i = 0 To all.Length - 1
  If all(i).className = cname Then
    If count = CInt(cindex) Then
      Set element = all(i)
      Exit For
    End If
    count = count + 1
  End If
Next

If element Is Nothing Then
  Err.Raise 1, "", "指定されたテキストを含むエレメントが存在しません。"
  WScript.Quit
End If

hitText = element.innerText

Call SetUMSVariable($取得文字$, hitText)

追記

winactorのバージョンは6.3.0です