| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 274 人关注过本帖
标题:[求助]vb 编写局域网内的文件传播代码
只看楼主 加入收藏
ggystudio
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2007-10-22
收藏
 问题点数:0 回复次数:0 
[求助]vb 编写局域网内的文件传播代码
例如我C盘根目录下有个叫做“本月汇报表.exe”的文件,然后自动复制这个文件到局域网中每一台计算机的C盘根目录下,并自动打开。
1。求代码(vb)
2。最好来点注释,免得看得眼花缭乱……

这段代码只能复制到特定的某一架计算机上,而且不能自动运行。如果有谁会改也行。
Private Sub Command1_Click()
Dim fso As New Scripting.FileSystemObject
Dim fl As Scripting.File
Set fl = fso.GetFile("c:\本月汇报表.exe")
Call fl.Copy("\\user02\c$\", False)
End Sub
搜索更多相关主题的帖子: 计算机 局域网 根目录 False 
2007-10-22 21:42
快速回复:[求助]vb 编写局域网内的文件传播代码
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.021766 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved