各位老大请听小弟慢慢到来
我用下面的代码共享了c盘但却在网络上不可见(文件夹属性是共享但在网络上不可见)
我的意思是怎样从一台机器得到另一台机器上共享但不可见的文件夹,及其内容?
完成共享文件架的代码如下:
uses Registry
var
MyReg:TRegistry;
//以下为注册表修改
MyReg:=TRegistry.Create ;
MyReg.RootKey :=HKEY_LOCAL_MACHINE;MyReg.OpenKey ('',True)
begin
MyReg.WriteInteger('Flags',258); //共享为完全共享
MyReg.WriteInteger('Type',0);
MyReg.WriteString('Path','C:);//共享
MyReg.WriteString('Re','');
MyReg.CloseKey ;
end;
或者
怎样直接把文件夹共享为可见的网络资源(不过这不是最好的办法)
谢谢小弟在线恭候
我用下面的代码共享了c盘但却在网络上不可见(文件夹属性是共享但在网络上不可见)
我的意思是怎样从一台机器得到另一台机器上共享但不可见的文件夹,及其内容?
完成共享文件架的代码如下:
uses Registry
var
MyReg:TRegistry;
//以下为注册表修改
MyReg:=TRegistry.Create ;
MyReg.RootKey :=HKEY_LOCAL_MACHINE;MyReg.OpenKey ('',True)
begin
MyReg.WriteInteger('Flags',258); //共享为完全共享
MyReg.WriteInteger('Type',0);
MyReg.WriteString('Path','C:);//共享
MyReg.WriteString('Re','');
MyReg.CloseKey ;
end;
或者
怎样直接把文件夹共享为可见的网络资源(不过这不是最好的办法)
谢谢小弟在线恭候
解决方案 »
- 有关生成BOM树出现的问题,请高手帮忙
- 如何在一个标签或图片上单击鼠标左键弹出快捷菜单(popupmenu)
- 求一SQL语句,谢谢.
- 导入TreeView的文本文件的格式是什么样的啊?如何导入?
- 求助:关于按钮右键事件?
- !!!腾讯QQ可能监测极度隐私 up给分
- 超菜问题:Printdialog怎么用.
- 怎样在COMBOBOX中加入可选项?
- 视视会议,视频语音控件,多人视频聊天室,即时通(类似qq)等源码
- dbcombobox的datasource、datafield都设置了,为什么编辑框有数据,而其下拉框无数据?
- 该死的ACCESS,一个弱智问题折腾我一下午了,SOS!
- 前辈请推荐几本关于Delphi数据库开发的好书
没有任何安全性
建议用com+,dcom实现
如果要传送文件可以用serversocker,udp等来实现
不懂你的意思~
如超级管理员: Administrator