设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1609|回复: 3
打印 上一主题 下一主题

[Access本身] 如何打开服务器文件夹里面的图片

[复制链接]
跳转到指定楼层
1#
发表于 2012-6-19 09:07:14 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
其实我讨厌这种简单的提问,可是我是在一点都不知道怎么做,在百度上查到的都是怎么打开EXCEL文件,我把后缀名.xls换成.jpg也不行.所有就这么问题了,希望高手们帮忙我!

我要做的是一个账单管理的小东东:
1.每个账单一条记录,都有一个自动ID 和一个code ,其中code是根据ID自动生成的如:00001,,00056这样的编号;
2.然后我扫描账单生成JPG文件,账单也编号为00001,有很多页就编号为0000101,0000102……放在服务器\\10.118.1.2\folio里面
3.打开ACCESS窗体,有一个TEXT1控件,内容为:\\10.118.1.2\folio,TEXT2为空的
4.还有一个按钮,想要的效果就是,点击按钮就可以找到光标停留的这条记录的code开头的账单,列清单放在TEXT2里面(超级链接也可以),然后点击可以打开相应的图片,然后可以打印、复制之类的操作

注:电脑都在域里面,有足够的权限
麻烦高手们教教怎么搞,多谢多谢
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
 楼主| 发表于 2012-6-19 10:53:52 | 只看该作者
本帖最后由 wuwt918 于 2012-6-19 11:09 编辑

好像看的人多,愿意教的人少额,我自己想这么做,可是实现不了

Private Sub Command9_Click()
   Dim str1 As String
   Dim strvalue As String
   Me.code.SetFocus
   strvalue = Me.code.Value   '这句值等于空,没有取得code的值,不知道如何搞定
   str1 = Text1.Value + "\" + strvalue + ".jpg"   ‘如果上句取得了code的值的话,这句应该可以用的
   Text2.Value = str1    ’Text2我设置了超级链接属性,可是点击超级练级为什么手工填一个存在的文件夹也打开不了?还有那个遍历的怎么做实在太难了
End Sub

刚才发现Text2改成label就可以直接打开了,可是关键的如何获得code的值啊?
3#
 楼主| 发表于 2012-6-19 11:28:50 | 只看该作者
http://www.office-cn.net/thread-96747-1-1.html
刚才看到了这个帖子,好像可以解决问题,吃了饭再回来看
4#
发表于 2012-6-21 14:23:13 | 只看该作者
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-13 13:25 , Processed in 0.141306 second(s), 27 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表