- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 图片加载 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=147781)
-- 发布时间：2020/3/24 9:09:00
-- 图片加载
我使用了缩略图显示,正常鼠标滚动没有问题,但使用拖动条时就会报错,有解决办法吗?
If e.Col.Name = "图片" Then
If FileSys.FileExists("\\\\10.100.100.129\\产品中心\\foxtable资料\\图片\\" & "缩略图_" & e.Row("图片").trim("\\")) Then
e.Graphics.DrawImage(getImage("\\\\10.100.100.129\\产品中心\\foxtable资料\\图片\\" & "缩略图_" & e.Row("图片").trim("\\")),e.x +1,e.y+1,e.Width - 2,e.Height - 2)
e.Text = ""
End If
End If
此主题相关图片如下：1.png
此主题相关图片如下：1.png-- 发布时间：2020/3/24 9:30:00
--
试试
If e.Col.Name = "图片" Then
dim str as string = "\\\\10.100.100.129\\产品中心\\foxtable资料\\图片\\缩略图_" & e.Row("图片").trim("\\")
If FileSys.FileExists(str) Then
e.Graphics.DrawImage(getImage(str),e.x +1,e.y+1,e.Width - 2,e.Height - 2)
e.Text = ""
End If
End If
-- 发布时间：2020/3/24 10:18:00
--
还是会出现
-- 发布时间：2020/3/24 10:40:00
--
请上传实例测试
-- 发布时间：2020/3/24 10:45:00
--
密码888
-- 发布时间：2020/3/24 14:28:00
--
为什么传不上附件?
-- 发布时间：2020/3/24 14:45:00
--
参考：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=78
上传不成功，重复多试几次
-- 发布时间：2020/3/25 9:03:00
--
请查看下附件888
[此贴子已经被作者于2020/3/25 9:04:28编辑过]