先检查是否能连接上服务器。
Dim result As Boolean = ZEMTPublicManager.ConnectShareDoc(shareCfg("URL"), shareCfg("USER"), shareCfg("PWD"))
If result = False Then Throw New Exception("无法访问文件资源,请联系管理员")
(注:url=\\10.0.1.1\ss\sc
destPath=\\10.0.1.1\ss\sc\abc
destFile=\\10.0.1.1\ss\sc\abc\加文件名时间
)
然后进行下面操作
1、定义一个文件上传到服务器的文件目录
2、检查服务器上是否存在该指定上传路径目录
3、定义目的文件完整路径