大侠们，我要做一个程序功能是：局域网中一台电脑做主机（A），有一个共享目录（如：ABC），这个目录里的文件怎样在局域网的另一台机子（B）上实现复制。要求按下CMD按钮后先检查主机是否存在，而且每复制一个文件都在TEXT或LABEL中中一行一行的显示出来是否复制成功，包括检测主机的提示。

为什么我用text1.print提示出错，但用TEXT1="XXX"就只能显示一行字，再出来的字就自动复盖掉了呀。。

俺是菜鸟，希望哪位好心的高手帮帮我啊。最好详细一点~~ 万分感谢！！！！

爱死各位高手了~~~
再放张图上来看下清楚点。

在线等啊~~~ 盼~~~~~~~~~~~~~~```

[此贴子已经被作者于2005-11-27 15:09:08编辑过]

这个应该可以利用winsock控件，检测对方主机。用winsock控件向目标主机发送信息，得到回应就证明目标主机存在。然后再把文件都传过去。

恩，，，楼上说的对，，，学习了一个方法~~~！！！

谢谢啊，换行显示我知道用Text1.Text = Text1.Text + Chr(13) + Chr(10)，可是我不会用winsock控件检测主机，还有检测共享共享目录是否存在也是用WINSOCK控件吗？？复制文件用FILECOPY吗？我是新手呀，谢谢大哥帮我写一段代码啦。单位机子急用呢！可我不会搞，哎。

用winsock控件的话可以先对主机进行连接，其实也就是ping看看能不能ping通。ping通后发送文件不是用FileCopy的，而是直接发送。不过winsock控件的缺点在于，目标主机也必须有程序接收。

可我不会。郁闷。哪个好心的高手花一点时间帮帮我