 |
||
| ||
| |||||
| Dernière réponse | |
|---|---|
| Sujet : C et C++ : vous pouvez m'aider ? | |
| Gnub | Voilà : je programme en visual basic et j'ai trouvé un bout de code qui m'intéresse mais il est en c ou c++
Est-ce que quelqu'un qui fait du C ou du C++ peut me le mettre dans une dll pour que je puisse l'utiliser dans un programpme en vb ? ============================================ C version ============================================ #include <windows.h> #include <windowsx.h> #include <objbase.h> #include <shlobj.h> #include <stdio.h> #include <initguid.h> #include <string.h> main(int ac, char *av[]) { IShellLink *psl; HRESULT hres; WIN32_FIND_DATA wfd; char szGotPath[MAX_PATH]; IPersistFile *ppf; if (ac != 2) { printf("Syntax: ln <pathname>\n" ); return 0; } hres = CoInitialize(NULL); if (!SUCCEEDED(hres)) printf("Could not open the COM library\n" ); hres = CoCreateInstance(&CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER, &IID_IShellLink, (LPVOID *)&psl); if (SUCCEEDED(hres)) { hres = psl->lpVtbl->QueryInterface(psl, &IID_IPersistFile, &ppf); if (SUCCEEDED(hres)) { WORD wsz[MAX_PATH]; MultiByteToWideChar(CP_ACP, 0, av[1], -1, wsz, MAX_PATH); hres = ppf->lpVtbl->Load(ppf, wsz, STGM_READ); if (SUCCEEDED(hres)) { hres = psl->lpVtbl->Resolve(psl, 0, SLR_ANY_MATCH); if (SUCCEEDED(hres)) { strcpy(szGotPath, av[1]); hres = psl->lpVtbl->GetPath(psl, szGotPath, MAX_PATH, (WIN32_FIND_DATA *)&wfd, SLGP_SHORTPATH ); if (!SUCCEEDED(hres)) printf("GetPath failed!\n" ); printf("This points to %s\n", wfd.cFileName); if (wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) printf("This is a directory\n" ); } } else printf("IPersistFile Load Error\n" ); ppf->lpVtbl->Release(ppf); } else printf("QueryInterface Error\n" ); psl->lpVtbl->Release(psl); } else printf("CoCreateInstance Error - hres = %08x\n", hres); return 0; } ================================== C++ version ================================== #include <windowsx.h> #include <objbase.h> #include <shlobj.h> #include <stdio.h> #include <initguid.h> #include <stdlib.h> #include <io.h> #include <string.h> // This program should print out whether the file is a link and where it // points to and whether it is a directory or not. // main(int ac, char *av[]) { if (ac != 2) { printf("Syntax: ln <pathname>\n" ); return 0; } IShellLink *psl; // pointer to IShellLink i/f HRESULT hres; WIN32_FIND_DATA wfd; char szGotPath[MAX_PATH]; // Get pointer to the IShellLink interface. hres = CoCreateInstance(CLSID_ShellLink, NULL, CLSCTX_INPROC_SERVER, IID_IShellLink, (LPVOID *)&psl); if (SUCCEEDED(hres)) { // Get pointer to the IPersistFile interface. IPersistFile *ppf; hres = psl->QueryInterface(IID_IPersistFile, (LPVOID *)&ppf); if (SUCCEEDED(hres)) { WORD wsz[MAX_PATH]; // Ensure string is Unicode. MultiByteToWideChar(CP_ACP, 0, av[1], -1, wsz, MAX_PATH); // Load the shell link hres = ppf->Load(wsz, STGM_READ); if (SUCCEEDED(hres)) { // Resolve the link. hres = psl->Resolve(0, SLR_ANY_MATCH); // ^ // Using 0 instead -| of hWnd, as hWnd is only used if // interface needs to prompt for more information. Should use // hWnd from current console in the long run. if (SUCCEEDED(hres)) { strcpy(szGotPath, av[1]); hres = psl->GetPath(szGotPath, MAX_PATH, (WIN32_FIND_DATA *)&wfd, SLGP_SHORTPATH ); if (!SUCCEEDED(hres)) printf("GetPath failed!\n" ); printf("This points to %s\n", wfd.cFileName); if (wfd.dwFileAttributes & FILE_ATTRIBUTE_DIRECTORY) printf("This is a directory\n" ); } } else printf("IPersistFile Load Error\n" ); ppf->Release(); } else printf("QueryInterface Error\n" ); psl->Release(); } else printf("CoCreateInstance Error - hres = %08x\n", hres); return 0; } |
| Vue Rapide de la discussion |
|---|
