用VB实现把文件保存在局域网的服务器上?
2个回答
展开全部
我建议改名按照以下定义
修正文件夹字符串
path=文件的路径
filepath=replace(path,":","")
filepath=replace(filepath,"\","|")
fname=文件名
fnametmp=split(fname,".")
filesplit=ubound(fnametmp)
fname=fnametmp(0)
for i=1 to filesplit -1
fname=fname & "." & fnametmp(i)
next
fname=fname & "." & filepath & "." & fnametmp(filesplit)
文件格式=旧文件名.路径.文件扩展名
不知道你要怎么保存到服务器,最简单的方法当然是映射磁盘,直接使用filecopy命令复制过去
如果需要恢复,按照上边的方法逆向操作就可以了
上边只是一点想法,是否实用没研究过,献丑了
修正文件夹字符串
path=文件的路径
filepath=replace(path,":","")
filepath=replace(filepath,"\","|")
fname=文件名
fnametmp=split(fname,".")
filesplit=ubound(fnametmp)
fname=fnametmp(0)
for i=1 to filesplit -1
fname=fname & "." & fnametmp(i)
next
fname=fname & "." & filepath & "." & fnametmp(filesplit)
文件格式=旧文件名.路径.文件扩展名
不知道你要怎么保存到服务器,最简单的方法当然是映射磁盘,直接使用filecopy命令复制过去
如果需要恢复,按照上边的方法逆向操作就可以了
上边只是一点想法,是否实用没研究过,献丑了
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询