1870人阅读
下边的在网上找的代码:
-------------------------------------------------------------------------
int _tmain(int argc, TCHAR* argv[], TCHAR* envp[])
::CoInitialize(NULL);//初始化 COM 公寓
EnumIE();//枚举浏览器
::CoUninitialize();//释放 COM 公寓
cout && _T(&======完成======&) &&
getchar();//等待回车
void EnumIE( void )
cout && _T(&开始扫描系统中正在运行的浏览器实例&) &&
CComPtr& IShellWindows & spShellW
HRESULT hr = spShellWin.CoCreateInstance( CLSID_ShellWindows );
if ( FAILED ( hr ) )
cout && _T(&获取 IShellWindows 接口错误&) &&
long nCount = 0;// 取得浏览器实例个数(Explorer 和 IExplorer)
spShellWin-&get_Count( &nCount );
if( 0 == nCount )
cout && _T(&没有在运行着的浏览器&) &&
for(int i=0; i&nC i++)
CComPtr& IDispatch & spDispIE;
hr=spShellWin-&Item(CComVariant( (long)i ), &spDispIE );
if ( FAILED ( hr ) )
CComQIPtr& IWebBrowser2 & spBrowser = spDispIE;
if ( !spBrowser )
CComPtr & IDispatch & spDispD
hr = spBrowser-&get_Document( &spDispDoc );
if ( FAILED ( hr ) )
CComQIPtr& IHTMLDocument2 & spDocument2 = spDispD
if ( !spDocument2 )
// 程序运行到此，已经找到了 IHTMLDocument2 的接口指针
EnumForm( spDocument2 );//枚举所有的表单
void EnumFrame( IHTMLDocument2 * pIHTMLDocument2 )
if ( !pIHTMLDocument2 )
CComPtr& IHTMLFramesCollection2 & spFramesCollection2;
pIHTMLDocument2-&get_frames( &spFramesCollection2 );//取得框架frame的集合
long nFrameCount=0;//取得子框架个数
hr = spFramesCollection2-&get_length( &nFrameCount );
if ( FAILED ( hr ) || 0 == nFrameCount )
for(long i=0; i&nFrameC i++)
CComVariant vDispWin2;//取得子框架的自动化接口
hr = spFramesCollection2-&item( &CComVariant(i), &vDispWin2 );
if ( FAILED ( hr ) )
CComQIPtr& IHTMLWindow2 & spWin2 = vDispWin2.pdispV
if( !spWin2 )//取得子框架的 IHTMLWindow2 接口
CComPtr & IHTMLDocument2 & spDoc2;
spWin2-&get_document( &spDoc2 );//取得字框架的 IHTMLDocument2 接口
EnumForm( spDoc2 );//递归枚举当前子框架 IHTMLDocument2 上的表单form
void EnumForm( IHTMLDocument2 * pIHTMLDocument2 )
if( !pIHTMLDocument2 )
EnumFrame( pIHTMLDocument2 );//递归枚举当前 IHTMLDocument2 上的子框架fram
CComBSTR bstrT
pIHTMLDocument2-&get_title( &bstrTitle );//取得文档标题
USES_CONVERSION;
cout && _T(&====================&) &&
cout && _T(&开始枚举“&) && OLE2CT( bstrTitle ) && _T(&”的表单&) &&
cout && _T(&====================&) &&
CComQIPtr& IHTMLElementCollection & spElementC
hr = pIHTMLDocument2-&get_forms( &spElementCollection );//取得表单集合
if ( FAILED( hr ) )
cout && _T(&获取表单的集合 IHTMLElementCollection 错误&) &&
long nFormCount=0;//取得表单数目
hr = spElementCollection-&get_length( &nFormCount );
if ( FAILED( hr ) )
cout && _T(&获取表单数目错误&) &&
for(long i=0; i&nFormC i++)
IDispatch *pDisp = NULL;//取得第 i 项表单
hr = spElementCollection-&item( CComVariant( i ), CComVariant(), &pDisp );
if ( FAILED( hr ) )
CComQIPtr& IHTMLFormElement & spFormElement = pD
pDisp-&Release();
long nElemCount=0;//取得表单中 域 的数目
hr = spFormElement-&get_length( &nElemCount );
if ( FAILED( hr ) )
for(long j=0; j&nElemC j++)
CComDispatchDriver spInputE//取得第 j 项表单域
hr = spFormElement-&item( CComVariant( j ), CComVariant(), &spInputElement );
if ( FAILED( hr ) )
CComVariant vName,vVal,vT//取得表单域的 名，值，类型
hr = spInputElement.GetPropertyByName( L&name&, &vName );
if( FAILED( hr ) )
hr = spInputElement.GetPropertyByName( L&value&, &vVal );
if( FAILED( hr ) )
hr = spInputElement.GetPropertyByName( L&type&, &vType );
if( FAILED( hr ) )
LPCTSTR lpName = vName.bstrVal?
OLE2CT( vName.bstrVal ) : _T(&NULL&);//未知域名
LPCTSTR lpVal = vVal.bstrVal?
OLE2CT( vVal.bstrVal ) : _T(&NULL&);//空值，未输入
LPCTSTR lpType = vType.bstrVal?
OLE2CT( vType.bstrVal ) : _T(&NULL&);//未知类型
cout && _T(&[&) && lpType && _T(&] &);
cout && lpName && _T(& = &) && lpVal &&
//提交这个表单
spFormElement-&submit();
--------------------------------------------------------------------
需要帮助的问题在这里:
表单我也可以遍历出来了,也会提交了,就是在提交前需要有个自动向INPUT中填写信息的功能不会加,请问怎么加哦?谢谢!
也就是执行spFormElement-&submit();前应该怎么写,希望可以发上来代码和详细注解!谢谢
这个问题我也在网上找了几天了，人有些笨,不是看不懂,就是不会用,希望大家帮忙(50分)!
goingup 发表于
coderui 发表于
怎么实现自动填表呢?
谁帮帮我哦，谢谢!
qiujian5628 发表于
发送post请求提交表单不行吗？
coderui 发表于
楼上的朋友你QQ多少啊?喜欢交流吗?我的是
我只是想知道遍历表单后，该怎么去实现自动填表的功能!
谁帮我哦，继续，谢谢!
ppzine 发表于
这其实就是找到值后,组成一个post的http请求,建立与web服务器的socket 连接,发出去就行了
coderui 发表于
&这其实就是找到值后,组成一个post的http请求,建立与web服务器的socket 连接,发出去就行了&
有朋友可以告诉我,这个真的就是所谓的&网页自动填表&吗?
coderui 发表于
谁帮帮我啊?我一直在等.
jiangsheng 发表于
/// &summary&
/// Set the value of the given input element in a form
/// &/summary&
/// &param &the name of the input element&/param&
/// &param &the new value of the input element&/param&
/// &param &the reference of the form element&/param&
[CLSCompliant(false), ComVisible(false)]
static public void SetFormInputValue(string inputName, string inputValue, IHTMLFormElement form)
if (form== null)
object o = form.item(inputName, 0);
if (o == null)
IHTMLElement element = (IHTMLElement)o;
if (element.tagName.ToLower(System.Globalization.CultureInfo.InvariantCulture).CompareTo(&input&) == 0)
IHTMLInputElement inputElement = (IHTMLInputElement)
inputElement.value = inputV
else if (element.tagName.ToLower(System.Globalization.CultureInfo.InvariantCulture).CompareTo(&select&) == 0)
IHTMLSelectElement selectElement = (IHTMLSelectElement)
selectElement.value = inputV
else if (element.tagName.ToLower(System.Globalization.CultureInfo.InvariantCulture).CompareTo(&textarea&) == 0)
IHTMLTextAreaElement textAreaElement = (IHTMLTextAreaElement)
textAreaElement.value = inputV
/// &summary&
chary8088 发表于
LZ的这个代码我现在就是在用，写信息很简单的：
CString Comstr=lpType,ComVal=lpV
CString Tmp=&&;
Tmp.Format(&测试%d智能灌水机器人\nQQ:&,j);
if(Comstr.Find(&textarea&)&=0)//&&ComVal.Find(&回复&)&=0
CComVariant vSetStatus(Tmp);
spInputElement.PutPropertyByName ///这里：）(L&value&,&vSetStatus);
Comstr=&&;
ComVal=&&;
spFormElement-&submit();
coderui 发表于
我朋友说试了，可以填表了.
但是字符串是unsinged short *的形式.
填进去的是乱码,怎么可以填进去CString类型呢?
leo_sysu 发表于
spInputElement.PutPropertyByName ///这里：）(L&value&,&vSetStatus);
好像这个不行,呵呵.
coderui 发表于
spInputElement.PutPropertyByName ///这里：）(L&value&,&vSetStatus);
好像这个不行,呵呵.
谁帮帮忙哦,谢谢!
coderui 发表于
spInputElement.PutPropertyByName ///这里：）(L&value&,&vSetStatus);
谁帮帮哦，谢谢!
chary8088 发表于
CString Comstr=lpType,ComVal=lpV
CString Tmp=&&;
Tmp.Format(&测试%d智能灌水机器人\nQQ:&,j);
if(Comstr.Find(&textarea&)&=0)//&&ComVal.Find(&回复&)&=0
CComVariant vSetStatus(Tmp);
spInputElement.PutPropertyByName(L&value&,&vSetStatus);//这样的
Comstr=&&;
ComVal=&&;
spFormElement-&submit();
绝对可以，我天天用
moonthief 发表于
请问楼上你写过表单自动提交的程序吧。。。能不能给个源码参考一下，我在写一个自动提交内容的程序，我用的是winInet，post的方式，可是经常会卡，不知道怎么解决，如果你的那个方法好的话，想参考一下。。。谢谢
参考知识库
* 以上用户言论只代表其个人观点，不代表CSDN网站的观点或立场
访问：126366次
积分：1352
积分：1352
排名：千里之外
转载：58篇
(1)(1)(1)(1)(3)(9)(2)(1)(2)(2)(1)(2)(1)(1)(2)(1)(2)(1)(1)(2)(1)(7)(2)(4)(2)(1)(2)(3)(2)(2)(5)急！急！急！求各位帮帮忙！谢谢了。本人在一个小厂上班，应聘的时候签约了一份表单，说是三个月内不可以_百度知道网页设计题 高手帮帮忙...求助答案~急~~~在线等~~~_百度知道百度知道 - 信息提示
知道宝贝找不到问题了&_&!!
该问题可能已经失效。
秒以后自动返回}