高分求解决办法，高手过来看看，我可以把全部分给你

Question

例子http://www.skycn.com/soft/11992.html
问题：如信息发布王的引擎生成
当鼠标点击某网页中的文本框时，取得该文本框中的name，value属性

Answer 1

<td align=left>
   您的位置：<A href="../index.html" title="回到首页">首页</A>
   -> <A href="../sort/soft_sort.html" title="软件分类">软件分类</A>
   -> <A href='../sort/sort010000_indate_DESC_1.html' title='软件分类 - 网络软件'>网络软件</A>
   -> <A href='../sort/sort2011000_indate_DESC_1.html' title='软件分类 - 网络软件 - 网站推广'>网站推广</A>
   -> 海通商务信息发布王 V2.10
 </TD>

Answer 2

【声明】
Public Declare Function WindowFromPoint Lib "user32" Alias "WindowFromPoint" (ByVal xPoint As Long, ByVal yPoint As Long) As Long
【说明】
返回包含了指定点的窗口的句柄。忽略屏蔽、隐藏以及透明窗口
【返回值】
Long，包含了指定点的窗口的句柄。如指定的点处没有窗口存在，则返回零
【参数表】
  xPoint ---------  Long，x点值
  yPoint ---------  Long，y点值

Answer 3

先用它获得鼠标位置
【声明】
Public Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" (lpPoint As POINTAPI) As Long
【说明】
获取鼠标指针的当前位置
【返回值】
Long，非零表示成功，零表示失败。会设置GetLastError
【参数表】
  lpPoint --------  POINTAPI，随同指针在屏幕像素坐标中的位置载入的一个结构

Answer 4

再用
【声明】
Public Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
【说明】
取得一个窗体的标题（caption）文字，或者一个控件的内容（在vb里使用：使用vb窗体或控件的caption或text属性）
【返回值】
Long，复制到lpString的字串长度；不包括空中止字符。会设置GetLastError
【参数表】
  hwnd -----------  Long，欲获取文字的那个窗口的句柄  lpString -------  String，预定义的一个缓冲区，至少有cch+1个字符大小；随同窗口文字载入  cch ------------  Long，lpString缓冲区的长度
【其它】
不能用它从另一个应用程序的编辑控件中获取文字