局域网中文件夹的共享 Windows NT/2000/XP[1]

[入库:2005年8月18日] [更新:2007年3月24日]

本文简介:选择自 smandhgx 的 blog

局域网中文件夹的共享 windows nt/2000/xp

在局域网中通过程序实现文件夹的共享,就我知道的应该至少有两种实现方式。一是修改注册表,但是这种方法存在的问题也是很明显的,必须重起机器才能生效。二就是利用 windows api函数 netshareadd ,通过这个函数我们可以很容易的实现文件夹的共享,而且无需重起计算机。使用这个函数时我们必须注意的是在 windows nt/2000/xpwindows 95/98/me 下用法是有很大差别的,这一点我相信大家都有体会,明明在 95 或 98 下实现好好的,可是一到 nt 下就出问题。

    其实不光是各位仁兄,我早就提出过这个问题,怎奈一直都没有解决掉。现在好了,希望读完后能给大家一点点帮助。

    windows 95/98/me 下 netshareadd 函数声明在 svrapi.dll 动态连接库中,而在 2000/xp/nt 下声明在 netapi32.dll 动态连接库中。所以我们在不同的操作系统下一定要注意调用不同的 dll 库。这些函数详细的声明,在新版 msdn 2002 中有介绍。由于在delphi中没有声明这些函数和他们的参数所以我们要想实现这个函数还必须自己声明(可能delphi 有声明我不知道在那个单元中)。顺便说一句,我使用的是 delphi5.0 版,可惜他的帮助文件实在是太陈旧了,还是先看看 msdn 2002 中关于 netshareadd 函数的声明巴!

windows nt/2000/xp:

net_api_status netshareadd( 
  lpwstr servername, //对应 delphi 中 pwidechar
  dword level,       //对应 delphi 中 dwoed
  lpbyte buf,        //对应 delphi 中 pbyte
  lpdword parm_err   // 对应 delphi 中 pdword 
);

windows 95/98/me: 下面的对应参数就不用说了吧!可以直接看看delphi帮助文件。

本文关键:delphi api 共享
  相关方案
Google
 

本站最佳浏览方式为 分辨率 1024x768 IE 6.0(或更高版本的 IE浏览器)

go top