如何实现以下功能，在浏览器中选中一段文字，点右键保存到自己的数据库中？

Question

像网文快捕那样子的功能~（PowerCatcher）,菜单中打开的文件是save.htm，这个文件是这样的，
<script language="VBScript">Sub OnContextMenu()
On Error Resume Next
set Catcher=CreateObject("PowerCatcherAPI.HTMLCatcher")
if err<>0 then
     Alert("PowerCatcher haven't installed in your computer!")
   else
     call Catcher.CatchDoc(external.menuArguments.document)
   end if
end subCall OnContextMenu()
</script>
这里需要注册ActiveX吗？如何写本地的程序，让这个Htm调出可执行文件来保存选中的文字？

Answer 1

我做过类似的功能。记事本比较好做，很容易就能抓到，可是ie里面的文字就不是那么容易了，我是通过抓去句柄的方法，ie比较特殊。后来我用监视剪切版的方法替代的。

Answer 2

网文快捕这里PowerCatcherAPI.HTMLCatcher是如何写的~

Answer 3

做一个COM并注册就好了...其实象netant, flashget都是这样的.

Answer 4

我是通过类似google的IE工具栏做到的。
var
  IE: IWebbrowser2;
procedure AddIESelectToClipboard(flag: Boolean);
var
  doc:IHTMLdocument2;
  R:IHTMLTxtRange;
begin
  doc :=IHTMLdocument2(IE.Document) ;
  R :=IHTMLTxtRange(doc.selection.createRange);
  Clipboard.Clear;
  if flag then
    Clipboard.AsText := R.get_htmlText  //取html代码到粘贴板，数据库也是一样。
  else
    Clipboard.AsText := R.get_text;    //取纯文本代码到粘贴板。
end;
可以参考一下。