请问映射网络盘是怎样做的????? 如题 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 映射网络驱动器用此方法让你可以映射网络驱动器和断开映射网络驱动器,用本机来试通不过,如果你在网络上也通不过,请告知建立映射网络驱动器procedure TForm1.Button1Click(Sender: Tobject);var NetR :NETRESOURCE;ErrInfo : Longint;beginNetR.dwScope := RESOURCE_GLOBALNET;NetR.dwType := RESOURCETYPE_DISK;NetR.dwDisplayType := RESOURCEDISPLAYTYPE_SHARE;NetR.dwUsage := RESOURCEUSAGE_CONNECTABLE;NetR.lpLocalName := 'j:';NetR.lpRemoteName := '\\Lifang\c';ErrInfo := WNetAddConnection2(NetR, '', '', CONNECT_UPDATE_PROFILE);If ErrInfo = NO_ERROR Thenmessagebox(0,'Net connection successful!','',0)Elsemessagebox(0,'ERROR: ','',0);end;断开映射网络驱动器procedure TForm1.Button2Click(Sender: Tobject);var ErrInfo : Longint;strLocalName : pchar;beginstrLocalName:='j:';ErrInfo := WNetCancelConnection2(strLocalName, CONNECT_UPDATE_PROFILE, False);If ErrInfo = NO_ERROR Thenmessagebox(0,'Net disconnection successful!','',0)Elsemessagebox(0,'ERROR','',0);end; 窗体的设置 关于ClientDataSet更新数据库的问题! 寻求帮助:将彩色jpg图像压缩转换成tif格式,急! 请问怎样取得 TdxDBGrid 多选行(MultiSelect)的各行各字段的值? DLL中的函数和一般的函数不一样? 如何获取工程中所有的窗口 怎样得到webbrowser1中显示的网页中title中的字符串? 请问如何控制TEdit中输入字符的长度 两台机器通过modem拨号连接成功后,可以用copy命令拷贝数据? 怎样查看vcl源码? 关于unit单元问题———在线等待 这条SQL语句怎么写?
用此方法让你可以映射网络驱动器和断开映射网络驱动器,用本机来试通不过,如果你在网络上也通不过,请告知建立映射网络驱动器
procedure TForm1.Button1Click(Sender: Tobject);var NetR :NETRESOURCE;ErrInfo : Longint;beginNetR.dwScope := RESOURCE_GLOBALNET;NetR.dwType := RESOURCETYPE_DISK;NetR.dwDisplayType := RESOURCEDISPLAYTYPE_SHARE;NetR.dwUsage := RESOURCEUSAGE_CONNECTABLE;NetR.lpLocalName := 'j:';NetR.lpRemoteName := '\\Lifang\c';ErrInfo := WNetAddConnection2(NetR, '', '', CONNECT_UPDATE_PROFILE);If ErrInfo = NO_ERROR Thenmessagebox(0,'Net connection successful!','',0)Elsemessagebox(0,'ERROR: ','',0);end;断开映射网络驱动器
procedure TForm1.Button2Click(Sender: Tobject);var ErrInfo : Longint;strLocalName : pchar;beginstrLocalName:='j:';ErrInfo := WNetCancelConnection2(strLocalName, CONNECT_UPDATE_PROFILE, False);If ErrInfo = NO_ERROR Thenmessagebox(0,'Net disconnection successful!','',0)Elsemessagebox(0,'ERROR','',0);end;