高分求救--怎样使用webbrowse提取网页中类似combobox中选定的值

Question

比如说在网页中选择了一个日期，怎么样将这个值提取出来
程序如下
o1 := WebBrowser1.OleObject.document.all.item('id1',0);
id1是combobox的id号，我怎么样通过o1将选择的日期找出来
解答立刻给分，谢

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var
  Docs, ovElements: OleVariant;
begin
  //Docs := WebBrowser1.OleObject.Document;
  Docs := Webbrowser1.document as IHTMLDocument2;
  ovElements := Docs.GetElementByID('id1');
  showMessage('Index:'+ IntToStr(ovElements.selectedIndex) + ' /Value: '+ ovElements.Value);
end;

Answer 2

为什么说ihtmldocument2没有声明呢，我查了一下帮助，找不到这个东东，请执教