如何编程实现通过Windows2000 用户名和密码连接远程机器并远程删除远程机器上的文件 ( 积分: 200 )

  • 主题发起人 主题发起人 RGKJ
  • 开始时间 开始时间
R

RGKJ

Unregistered / Unconfirmed
GUEST, unregistred user!
如何编程实现通过Windows2000 用户名和密码连接远程机器并远程删除远程机器上的文件
我想自己编写一个远程管理服务器的程序
 
如何编程实现通过Windows2000 用户名和密码连接远程机器并远程删除远程机器上的文件
我想自己编写一个远程管理服务器的程序
 
应该做SERVER / CLIENT两个程序,SERVER放置在被管理端
 
这样的软件太多了,网上到处都是
 
如果仅是用远程机的用户名和密码来删除足够权限的文件,可以参考下面
如果想做远程管理,最好还是在服务器端放个被控制程序才方便。

procedure TForm1.Button1Click(Sender: TObject);
const
RemoteShareName='//192.168.0.1/d$'; //必须共享或默认共享
var
NetResource : TNetResource;
begin
with NetResource do
begin
dwScope:=RESOURCE_GLOBALNET;
dwUsage:=RESOURCEUSAGE_CONNECTABLE;
dwType:=RESOURCETYPE_DISK;
dwDisplayType:=RESOURCEDISPLAYTYPE_SERVER;
lpLocalName:='z:';
lpRemoteName:=RemoteShareName;
lpProvider:='';
end;

if WnetAddConnection2(NetResource,'远程密码','远程用户名',CONNECT_UPDATE_PROFILE)<>NO_ERROR then
raiselastwin32error;

DeleteFile('z:/test.txt');

if WNetCancelConnection2('z:',CONNECT_UPDATE_PROFILE,True)<>NO_ERROR then
RaiseLastWin32Error;
showmessage('ok');
end;
 
在详细点啊
 
还不够清楚???!!! 自己摸索吧,才有长进
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部