如何用delphi程序向局域网内的计算机（某个文件夹下）发送TXT文档？(150分)

D

darlingpeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-28

• #1

如何用delphi程序向局域网内的计算机（某个文件夹下）发送TXT文档？
我在网上找了下，大部分例子都是有发送端，接受端的，请问我只弄个发送端，接受的电脑什么程序都不用写，该怎么弄啊？
在线等！帮帮小弟

 

D

darlingpeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-28

• #2

有没有知道的哥们啊

 

H

Highpeak

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-28

• #3

自己写就可以了，就像写本地文件一样。
//192.168.1.1/C:/TEST.TXT
前提：
对方要开完全共享；
对方电脑建立共享连接；

 

D

darlingpeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-28

• #4

恩，我来试下

 

D

darlingpeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-28

• #5

to Highpeak,
这种方法要受到共享服务器用户名，密码的限制，有没有更好的方法？
欢迎大家来讨论

 

D

darlingpeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-28

• #6

有没有知道的哥们啊？
小弟急，在线等

 

可

可视化

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-28

• #7

f:textfile;
fl:integer;
str,gxfilename:string;

str:='aaa';
gxfilename:='//192.168.1.1/C:/TEST.TXT';
fl:=FileCreate(gxfilename);
FileClose(fl);
str:=rechCode.Text;
AssignFile(f,gxfilename);
append(F);
writeln(f,str);
CloseFile(F);

 

Z

zkq712

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-28

• #8

关注！！！
f:textfile;
fl:integer;
str,gxfilename:string;

str:='aaa';
gxfilename:='//192.168.1.1/C:/TEST.TXT';
fl:=FileCreate(gxfilename);
FileClose(fl);
str:=rechCode.Text;
AssignFile(f,gxfilename);
append(F);
writeln(f,str);
CloseFile(F);
调试ing

 

D

darlingpeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-29

• #9

to 可视化,zkq712
str:=rechCode.Text;
rechCode 是什么？

 

D

darlingpeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-29

• #10

欢迎大家来讨论这个问题

 

书

书痕

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-29

• #11

关注！！！
f:textfile;
fl:integer;
str,gxfilename:string;

str:='aaa';
gxfilename:='//192.168.1.1/C:/TEST.TXT';
fl:=FileCreate(gxfilename);
FileClose(fl);
str:=rechCode.Text;
AssignFile(f,gxfilename);
append(F);
writeln(f,str);
CloseFile(F);
测试一下...

 

D

darlingpeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-29

• #12

to 书痕
str:=rechCode.Text
什么意思

 

老

老阿Q

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-29

• #13

貌似用户名密码的局限无法突破，真要是用户名、密码、完全共享、客户端都不需要就可以直接写东西进去，那么恭喜你，你可以找微软麻烦了。
感觉完全共享是必需的，连接时，在发送文件前进行连接。我以前是在程序里先调用命令，net use ipipc$ "密码" /user:"用户名"，连接成功后再去读写文件。
读写同Highpeak

 

L

leader47

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-29

• #14

rechCode.Text 就是文档的内容。
此方法也要共享计算的文件夹，属性要设置成可写。

 

D

darlingpeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-04-30

• #15

多人接受答案了。

 

X

xtiawfn

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2008-05-05

• #16

这样写的话是不是不太严禁