不了解com,高手指点一下

[wateryh]

下面的函数是从网上copy的，
把zip文件解压，很管用。

现在的问题是，在解压的时候，会弹出一个正在复制的对话框。
要去掉这个对话框，修改哪里啊


bool UnZipFolder(LPCTSTR zipFile,LPCTSTR destination)
{

DWORD strlen = 0;
HRESULT hResult;
IShellDispatch *pISD;
Folder *pToFolder = NULL;
Folder *pFromFolder = NULL;
FolderItems *pFolderItems = NULL;
FolderItem *pItem = NULL;

VARIANT vDir, vFile, vOpt;
BSTR strptr1, strptr2;
CoInitialize(NULL);

bool bReturn = false;

hResult = CoCreateInstance(CLSID_Shell, NULL, CLSCTX_INPROC_SERVER,
IID_IShellDispatch, (void **)&pISD);

if(FAILED(hResult))
{
return bReturn;
}

VariantInit(&vOpt);
vOpt.vt = VT_I4;
vOpt.lVal = 16+4; // Do not display a progress dialog box ~ This will not work properly!


CString strZipFile(zipFile);
CString strDestination(destination);
strptr1 = strZipFile.AllocSysString();
strptr2 = strDestination.AllocSysString();

VariantInit(&vFile);
vFile.vt = VT_BSTR;
vFile.bstrVal = strptr1;
hResult = pISD->NameSpace(vFile, &pFromFolder);

VariantInit(&vDir);
vDir.vt = VT_BSTR;
vDir.bstrVal = strptr2;

hResult = pISD->NameSpace(vDir, &pToFolder);

if(S_OK == hResult)
{
hResult = pFromFolder->Items(&pFolderItems);
if(SUCCEEDED(hResult))
{
long lCount = 0;
pFolderItems->get_Count(&lCount);
IDispatch* pDispatch = NULL;
pFolderItems->QueryInterface(IID_IDispatch,(void**)&pDispatch);
VARIANT vtDispatch;
VariantInit(&vtDispatch);
vtDispatch.vt = VT_DISPATCH;
vtDispatch.pdispVal = pDispatch;

//cout << "Extracting files ...\n";
hResult = pToFolder->CopyHere(vtDispatch,vOpt);
if(hResult != S_OK) return false;


//Cross check and wait until all files are zipped!
FolderItems* pToFolderItems;
hResult = pToFolder->Items(&pToFolderItems);

if(S_OK == hResult)
{
long lCount2 = 0;

hResult = pToFolderItems->get_Count(&lCount2);
if(S_OK != hResult)
{
pFolderItems->Release();
pToFolderItems->Release();
SysFreeString(strptr1);
SysFreeString(strptr2);
pISD->Release();
CoUninitialize();
return false;
}
//Use this code in a loop if you want to cross-check the items unzipped.
/*if(lCount2 != lCount)
{
pFolderItems->Release();
pToFolderItems->Release();
SysFreeString(strptr1);
SysFreeString(strptr2);
pISD->Release();
CoUninitialize();
return false;
}*/

bReturn = true;
}

pFolderItems->Release();
pToFolderItems->Release();
}

pToFolder->Release();
pFromFolder->Release();
}

//cout << "Over!\n";
SysFreeString(strptr1);
SysFreeString(strptr2);
pISD->Release();

CoUninitialize();
return bReturn;
}

[雪影]

VariantInit(&vOpt);
vOpt.vt = VT_I4;
vOpt.lVal = 16+4; // Do not display a progress dialog box ~ This will not work properly!

这里是设置不显示进度条的，但不能保证正常工作

lz悲剧了~~

• 打赏
• 举报

回复 赞

[stonewater]

看来是不支持不显示窗口,
悲剧了

• 打赏
• 举报

回复 赞

[wateryh]

VariantInit(&vOpt);
vOpt.vt = VT_I4;
vOpt.lVal = 16+4; // Do not display a progress dialog box ~ This will not work properly!

上面的的那个值（16+4），是在哪里可以找到它代表的意思啊

• 打赏
• 举报

回复 赞

[雪影]

vItem Required. The item or items to copy. This can be a string that represents a file name, a FolderItem object, or a FolderItems object.
vOptions Optional. Options for the copy operation. This value can be zero or a combination of the following values. These values are based upon flags defined for use with the fFlags member of the C++ SHFILEOPSTRUCT structure. These flags are not defined as such for Microsoft Visual Basic, Visual Basic Scripting Edition (VBScript), or Microsoft JScript, so you must define them yourself or use their numeric equivalents.
4 Do not display a progress dialog box.
8 Give the file being operated on a new name in a move, copy, or rename operation if a file with the target name already exists.
16 Respond with "Yes to All" for any dialog box that is displayed.
64 Preserve undo information, if possible.
128 Perform the operation on files only if a wildcard file name (*.*) is specified.
256 Display a progress dialog box but do not show the file names.
512 Do not confirm the creation of a new directory if the operation requires one to be created.
1024 Do not display a user interface if an error occurs.
2048 Version 4.71. Do not copy the security attributes of the file.
4096 Only operate in the local directory. Don't operate recursively into subdirectories.
9182 Version 5.0. Do not copy connected files as a group. Only copy the specified files.

• 打赏
• 举报

回复 赞

[踏实每一步]

16+4;改成16

• 打赏
• 举报

回复 赞

[wateryh]

[Quote=引用 3 楼 wateryh 的回复:]
VariantInit(&vOpt);
vOpt.vt = VT_I4;
vOpt.lVal = 16+4; // Do not display a progress dialog box ~ This will not work properly!

上面的的那个值（16+4），是在哪里可以找到它代表的意思啊
[/Quote]

这个是怎么找到的啊
我在msdn里面搞了一下午没找到，汗...

• 打赏
• 举报

回复 赞

[j307533688]

LZ，
1.folder 的copyhere方法， 进度条的操作， 对compress *.zip文件 可能没有效果；

2.不用纠结那个值了，FOF_UI, 设置成这个，你跳进去就知道了

• 打赏
• 举报

回复 赞