工作组环境下，如何获取局域网内任意一台主机共享文件夹和隐藏共享

Question

我看到这段代码
Private Sub getShareFolderName(strComputerName As String)
    Dim s   As String
    Set fs = GetObject("WinNT://" & strComputerName & "/LanmanServer,FileService")
    For Each sh In fs
        List1.AddItem sh.Name
    Next
End Sub可是只能获取本机的共享文件夹，如果换成其他机器，就会出现“自动化错误”

Answer 1

#include <stdio.h>
#include <assert.h>
#include <windows.h> 
#include <svrapi.h>const short MAX_ENTRIES = 20;int main(int argc, char FAR * argv[])
{
   char FAR * pszServerName = NULL;
   short nLevel = 50;
   struct share_info_50* pBuf = NULL;
   struct share_info_50* pTmpBuf = NULL;
   short cbBuffer;
   short nEntriesRead = 0;
   short nTotalEntries = 0;
   short nTotalCount = 0;
   int i;
   NET_API_STATUS nStatus;
   //
   // ServerName can be NULL to indicate the local computer.
   //
   if (argc > 2)
   {
      printf("Usage: %s [\\\\ServerName]\n", argv[0]);
      exit(1);
   }   if (argc == 2)
      pszServerName = argv[1];
   //
   // Allocate the memory required to receive a maximum of
   //  20 share_info_50 structures.
   //
   cbBuffer = MAX_ENTRIES * sizeof(struct share_info_50);   pBuf = malloc(cbBuffer);   if (pBuf == NULL)
      printf("No memory\n");
   //
   // Call the NetShareEnum function to list the
   //  shares, specifying information level 50.
   //
   nStatus = NetShareEnum(pszServerName,
                          nLevel,
                          (char FAR *)pBuf,
                          cbBuffer,
                          &nEntriesRead,
                          &nTotalEntries);
   //
   // Loop through the entries; process errors.
   //
   if ((nStatus == NERR_Success) || (nStatus == ERROR_MORE_DATA))
   {
      if ((pTmpBuf = pBuf) != NULL)
      {
         for (i = 0; (i < nEntriesRead); i++)
         {
            assert(pTmpBuf != NULL);            if (pTmpBuf == NULL)
            {
               fprintf(stderr, "An access violation has occurred\n");
               break;
            }
            //
            // Display the information for each entry retrieved.
            //
            printf("\n\tShare: %s\n", pTmpBuf->shi50_netname);
            printf("\tPath: %s\n", pTmpBuf->shi50_path);            pTmpBuf++;
            nTotalCount++;
         }
      }
   }
   else
      fprintf(stderr, "A system error has occurred: %d\n", nStatus);
   //
   // Display a warning if the buffer was not large enough
   //  to contain all available entries.
   //
   if ((nEntriesRead < nTotalEntries) || (nStatus == ERROR_MORE_DATA))
      fprintf(stderr, "Not all entries have been enumerated\n");
   //
   // Free the allocated memory.
   //
   if (pBuf != NULL)
      free(pBuf);   fprintf(stderr, "\nTotal of %d entries enumerated\n", nTotalCount);   return 0;
}
====================
98下