单线程没问题，多线程出问题

[chenzhichao2008]

大家好，请各位高手帮忙看一下，谢谢！


如果程序调用Go(url,depth)
可以运行

如果改用多线程，调用Run(url,depth)
就会出错

工程设置:debug multiThreaded dll

bool CEngine::GetSourceHtml( const CString &theUrl, CStringBuf &buf ) 
{
	CInternetFile* file = NULL;
	CInternetSession session;    //当执行这个一句时，theUrl值竟然被改变了
	CString str;
	try
	{
		// 试着连接到指定URL
		file = (CInternetFile*) session.OpenURL(theUrl); 
	}
	catch (CInternetException* m_pException)
	{
		m_pException->Delete();
		return false;
	}
	buf.m_buf="";
	while( file->ReadString(str) != NULL )
	{
		buf.m_buf+=str;
	}
	buf.m_language = HTML_LAN_CHINESE;
	return true;
}

void CEngine::Run(const CString &url, int depth)
{ 
	SetUrlAndDepth(url,depth);
	CloseHandle( CreateThread(NULL, 0, Go2, (LPVOID)this, 0, NULL) );
}

DWORD WINAPI CEngine::Go2( LPVOID lpParam )
{
	CEngine *g = (CEngine*) lpParam;
	g->Go(g->m_url, g->m_depth);
	AfxMessageBox(_T("complete"));
	return 1;
}

bool CEngine::Go(const CString &url, int depth)
{
	CComPtr<IDispatch> spDispatch;
	MSHTML::IHTMLDocument2Ptr pDoc;
	CComQIPtr<IHTMLDocument2, &IID_IHTMLDocument2> pDoc2;
	CComPtr<IHTMLElementCollection> pElementCol;
	CComPtr<IHTMLAnchorElement> pLoct;
	CStringBuf buf;
	MSHTML::IHTMLElementCollectionPtr pCollection;
	MSHTML::IHTMLElementPtr pElement;

	if( depth <= 0 || !m_hash.Insert((LPCSTR)url) )
		return false;

	if( !GetSourceHtml(url, buf) )
		return false;
	pDoc = GetDocument(buf);
        ...
}

[cnzdgs]

你可以在Go2中先显示一个MessageBox，接下来设置一个断点，查看m_url，估计这时就应该出问题了。如果没出问题，就继续单步调试，同时注意m_url的变化；如果MessageBox后已经出现问题，检查一下主线程在创建线程之后做了哪些操作，注意一下在m_url之前定义的数组是否存在访问越界。

[jameshooo]

Go2线程也必须执行CoInitialize(NULL)/CoUninitialize()，COM初始化必须每线程独立调用

[stivenjia]

CoInitialize(NULL);线程内初始化
CoInitializeEx我记得MSCOM有个这个东西能设定COM访问模型。

[chenzhichao2008]

嗯，问题找出来了，谢谢你们

有两个错误：一个是每个线程必须都初始化com
一个是
CloseHandle( CreateThread(NULL, 0, Go2, (LPVOID)this, 0, NULL) );
这里this不是全局对象，没办法实现线程之间的数据共享
CEngine g_engine;

CloseHandle( CreateThread(NULL, 0, Go2, (LPVOID)&engine, 0, NULL) );

这样就可以了


结贴:)

[chenzhichao2008]

CloseHandle( CreateThread(NULL, 0, Go2, (LPVOID)&g_engine, 0, NULL) );

[cnzdgs]

m_url被释放了吧？

[ouyh12345]

啥问题？

[scq2099yt]

能否贴出错误信息？

[kakashi0309]

问题不明确

[yayafu]

初始化com库试试

[chenzhichao2008]

不好意思，让大家久等了，刚才去吃饭了
声明部份 static DWORD WINAPI Go2( LPVOID lpParam );


CInternetSession session; //当执行这个一句时，theUrl值竟然被改变了，改成乱西八糟的东西,要能是theUrl
被释放了

有时调试错误还是发生在:
可以确定m_hash.Insert((LPCSTR)url)代码没问题

if( depth <= 0 || !m_hash.Insert((LPCSTR)url) )
return false;

[chenzhichao2008]

在程序开始已经有调用CoInitialize(NULL);

[chenzhichao2008]

主要错误是 bool CEngine::GetSourceHtml( const CString &theUrl, CStringBuf &buf )
的theUrl值被CInternetSession session;语句改了

如果只是调用Go，而不是调用run，就不会出现问题
也就是没有另开一个新线程，程序是没问题的

[lehedele]

潜水多年，今日上岸，继续学习

[formajia3]

很受益！

[majiajun_no_3]

分析得精彩.....

[formajia5]

受教了，继续阿楼主

[formajia5]

支持下