Dm rh as datarow =....SQLFIND(...)
Dim lsts As New List(of String)
lsts = rh.Lines("上传凭证")
With wb.AddInputGroup("","tbsp_ipg1","上传凭证")
With .AddUploader("tbsp_up3","凭证照片",True)
.AllowAdd = False '关闭文件上传功能
For Each lst As String In lsts
Dim xstp As String=审批凭证目录 & "/" & rh("审批编号") & "/" & lst
xstp= xstp.Replace("\","/")
MessageBox.Show(xstp)
.AddImage(xstp)
Next
End With
End With
这是 MessageBox.Show(xstp) 内容如下 C:/文件目录/审批凭证/20220216-003/ooopic_1562132169.png
判断xstp文件是存在的。可是图片没有显示出了。哪有问题？
工作日志目录= "D:\文件目录\工作日志"
审批凭证目录="D:\文件目录\审批凭证"
这样的目录是不是不允许？
[此贴子已经被作者于2022/2/26 10:37:17编辑过]
加好友 
发短信
Post By：2022/2/26 10:14:00 [只看该作者]
