用FTP上传附件时,涉及到中文上传总是失败,而换成字母或数字时成功如:
Dim flg As new OpenFileDialog '打开文件对话框
If flg.ShowDialog = DialogResult.OK Then '如果选择了打开的文件
Dim wjname As String = flg.FileName.SubString(flg.FileName.LastIndexOf("\")+1)
Dim str As String
str="\wj\" & r("委员ID") & "_" & wjname
Messagebox.show(str)
If ftp.Upload(flg.FileName, str) = True Then
flm.AddFile(str) '向文件列表添加文件附件
Messagebox.show("上传完成!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Else
Messagebox.show("上传失败!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
End If
End If
上面是成功的,如果换成
str="\wj\" & r("姓名") & "_" & wjname
上传失败!
[此贴子已经被作者于2019/4/23 15:39:41编辑过]