新方法

别人给的代码，好像与ATL相关技术写的，看不大懂，谁能解释一下。
if(SUCCEEDED(spDispatch->QueryInterface(IID_IHTMLFormElement,(void**)&pFormElement)))
  {
  // AfxMessageBox;
  long q=0;
  if(SUCCEEDED(pFormElement->get_length(&q)));
  for(long j=0;j<=(q-1);j++)
  {
          V_VT(&id) = VT_I4;
                  V_I4(&id) = j;
                  V_VT(&index) = VT_I4;
                  V_I4(&index) = 0;
                  if(SUCCEEDED(pFormElement->item(id,index, &spDispatch)))

                 

if(SUCCEEDED(spDispatch->QueryInterface(IID_IHTMLInputTextElement,(void**)&pInputElement)))
      {
        //AfxMessageBox;
                  CComBSTR value;
          CComBSTR type;
          pInputElement->get_type(&type);
                 
                  CString strtype(type);
                  strtype.MakeUpper();
        if (lstrcmpi(strtype, _T("TEXT")) == 0)
        {
        pInputElement->get_value(&value);
        CString strvalue(value);
        AfxMessageBox(strvalue);
                  }
                }
            }
          }
        }
      }
         
}