Y
yeeler
Unregistered / Unconfirmed
GUEST, unregistred user!
J
jyniu
Unregistered / Unconfirmed
GUEST, unregistred user!
#ifndef UNICODE<br>#define UNICODE<br>#endif<br><br>#include <stdio.h><br>#include <assert.h><br>#include <windows.h> <br>#include <lm.h><br><br>int wmain(int argc, wchar_t *argv[])<br>{<br> LPWKSTA_USER_INFO_0 pBuf = NULL;<br> LPWKSTA_USER_INFO_0 pTmpBuf;<br> DWORD dwLevel = 0;<br> DWORD dwPrefMaxLen = -1;<br> DWORD dwEntriesRead = 0;<br> DWORD dwTotalEntries = 0;<br> DWORD dwResumeHandle = 0;<br> DWORD i;<br> DWORD dwTotalCount = 0;<br> NET_API_STATUS nStatus;<br> LPTSTR pszServerName = NULL;<br><br> if (argc > 2)<br> {<br> fwprintf(stderr, L"Usage: %s [////ServerName]/n", argv[0]);<br> exit(1);<br> }<br> // The server is not the default local computer.<br> //<br> if (argc == 2)<br> pszServerName = argv[1];<br> fwprintf(stderr, L"/nUsers currently logged on %s:/n", pszServerName);<br> //<br> // Call the NetWkstaUserEnum function, specifying level 0.<br> //<br> do // begin do<br> {<br> nStatus = NetWkstaUserEnum(pszServerName,<br> dwLevel,<br> (LPBYTE*)&pBuf,<br> dwPrefMaxLen,<br> &dwEntriesRead,<br> &dwTotalEntries,<br> &dwResumeHandle);<br> //<br> // If the call succeeds,<br> //<br> if ((nStatus == NERR_Success) || (nStatus == ERROR_MORE_DATA))<br> {<br> if ((pTmpBuf = pBuf) != NULL)<br> {<br> //<br> // Loop through the entries.<br> //<br> for (i = 0; (i < dwEntriesRead); i++)<br> {<br> assert(pTmpBuf != NULL);<br><br> if (pTmpBuf == NULL)<br> {<br> //<br> // Only members of the Administrators local group<br> // can successfully execute NetWkstaUserEnum<br> // locally and on a remote server.<br> //<br> fprintf(stderr, "An access violation has occurred/n");<br> break;<br> }<br> //<br> // Print the user logged on to the workstation. <br> //<br> wprintf(L"/t-- %s/n", pTmpBuf->wkui0_username);<br><br> pTmpBuf++;<br> dwTotalCount++;<br> }<br> }<br> }<br> //<br> // Otherwise, indicate a system error.<br> //<br> else<br> fprintf(stderr, "A system error has occurred: %d/n", nStatus);<br> //<br> // Free the allocated memory.<br> //<br> if (pBuf != NULL)<br> {<br> NetApiBufferFree(pBuf);<br> pBuf = NULL;<br> }<br> }<br> // <br> // Continue to call NetWkstaUserEnum while <br> // there are more entries. <br> // <br> while (nStatus == ERROR_MORE_DATA); // end do<br> //<br> // Check again for allocated memory.<br> //<br> if (pBuf != NULL)<br> NetApiBufferFree(pBuf);<br> //<br> // Print the final count of workstation users.<br> //<br> fprintf(stderr, "/nTotal of %d entries enumerated/n", dwTotalCount);<br><br> return 0;<br>}<br>----<br>上述代码编译通过。<br><br>
Y
yeeler
Unregistered / Unconfirmed
GUEST, unregistred user!
jyniu有没有用delphi写的，多谢了。
J
jyniu
Unregistered / Unconfirmed
GUEST, unregistred user!
unit Unit1;<br><br>interface<br><br>uses<br> Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,<br> StdCtrls;<br><br>type<br> TForm1 = class(TForm)<br> Button1: TButton;<br> procedure Button1Click(Sender: TObject);<br> private<br> { Private declarations }<br> public<br> { Public declarations }<br> end;<br><br> WKSTA_USER_INFO_0 = record<br> wkui0_username
WideChar;<br> end;<br><br> PWKSTA_USER_INFO_0 = ^WKSTA_USER_INFO_0;<br><br> WKSTA_USER_INFO_1 = record<br> wkui1_usernameWideChar;<br> wkui1_logon_domainWideChar;<br> wkui1_oth_domainsWideChar;<br> wkui1_logon_serverWideChar;<br> end;<br><br> PWKSTA_USER_INFO_1 = ^WKSTA_USER_INFO_1;<br><br> function NetWkstaUserEnum( servernameWideChar; level
WORD; var bufptrointer;<br> prefmaxlen: DWORD; var entriesread, totalentries, resumehandleWORD ): DWORD; cdecl;<br> external 'netapi32.dll' name 'NetWkstaUserEnum';<br><br> function NetApiBufferFree( bufptrointer ): DWORD; cdecl;<br> external 'netapi32.dll' name 'NetApiBufferFree';<br><br>var<br> Form1: TForm1;<br><br><br><br>implementation<br><br><br>{$R *.DFM}<br><br>procedure TForm1.Button1Click(Sender: TObject);<br>var<br> wuiWKSTA_USER_INFO_0;<br> dwPrefMaxLenWORD;<br> dwEntriesReadWORD;<br> dwTotalEntriesWORD;<br> dwResumeHandleWORD;<br> rc: DWORD;<br>begin<br> dwPrefMaxLen := $FFFFFFFF;<br> dwEntriesRead := 0;<br> dwTotalEntries := 0;<br> dwResumeHandle := 0;<br><br> repeat<br> rc := NetWkstaUserEnum( nil, 0, pointer(wui), dwPrefMaxLen, dwEntriesRead,<br> dwTotalEntries, dwResumeHandle );<br><br> if (rc = 0) or (rc = ERROR_MORE_DATA) then begin<br><br> ShowMessage( wui.wkui0_username );<br><br> NetApiBufferFree( wui );<br> end;<br> until (rc <> 0) and (rc <> ERROR_MORE_DATA);<br><br>end;<br><br>end.<br>--<br>细节自己再修正， OK!
WideChar;<br> end;<br><br> PWKSTA_USER_INFO_0 = ^WKSTA_USER_INFO_0;<br><br> WKSTA_USER_INFO_1 = record<br> wkui1_usernameWideChar;<br> wkui1_logon_domainWideChar;<br> wkui1_oth_domainsWideChar;<br> wkui1_logon_serverWideChar;<br> end;<br><br> PWKSTA_USER_INFO_1 = ^WKSTA_USER_INFO_1;<br><br> function NetWkstaUserEnum( servernameWideChar; levelWORD; var bufptrointer;<br> prefmaxlen: DWORD; var entriesread, totalentries, resumehandleWORD ): DWORD; cdecl;<br> external 'netapi32.dll' name 'NetWkstaUserEnum';<br><br> function NetApiBufferFree( bufptrointer ): DWORD; cdecl;<br> external 'netapi32.dll' name 'NetApiBufferFree';<br><br>var<br> Form1: TForm1;<br><br><br><br>implementation<br><br><br>{$R *.DFM}<br><br>procedure TForm1.Button1Click(Sender: TObject);<br>var<br> wuiWKSTA_USER_INFO_0;<br> dwPrefMaxLenWORD;<br> dwEntriesReadWORD;<br> dwTotalEntriesWORD;<br> dwResumeHandleWORD;<br> rc: DWORD;<br>begin<br> dwPrefMaxLen := $FFFFFFFF;<br> dwEntriesRead := 0;<br> dwTotalEntries := 0;<br> dwResumeHandle := 0;<br><br> repeat<br> rc := NetWkstaUserEnum( nil, 0, pointer(wui), dwPrefMaxLen, dwEntriesRead,<br> dwTotalEntries, dwResumeHandle );<br><br> if (rc = 0) or (rc = ERROR_MORE_DATA) then begin<br><br> ShowMessage( wui.wkui0_username );<br><br> NetApiBufferFree( wui );<br> end;<br> until (rc <> 0) and (rc <> ERROR_MORE_DATA);<br><br>end;<br><br>end.<br>--<br>细节自己再修正， OK!
Y
yeeler
Unregistered / Unconfirmed
GUEST, unregistred user!
非常感谢您的帮助。以后有问题可以直接向您请教吗？（我在nt下编译上述C代码时，出错）<br>我的E_Mail:Yeeler@21cn.com
Y
yeeler
Unregistered / Unconfirmed
GUEST, unregistred user!
接受答案了.
