- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]照片的调用及存储问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=79834)
-- 发布时间：2016/1/10 14:37:00
-- [求助]照片的调用及存储问题
此主题相关图片如下：qq截图20160109153210.png
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:交通行政执法管理系统.foxdb |
要求：从一个文件夹内调用一张照片并在PictureBox1中显示；
点击[保存]控件后将照片以车牌号码加违章时间为文件名保存到另一个文件夹内；
照片对应的数据库列是"wzzp"。
求大侠们这个代码和解决方法，跪求，谢谢大侠们
-- 发布时间：2016/1/10 14:38:00
--
无法连接你的数据库，数据库上传上来。
-- 发布时间：2016/1/10 14:44:00
--
比如，直接写
e.form.controls("picturebox1").image.Save(projectPath & "test\\" & dr("车牌") & dr(违章时间) & ".jpg")
-- 发布时间：2016/1/10 14:53:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:backup.zip |
sql2008版
-- 发布时间：2016/1/10 14:54:00
--
请介绍的具体一点，谢谢
-- 发布时间：2016/1/10 14:55:00
--
就一句代码的事
-- 发布时间：2016/1/10 15:04:00
--
无语，没有必要弄那么多数据源啊，弄一个就行啊。
-- 发布时间：2016/1/10 15:08:00
--
谢谢，不好意思，请帮助一下下
-- 发布时间：2016/1/10 15:18:00
--
Dim img = e.form.controls("picturebox1").image
If img IsNot Nothing Then
Dim path As String = projectPath & e.Form.Controls("TextBox6").text & format(e.Form.Controls("DateTimePicker1").value, "yyyyMMddHHmmss") & ".jpg"
img.Save(path)
Tables("wztz").current("wzzp")=path
End If