delphi 网络文件拷贝 (参考)

 

 如何模拟输入用户名、密码来访问网络邻居 收藏

新一篇: 有关socket确认连接 | 旧一篇: 局域网内传文件或文件内容

<script>function StorePage(){d=document;t=d.selection?(d.selection.type!='None'?d.selection.createRange().text:''):(d.getSelection?d.getSelection():'');void(keyit=window.open('http://www.365key.com/storeit.aspx?t='+escape(d.title)+'&u='+escape(d.location.href)+'&c='+escape(t),'keyit','scrollbars=no,width=475,height=575,left=75,top=20,status=no,resizable=yes'));keyit.focus();}</script>  

 

基 本 原 理

---- 在 Windows 环 境 下， 应 用 程 序 使 用 Windows 网 络 函 数（ WNet ） 来 实 现 网 络 功 能
  而 不 用 关 心 网 络 的 供 应 商 及 具 体 实 现， 因 为 WNet 函 数 是 独 立 于 网 络 的。
----Wnet 函 数 主 要 有： WnetAddConnection , WnetAddConnection2 , WnetAddConnection3 ,
WnetCancelConnection2 等。 本 文 主 要 用 WnetAddConnection2 ， WnetCancelConnection2 函 数。

----WNetAddConnection2 在 Windows.pas 中 的 函 数 原 型 如 下：

----function WNetAddConnection2(var lpNetResource: TNetResource;lpPassword, lpUserName:

----PChar; dwFlags: DWORD): DWORD; stdcall;

---- 为 调 用 此 函 数， 必 须 填 写 lpNetResouce 结 构， 此 结 构 的 定 义 为：

typedef  struct _NETRESOUCE{
    DWORD dwScope;  
    DWORD dwType;  
    DWORD dwDisplayType;
    DWORD dwUsage;
    LPTSTR lpLocalName;
    LPTSR  lpRemoteName;
    LPTSr  lpProvider;
} NETRESOURCE;

---- 这 里 使 用 dwType,lpLocalName,lpRemoteName,lpProvider 几 个 参 数。 其 含 义 如 下：

----dwType : 用 于 指 定 网 络 的 资 源 类 型， 有 以 下 RESOURCETYPE_ANY( 任 何 资 源 ),
RESOURCETYPE_DISK( 磁 盘 资 源 ) , RESOURCETYPE_PRINT （ 打 印 机 资 源）。

----lpLocalName : 指 定 本 地 设 备。

----lpRemoteName : 指 定 远 程 网 络 名。

----lpProvider : 指 定 提 供 网 络 资 源 的 供 应 商。 如 为 空， 则 表 示 供 应 商 未 知。

----WNetAddConnection2 函 数 的 lpPassword 为 远 程 资 源 的 口 令。

----lpUserName 为 远 程 资 源 的 用 户 名。 dwFlags 标 志 位 用 于 指 定 登 录 时 是 否
重 新 连 接（ 0 时