以文本方式查看主题

-  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=129283)
--  作者：shyilin
--  发布时间：2018/12/25 17:40:00
--  有无图片在表上提示

在DrawCell上面写代码写这些代码非常卡，有什么好的建议吗？

Dim ftp1 As new FTPClient
ftp1.host=""
ftp1.Account = ""
ftp1.password = ""
ftp1.UTF8=True
If e.Col.Name="编号" Then
    If ftp1.DirExists("\\" & e.Row("编号"))=False  Then
        e.Text="无图片"
        e.Style="hs"
    End If
End If
--  作者：有点蓝
--  发布时间：2018/12/25 17:47:00
--  
DrawCell本来就不适合使用这种代码。

添加一个辅助列，在datacolchanged判断编号列存在对应的图片就把辅助列设置为true，然后DrawCell根据辅助列设置样式即可
--  作者：shyilin
--  发布时间：2018/12/25 17:54:00
--  

好吧，谢谢老师！