关于API

Question

在dos在知道管理员密码情况下 ：net use结合at，copy命令可以完成将本地文件拷贝到远程机子上。
我的问题是：在dellphi中用什么API函数结合来完成呀！

Answer 1

俺的邮箱：[email protected]，谢谢

Answer 2

很简单的事情, 我给你代码!! waiting !!!

Answer 3

直接使用winexec不行么？还有几种方法可以直接执行程序，直接赋个参数不就可以了？

Answer 4

to wanquanhao (()) ,已經給你發了代碼!!!

Answer 5

大哥门，我也要阿，给我一份，另开贴上分！！！
我要解决的问题是：
现在希望在本地运行一个类似文件管理器的东西！用listbox显示远程的共享文件夹，进行读取操作，最好是做成映射文件夹。由于远程的机器ip可能变化，所以对方的ip和名称要动态获取！问题1，请问怎样用BCB或delphi或WinApi等方法实现。
问题2，怎样解决如：共享文件夹不存在，或路径太深不可读等出错问题！
解决如能再加分

Answer 6

谢谢aiirii(ari)，请将的详细点好不好？俺是菜鸟！var NetSource:TNetResource;
d, d1: DWord;
sPW : PChar;
begin
try ('X:',CONNECT_UPDATE_PROFILE,True);
with NetSource do
begin
dwType:=RESOURCETYPE_ANY;
lpLocalName:=nil;
lpRemoteName:=Pchar(Edit1.Text); //此处换成远方的IP
lpProvider:='';
end;
sPW := pchar(edtPass.Text);
if StrComp(sPw,Pchar('edtPass'))=0 then //此处换成你的密码
d:=WnetAddConnection2(netSource,sPW,nil,
CONNECT_INTERACTIVE) //CONNECT_UPDATE_PROFILE)
else
d:=WnetAddConnection2(netSource,sPW,Pchar('Administrator'),
CONNECT_INTERACTIVE); //CONNECT_UPDATE_PROFILE);
if d <> NO_ERROR then
begin
d1 := GetLastError;
showmessage('err : ' + IntToStr(d1));
end;
showmessage('联接网络成功');
except
ShowMessage('无法联接网络路径');
end;
end.
我放到delphi中了，可是它不顶什么用！

Answer 7

to  aiirii(ari) :
   谢谢你的帮助，可你的代码不能运行，拜托以后在delphi中调试通过在发　！谢谢　！