分享
 
 
 

找出计算机上当前登录入网的用户

王朝厨房·作者佚名  2007-01-04
窄屏简体版  字體: |||超大  

作者: 小林

问题

有的程序员希望能够显示用户当前登录的用户名。这使得程序员可以识别当前企图执行某个操作的用户, 也可以通知用户机器已被某个用户以外的用户名登录。如何使用 Windows 9x 的网络函数来完成此功能呢?

方法

前一节介绍了如何找出网络的连接信息。在 Wnidows 9x 和 Windows NT 中,用户信息直接同网络连 接相关联。

利用 Windows API 函数 WNetGetUser 可以确定当前登录的用户。在 WIN32 系统中(Windows 9x 和 Windows NT),此函数接受本地驱动器名,返回用户名及其大小(用户名缓冲区的大小)。

步骤

按照下列步骤实现一个例子程序。运行此例子程序,从菜单 NetWorks 中选择菜单项 User Names, 将弹出一个对话框,显示此机器上安装的驱动器。当从列表中选择一个驱动器后,文本域将改变为与此驱动 器相连接的用户名或字符串“None”。

实现例子程序的具体步骤如下:

1.在 Visual C++ 中,利用 AppWizard 创建新的项目文件,并命名此项目文件为 LD17.MAK.

2.进入 AppStudio 并创建新的对话框,在对话框中,添加标题分别为 Drive Ltter: 和 Network Name: 以及 User Name: 的三个文本域。添加一个组合框,风格设置为 Drop Down List。添加两个静态 文本域,标识符分别为:ID_NET_NAME 和 ID_NET_USER。

3.将对话框 ID 改为 ID_NETWORK_USER,并设置标题为 View Network Users,保存对话框。

4.进入 ClassWizard,选择按钮 Add Class。在名字域中键入名字 CNetworkUserDlg,基类 为 CDIALOG,对话框 ID 为 ID_NETWORK_USER。

5.在 ClassWizard 的下拉列表中选择 CNetworkUserDlg ,从消息列表中选择消息 WM_INITDIALOG, 点击按钮 Edit Code。

6.在 CNetworkUserDlg 的方法 OnInitDialog 中输入下列代码:

BOOL CNetworkUserDlg::OnInitDialog()

{

CDialog::OnInitDialog();

char buf[20];

CComboBox *combo=(CComboBox *)GetDlgItem(IDC_COMBO1);

for(int i=0;i<26;i++)

{

sprintf(buf,"%c:\\",’A’+i);

WORD type=GetDriveType(buf);

switch(type)

{

case DRIVE_FIXED:

sprintf(buf,"%c:",’A’+i);

combo->AddString(buf);

break;

case DRIVE_REMOTE:

sprintf(buf,"%c:",’A’+i);

combo->AddString(buf);

break;

case DRIVE_CDROM:

sprintf(buf,"%c:",’A’+i);

combo->AddString(buf);

break;

}

}

combo->SetCurSel(0);

OnDriveChange();

return TRUE; // return TRUE unless you set the focus to a control

}

7.在 ClassWizard 中,从对象 ID 列表中选择对象 IDC_COMBO1,选择命令 CBN_SELCHANGE。 点击按钮 Add Function,命名方法为 OnDriveChange。点击按钮 Edit Code,在 CNetworkUserDlg 的方法 OnDriveChange 中输入下列代码:

void CNetworkUserDlg::OnDriveChange()

{

char drive_letter[20];

char network_name[256];

char user_name[256];

unsigned long size=256;

UpdateData();

CComboBox *combo=(CComboBox *)GetDlgItem(IDC_COMBO1);

int sel=combo->GetCurSel();

combo->GetLBText(sel,drive_letter);

if(WNetGetConnection(drive_letter,network_name,&size)==0)

GetDlgItem(ID_NET_NAME)->SetWindowText(network_name);

else

GetDlgItem(ID_NET_NAME)->SetWindowText("Not network drive");

if(WNetGetUser(drive_letter,user_name,&size))

GetDlgItem(ID_NET_USER)->SetWindowText(user_name);

else

GetDlgItem(ID_NET_USER)->SetWindowText("None");

}

8.进入 AppStudio,在菜单 IDR_MAINFAME 中,添加新的菜单 Networks。在菜单 Networks 中, 添加菜单项 Get User Names,其 ID 为 ID_NETWORK_USERS。

9.进入 ClassWizard,从下拉列表中选择类 CMainFrame,从对象 ID 列表中选择对象 ID_NETWORK_USERS,从消息列表中选择消息 COMMAND。点击按钮 Add Function,函数命名为 OnNetworkUsers,点击按钮 Edit Code,在 CMainFrame 的方法 OnNetworkUsers 中输入下列代码:

void CMainFrame::OnNetworkUsers()

{

CNetworkUserDlg dlg;

dlg.DoModal();

}

10.在文件 MAINFRM.CPP 的顶部添加下列行:

#include "NetworkUserDlg.h"

11.编译并运行此例子程序。

用法

本节例子程序中的大部分代码是相当直接的。首先检查驱动器是否有效,如果是,将驱动器添加到组合 框中。当用户从组合框中选择驱动器后,程序接着向网络软件查询此驱动器逻辑连接的网络名。最后,由于 在同一台工作站上可以用多个用户名登录多个网络,所以向网络软件查询的是与驱动器相连接的用户名。

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有