向网络上一台计算机d:\test.txt文档读/写内容，怎么实现

Question

如题。谢谢！

Answer 1

只要网上邻居里面设置共享了，就可以：
open "\\192.168.1.7\d\test.txt" for input|output|append as #number
close #number192.168.1.7是远程计算机的IP地址

Answer 2

看msdn中的帮助
然后换成\\192.168.1.7\d\test.txt这样就行了fso也行

Answer 3

shell "net use \\机器名\共享名 密码  /user:用户名"
然后用"\\机器名\共享名\共享名下的文件夹"来访问读文件
Dim TextLine
Open "\\机器名\共享名\test.txt" For Input As #1   ' 打开文件。
Do While Not EOF(1)   ' 循环至文件尾。
   Line Input #1, TextLine   ' 读入一行数据并将其赋予某变量。
   Debug.Print TextLine   ' 在立即窗口中显示数据。
Loop
Close #1   ' 关闭文件写文件
Open "\\机器名\共享名\test.txt" For Append As 1
Print #1, "写入的字符"
Close 1Append是在末尾追加，换成output就是覆盖原来的内容，从头重新写