Office中国论坛/Access中国论坛
标题:
如何定义当前文件夹?
[打印本页]
作者:
cyber-bobo
时间:
2007-12-12 15:59
标题:
如何定义当前文件夹?
以下语句:
Me.Image3.Picture = "c:\" & Me.姓名 & ".jpg"
我想将c盘改为数据库所在的当前的文件夹下,该如何改?
作者:
andymark
时间:
2007-12-12 16:11
CurrentProject.Path
作者:
cyber-bobo
时间:
2007-12-12 19:33
ok! thank you:
Me.Image3.Picture = CurrentProject.Path & "\" & Me.姓名 & ".jpg"
作者:
tmtony
时间:
2007-12-12 19:51
再改进一下, 如果 CurrentProject.Path & "\" & Me.姓名 & ".jpg" 文件不存在的话, 程序会出错,而image3不能设置为空图片路径,所以要判断一下.
首先在当前程序路径建立一个空白的图片文件叫 empty.jpg
if dir(CurrentProject.Path & "\" & Me.姓名 & ".jpg")="" then
Me.Image3.Picture = CurrentProject.Path & "\empty.jpg"
else
Me.Image3.Picture = CurrentProject.Path & "\" & Me.姓名 & ".jpg"
end if
作者:
cyber-bobo
时间:
2007-12-12 22:29
good! 考虑周全,值得学习!
欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)
Powered by Discuz! X3.3