- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 二进制列新增提示 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=83946)
-- 发布时间：2016/4/20 9:19:00
-- 二进制列新增提示
此主题相关图片如下：qq截图20160420091235.png
学生信息表照片列使用是二进制列，新增行时都会出现上述提示，怎么关闭提示，请指点，谢谢！
-- 发布时间：2016/4/20 9:25:00
--
如果你要插入图片，你在插入前，必须先把那一行save一下。
-- 发布时间：2016/4/21 23:19:00
--
代码改了是可以调用，这样改对吗？
If Forms("学生基本信息").Opened Then \'如果窗口已经打开
Dim pbx As WinForm.PictureBox = Forms("学生基本信息").Controls("PictureBox1")
If Tables("学生基本信息").Current Is Nothing Then
pbx.Image = Nothing
Else
If Tables("学生基本信息").Current.DataRow.RowState <> DataRowState.Added Then
pbx.Image = Tables("学生基本信息").Current.DataRow.SQlLoadImage("照片") \'从后台提取照片并显示
End If
End If
End If
-- 发布时间：2016/4/22 0:12:00
--
If Forms("学生基本信息").Opened Then \'如果窗口已经打开
Dim pbx As WinForm.PictureBox = Forms("学生基本信息").Controls("PictureBox1")
If Tables("学生基本信息").Current Is Nothing OrElse Tables("学生基本信息").Current.DataRow.RowState = DataRowState.Added Then
pbx.Image = Nothing
Else
pbx.Image = Tables("学生基本信息").Current.DataRow.SQlLoadImage("照片") \'从后台提取照片并显示
End If
End If
-- 发布时间：2016/4/23 12:00:00
--
谢谢！