correy
驱动牛犊
驱动牛犊
  • 注册日期2007-11-12
  • 最后登录2017-04-07
  • 粉丝0
  • 关注0
  • 积分76分
  • 威望531点
  • 贡献值0点
  • 好评度0点
  • 原创分0分
  • 专家分0分
  • 社区居民
阅读:2118回复:1

修改whg的文章(第二次):枚举局域网

楼主#
更多 发布于:2010-01-02 18:25
;Email:leguanyuan@126.com
;QQ:112426112
;websites:http://hi.baidu.com/correy
;rc me.rc
;ml /coff test.asm /link /subsystem:windows me.res

.386
.model flat,stdcall
include user32.inc
include mpr.inc
includelib user32.lib
includelib mpr.lib
.code
EnumNet proc
pushad
push 2
invoke WNetOpenEnumA,2,1,2,ebp,esp
pop esi
jnz OError
mov edi,100h
sub esp,edi
mov ebp,esp
next:push 1h
mov eax,esp
push edi
invoke WNetEnumResourceA,esi,eax,ebp,esp
pop ecx
pop ecx
jnz Over
invoke MessageBoxA,0,[ebp+20],[ebp+28],0
call Enumnet
jmp next
Over:invoke WNetCloseEnum,esi
add esp,edi
OError:popad
ret
EnumNet endp
Start:push [esp]
mov ebp,0
call EnumNet
pop esp
ret
end Start
Novartis
驱动牛犊
驱动牛犊
  • 注册日期2010-04-13
  • 最后登录2012-05-01
  • 粉丝0
  • 关注0
  • 积分19分
  • 威望181点
  • 贡献值0点
  • 好评度0点
  • 原创分0分
  • 专家分0分
沙发#
发布于:2010-04-15 10:16
这个太简单了!
游客

返回顶部