BOOL SendToGRC(LPCTSTR lpsz) {
	CString  str2 = '"';
	CString  ref = lpsz;
	int index = ref.ReverseFind('/'); //後ろから検索して'/'が見つかったときのindex値を返す
#ifdef IRVINE
	//str2 += ReadRegistryString(HKEY_CURRENT_USER, _T("Software\\WildForce\\Irvine\\path"), _T("application"), _T(""));//Irvine
	IApi irvine;
	irvine.CreateDispatch("Irvine.Api");
	irvine.AddUrlAndReferer(lpsz,ref.GetBufferSetLength(index + 1),0);
	irvine.ReleaseDispatch();
	return TRUE:
#endif
#ifdef IRIA
	//str2 += ReadRegistryString(HKEY_CLASSES_ROOT, _T("CLSID\\{0BAA4C49-E4E8-4A48-A740-C9E7EBCD9DAD}\\LocalServer32"), _T(""), _T(""));//Iria
	IIriaApi iria;
	iria.CreateDispatch("Iria.IriaApi");
	iria.Download(lpsz,0);
	iria.ReleaseDispatch();
	return TRUE;
#endif
#ifdef SAKURA
	IDCSakuraAPI sakura;
	sakura.CreateDispatch("Sakura.LovelyAPI");
	sakura.DownloadGoGo(lpsz);
	sakura.ReleaseDispatch();
	return TRUE;
#endif
#ifdef JETCAR
	IJetCarNetscape jet;
	jet.CreateDispatch("JetCar.Netscape");
	jet.AddUrl(lpsz,NULL,ref.GetBufferSetLength(index + 1));
	jet.ReleaseDispatch();
	return TRUE;
#endif
	/*	
	str2 += '"'; str2 += ' '; str2 += '"';
	str2 += lpsz; str2 += '"';
	if (WinExec(str2, SW_NORMAL)<=31) return FALSE;

	return TRUE;
	*/
}