由于看到前些日子retina里有个不需要预先知道帐号就可以获取一般任意目标NT主机帐号的功能。

开发技术指南» 文章正文

引言：由于看到前些日子retina里有个不需要预先知道帐号就可以获取一般任意目标NT主机帐号的功能。

摘要：sql.text:= insert into rep仓库收付存月结报表(mc,ycjcje,bqsrje,bqllje,qmjcje) + (select sorttype,sum(qc*inprice),sum((rk-rkt)*inprice),sum((ck-ckt)*inprice),sum(jc*inprice) + from tmpkk2 where 1=1 +sdepot+stmp......

·delphi控件制作技巧[二] »显示摘要«

摘要：unit uswlmselectda; {$s-,w-,r-} {$c preload} interface uses windows,messages,sysutils, types, classes, graphics, controls,stdctrls,forms, strutils,math,adodb,tflatbuttonunit,uswlmstyleedit; type ......

远程得到任意远程NT主机帐号List的源代码
由于看到前些日子retina里有个不需要预先知道帐号就可以获取一般任意

目标nt主机帐号的功能.几个月之前,我为了弄清原理,就做了一个工具. 【程序编程相关:[强烈推荐]Mini Delphi 20】

【推荐阅读:通过api和键盘钩子彻底屏蔽任务条和开始】

这次整理硬盘,发现了这个小工具,这本身并不算什么,因为iss scanner等【扩展信息:我用Delphi实现的Singleton】

软件都包含了这类功能.但是我希望大家能够通过这个例子,了解一些nt的

api与安全性知识.

-- 完整的code(use delphi)与一个编译好的zip文件在

ftp://202.96.215.252/incoming/sea/getuser.zip

这里贴一下程序的主要代码段:

unit unit1;

{ 这是一个演示如何去获取目标nt计算机上用户列表的程序,

由于win32 api的限制,此程序只能在nt平台上正确运行.

由于是为了演示原理,所以没有使用多线程,也没有考虑太高

的健壮性,希望诸位海涵.欢迎与我联系

vader yang

ciert@soim.net}

interface

uses

windows, messages, sysutils, classes, graphics, controls, forms, dia

logs,

stdctrls, comctrls, extctrls;

// 省略若干行

{...}

{$r *.dfm}

procedure tform1.button1click(sender: tobject);

var

seanetresource:netresource;

searesult:dword;

seaaccessbuffer:string[255];

seaaccessbufferlength:dword;

sidbuffer:string[255];

lpaccessbuffer:pchar;

seasid:psid;

seasidlength:dword;

seareferenceddomainname:string[255];

seareferenceddomainnamelength:dword;

lpreferenceddomainname:pchar;

seasidnameuse:sid_name_use;

temppchar:pchar;

sidsubcount:puchar;

i,j:integer;

storecount:byte;

temppdword:pdword;

... 下一页

·delphi+mapx5中使用自定义字体符号 »显示摘要«

摘要：mapx5中使用自定义字体符号觉得现在使用自定义字体作为点符号的应用是越来越少了，近段时间在开发gps车辆管理的gis系统的时候要用到动态显示车辆位置，觉得用其他方式在地图上显示车辆可能会对性能有一定的影响，所以就使用的自定义字体。首先是创建自定义的字体。使用了字体编辑软件fontlab.v4.60。其次就是在delphi＋mapx中使用该字体了。 mystyle:=cost......

» 本期热门文章：

· 热门栏目：

» 相关精选文章

» 其它相关：