- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
- 39
- 40
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
- 60
- 61
- 62
- 63
- 64
- 65
- 66
- 67
- 68
- 69
- 70
- 71
- 72
- 73
- 74
- 75
- 76
- 77
- 78
- 79
- 80
- 81
- 82
- 83
- 84
- 85
- 86
- 87
- 88
- 89
- 90
- 91
- 92
- 93
- 94
CreateZipFromFolder(CString m_outfile, CString outfolder)
{
CString m_outputfilename = m_outfile;
CString outpath = outfolder;
CString p;
TCHAR lpPathBuffer[BUFSIZE];
TCHAR lpPathBuffer1[BUFSIZE];
DWORD dwBufSize=BUFSIZE;
DWORD dwRetVal;
//find temp directory;
dwRetVal = GetTempPath(dwBufSize, //buffer length
lpPathBuffer); //path buffer
if (dwRetVal > dwBufSize || (dwRetVal == 0)) {
printf ("Failed to get temp path (%d)\n", GetLastError());
FILE *fp = fopen("C:\\Zip.vbs","w+");
}
FILE *fp ;
strcat(lpPathBuffer,"zip.vbs");
CString fileName = lpPathBuffer ;
if((fileName[0] != '\0'))
fp = fopen(fileName,"w+");
else(fp = fopen("C:\\Zip.vbs","w+"));
p.LoadString(RESID_30);
fprintf(fp,"Dim fso, winShell, MyTarget, MySource, file \n") ;
fprintf(fp,"Set fso = CreateObject(");
fprintf(fp,"%s",p);
fprintf(fp,"Scripting.FileSystemObject");
fprintf(fp,"%s",p);
fprintf(fp,") \n");
fprintf(fp,"Set winShell = createObject(");
fprintf(fp,"%s",p);
fprintf(fp,"Shell.Application");
fprintf(fp,"%s",p);
fprintf(fp,") \n");
fprintf(fp,"MySource =");
fprintf(fp,"%s",p);
fprintf(fp,"%s",outpath);
fprintf(fp,"%s \n",p);
fprintf(fp,"MyTarget =");
fprintf(fp,"%s",p);
fprintf(fp,"%s",m_outputfilename);
fprintf(fp,"%s \n",p);
fprintf(fp,"Set file = fso.CreateTextFile(MyTarget, True) \n");
fprintf(fp,"file.write ");
fprintf(fp,"%s",p);
fprintf(fp,"PK");
fprintf(fp,"%s",p);
fprintf(fp,"& chr(5) & chr(6) & string(18,chr(0)) \n");
fprintf(fp,"file.close \n");
fprintf(fp,"winShell.namespace(MyTarget).CopyHere winShell.namespace(MySource).items \n"); fprintf(fp,"do until winShell.namespace(MyTarget).items.count = winShell.namespace(MySource).items.count \n");
fprintf(fp,"wscript.sleep 1000 \n");
fprintf(fp,"loop \n \n");
fprintf(fp,"Set winShell = Nothing \n");
fprintf(fp,"Set fso = Nothing");
fclose(fp);
PROCESS_INFORMATION pi;
STARTUPINFO si;
ZeroMemory( &si, sizeof(si) );
si.cb = sizeof(si);
ZeroMemory( &pi, sizeof(pi) );
CString filename;
filename = p + lpPathBuffer + p;
CString szCommand;
BOOL ret = Is64Bit();
if(ret) {
DWORD dwRetVal;
//get the windows directory;
dwRetVal = GetWindowsDirectory(lpPathBuffer1,dwBufSize); //path buffer
strcat(lpPathBuffer1,"\\syswow64\\");
szCommand = lpPathBuffer1;
szCommand +="cmd.exe /c cscript //B ";
} else {
szCommand ="cmd.exe /c cscript //B ";
}
szCommand += filename ;
if(CreateProcess(NULL,szCommand.GetBuffer(szCommand.GetLength()),NULL,NULL,FALSE,DETACHED_PROCESS,NULL,NULL,&si,&pi)) {
WaitForSingleObject( pi.hProcess, INFINITE );
CloseHandle( pi.hProcess );
CloseHandle( pi.hThread );
}
return 0;
}
guest 10.03.2009 11:58 # 0
Как вырезать гланды автогеном через задний проход.