Chinaunix首页 | 论坛 | 博客

发布时间:2014-12-08 20:18:19

use Win32::NetAdmin;my $hostname = Win32::NodeName();my $ref = {};my $hostid;if( Win32::NetAdmin::GetTransports("\\\\$hostname", $ref) ) {    foreach my $trans (keys %{$ref}).........【阅读全文】

阅读(162) | 评论(0) | 转发(0)

发布时间:2014-12-02 00:24:44

###若要引用常量值必须先加载基常量元素 use Win32::GUI::constants qw(MB_OK MB_OKCANCEL MB_YESNO);  #以空格方开来 要设置按钮的消息框出现在指定下列值之一:常量表示                      .........【阅读全文】

阅读(41) | 评论(0) | 转发(0)
给主人留下些什么吧!~~
留言热议
请登录后留言。

登录 注册