远程自动下载(50分)

  • 主题发起人 主题发起人 louyg
  • 开始时间 开始时间
L

louyg

Unregistered / Unconfirmed
GUEST, unregistred user!
我需要进行远程自动下载,程序在预定时间自动运行。
 
下载何种文件,FTP文件、HTTP文件,还是其他?
 
指定的文件
 
如果是黑客程序也能自动下载和运行???
 
你只需在服务器或客户端放个"特洛伊木马"就能实现!
 
放个HTML空间就行,HTML1。REQUESTDOC(“HTTP://。。。。。。。。”)
 
加上Timer,把程序添加到启动里。
 
用OFFLine Explore进行定时下载!
 
NetAnts都可以了
 
有没有下载文件的源代码啊?
 
to louyg
问题解决了吗?
 
现在我暂时用手工下载!谢谢大家的讨论!
 
netants和吸血鬼都提供了com接口
uses activex,comobj;
procedure tfrmudp.downloadbysoft(soft, fileurl: string); //download by soft like Netants or Netvampire
var
nv, na: Variant;
begin
if soft = 'nv' then
begin
CoInitialize(nil);
try
NV := CreateOleObject('Vampire.NewJob');
if VarType(NV) <> varDispatch
then raise Exception.Create('Cannot connect to Net Vampire');
NV.Initialize('', fileurl);
finally
CoUninitialize;
end;
end
else
if soft = 'na' then
begin
CoInitialize(nil);
try
Na := CreateOleObject('netants.api');
if VarType(na) <> varDispatch
then raise Exception.Create('Cannot connect to NetAnts');
na.addurl(fileurl, '', '');
finally
CoUninitialize;
end;

end;
end;
 
honghs,你说的办法真能实现?
 
接受答案了.
 
后退
顶部