设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

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

[帮助] 求助:局域网SQL数据库,服务器图片文件夹不共享造成图片不能显示

[复制链接]
跳转到指定楼层
1#
发表于 2017-5-21 15:46:54 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
局域网服务器因关闭图片文件夹共享,造成图片路径失效不能显示。
原更改代码如下(文件夹共享模式):
Private Sub 图片库_Click()
    Dim dr
    dr = "explorer " & "\\IP\图片"
    Shell dr, vbNormalFocus
  End Select
End Sub

现更改代码如下(加上IP地址、路径、文件夹名称):
Private Sub 图片库_Click()
    Dim dr As String
    dr = "\\" & dr("IP地址") & "dr("路径")" & "\图片\"    '这一句报错(缺少:结束语句)
    Shell dr, vbNormalFocus
  End Select
End Sub
请问(缺少:结束语句)这里该如何编辑,谢谢。

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅

点击这里给我发消息

2#
发表于 2017-5-21 15:51:16 | 只看该作者
试一下
dr = "\\" & dr("IP地址") & "dr("路径")" & "\图片\"    '这一句报错(缺少:结束语句)
FollowHyperlink dr  '试试这样打开图片
3#
 楼主| 发表于 2017-5-21 16:10:10 | 只看该作者
本帖最后由 sunwrsun 于 2017-5-21 16:27 编辑

一样的,还是这一句报错。
dr = "\\" & dr("IP地址") & "dr("路径")" & "\图片\"    '这一句报错(缺少:结束语句)
D:\报错(缺少:结束语句)

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?注册

x
4#
 楼主| 发表于 2017-5-21 18:01:44 | 只看该作者
再问:服务器文件夹共享关闭,除FTP外,还有别的方法访问吗?
若可行请给段代码,谢谢。
5#
 楼主| 发表于 2017-5-21 18:39:38 | 只看该作者
Acccee与SQL结合模式,如果涉及客户端到需要访问服务器硬盘上的图片,除了共享图片文件夹方式外,就没有其他方法吗。这次勒索病毒的爆发,绝大多数网络服务器都关闭了445端口,共享图片文件夹关闭也不能访问了,求助其他解决方法。

点击这里给我发消息

6#
发表于 2017-5-21 19:54:54 | 只看该作者
你先用 msgbox dr
把它内容显示 出来,看看路径正确不
如果这个都出错,就是你路径还不对,与后面无关

点击这里给我发消息

7#
发表于 2017-5-24 05:25:53 | 只看该作者
iis 网页,用webbrowser访问 html,图片嵌入 字段也行。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-11-25 06:30 , Processed in 0.099580 second(s), 31 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

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