Office中国论坛/Access中国论坛

标题: 求助：局域网SQL数据库，服务器图片文件夹不共享造成图片不能显示 [打印本页]

作者: sunwrsun 时间: 2017-5-21 15:46
标题: 求助：局域网SQL数据库，服务器图片文件夹不共享造成图片不能显示
局域网服务器因关闭图片文件夹共享，造成图片路径失效不能显示。
原更改代码如下（文件夹共享模式）：
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
请问（缺少：结束语句）这里该如何编辑，谢谢。

作者: admin 时间: 2017-5-21 15:51
试一下
dr = "\\" & dr("IP地址") & "dr("路径")" & "\图片\" '这一句报错（缺少：结束语句）
FollowHyperlink dr '试试这样打开图片

作者: sunwrsun 时间: 2017-5-21 16:10
本帖最后由 sunwrsun 于 2017-5-21 16:27 编辑

一样的，还是这一句报错。
dr = "\\" & dr("IP地址") & "dr("路径")" & "\图片\" '这一句报错（缺少：结束语句）
D:\报错（缺少：结束语句）[attach]61268[/attach]

作者: sunwrsun 时间: 2017-5-21 18:01
再问：服务器文件夹共享关闭，除FTP外，还有别的方法访问吗？
若可行请给段代码，谢谢。

作者: sunwrsun 时间: 2017-5-21 18:39
Acccee与SQL结合模式，如果涉及客户端到需要访问服务器硬盘上的图片，除了共享图片文件夹方式外，就没有其他方法吗。这次勒索病毒的爆发，绝大多数网络服务器都关闭了445端口，共享图片文件夹关闭也不能访问了，求助其他解决方法。

作者: admin 时间: 2017-5-21 19:54
你先用 msgbox dr
把它内容显示出来，看看路径正确不
如果这个都出错，就是你路径还不对，与后面无关

作者: zpy2 时间: 2017-5-24 05:25
iis 网页，用webbrowser访问 html,图片嵌入字段也行。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)