selectblob data into :lb_filedata
from 表
where filename= '文件名'
using sqlca
if isnull(lb_filedata) then
else
mle_1.text = string(lb_filedata)
end if
局域网比较简单,直接把服务器文件夹设置为映射网络驱动器,然后就可以使用filecopy()函数直接复制。外网:
1、创建FTP服务器,设置端口转发
2、使用windows自带的wininet.dll库,进行FTP下载和上传
具体代码比较多,如果需要可以私信联系方式,给你发
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)