求解:如何将客户端的一个文件传输到服务器端?

Drate
博客专家认证
2002-09-17 08:35:12
文件可能很大(如一张VCD),而且服务器没有服务程序!全靠客户端来完成这项工作的了!最好有源代码!
...全文
110 11 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
Drate 2002-09-18
  • 打赏
  • 举报
回复
没有响应吗?
Drate 2002-09-17
  • 打赏
  • 举报
回复
用TNMFTP不需要服务器端的吧!
tongdings 2002-09-17
  • 打赏
  • 举报
回复
gz
tccb 2002-09-17
  • 打赏
  • 举报
回复
服务器没有服务程序是不可能完成此任务的,
最多是在服务器使用window默认的文件共享服务
Drate 2002-09-17
  • 打赏
  • 举报
回复
TNMFTP是怎么用的呢?说一点详细的吧!
daniel007 2002-09-17
  • 打赏
  • 举报
回复
使用TNMFTP控件,具体的文档帮助文件里都有,可以轻松实现ftp的功能
lqdmafeng 2002-09-17
  • 打赏
  • 举报
回复
GZ
hongqi162 2002-09-17
  • 打赏
  • 举报
回复
我也很想知道!
关注!
Drate 2002-09-17
  • 打赏
  • 举报
回复
楼上的,如果能说详细一点的就更好,我就是因为没有时间看书嘛,否则我就写完了,资料是不少,但就没有时间一点点的全看完,如果能先解决这个问题,我回头一定看!
SilveryFox 2002-09-17
  • 打赏
  • 举报
回复
在serversocket设置端口及监听服务
clientsocketonconnect();
begin
sentstream();//sendbuf,sendtext,sendstreamthendrop等
end;
具体参数参考delphi帮助吧
Drate 2002-09-17
  • 打赏
  • 举报
回复
有没有办法呀?
我现在有这几个方案,需要大家再讨论一下:

一、在服务器上创建一个共享目录,直接用copyfile('a.bmp','\\server\share\a.bmp')来完成,但这样会出现一个问题是,复制的时候会报如下的错“无复制a.bmp,无法更新密码,提供给新密码的值包含密码中不允许的值!”。但我只要把服务器server改为本机的地址的话,就不会出错,我想可能是本机不需要认证吧!
不知道哪位高手知道如果解决这个问题,我的代码如下:
Var
F:TShFileOpStruct;
begin
F.wnd:=Application.Handle;
F.wFunc:=FO_COPY; {操作方式}
F.pFrom:=PChar('a.bmp'+#0#0);
F.pTo:=PChar('\\server\share\a.bmp'+#0#0);
F.fFlags:=FOF_ALLOWUNDO OR FOF_RENAMEONCOLLISION;
if ShFileOperation(F)=0 then
showmessage('copy success!');
二、采用FTP方式对文件进行传输,但是这样的话,需要在服务器配置FTP服务器!
三、采用WINDOWS SOCKET文件传输方式,这种方式的话需要用编写一个服务器端程序,对客户端提出的连接进行响应。
四、采用ASP/PHP的文件传输方式,在DELPHI的程序中内置ASP/php程序,采用WEB方式对文件进行传输!

如果哪位高手有兴趣的话,可以分别将这些方法实现过程写出来!我现在采用最后一种方式,等写完了以后就可以贴出来了!

5,928

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧