c/s数据库程序中的一个小功能：将文件传至服务器指定的目录，高分求源码

Question

文本文件，图像文件。
安全性要求低，只要能实现就可以了。
还要能够从服务器读取出来。
最好只用tcp/ip协议，用什么方案好？怎么实现？
虽好能有一段源代码，1。文本文件从memo中读取，图片文件从image1.picture读取，然后保存到服务器的指定目录2。文本文件和图片文件分别从opendialog1.filename和openpicturedialog1.filename读取，然后上传至服务器。

Answer 1

CopyFile('\\服务器IP或机名\共享日录\文件名',Pchar(ExtractFilePath(Application.ExeName)+'文件名'),true);你的机子要有权限访问服务器共享，也就是网上邻居可以访问服务器机子。如果发生错误，先用网上邻居可以访问服务器机子，然后再试.

Answer 2

CopyFile('\\服务器IP或机名\共享日录\文件名',Pchar(opendialog1.filename),true);

Answer 3

不能结帖，
新建一个完全共享的文件夹321以后。
opendialog1只能打开*.txt文件。
在一个button的onclick中加入如下代码CopyFile('\\192.168.0.1\321\888.txt',Pchar(opendialog1.filename),true);
编译不错，运行以后，没有效果。

Answer 4

ExtractFilePath(Application.ExeName)这个是什么意思？  还有一个参数true是什么含义？