Image 在web浏览器控件-MS Access中显示大图像_Image_Vba_Browser_Web_Resolution

Image 在web浏览器控件-MS Access中显示大图像

image vba browser web

Image 在web浏览器控件-MS Access中显示大图像,image,vba,browser,web,resolution,Image,Vba,Browser,Web,Resolution,截图：尝试在MS Access 2010的IE web浏览器控件中显示大图像（大于5000x5000）时，不会显示该图像我正在使用VBA浏览对象的文档并将内容写入其中。我已经测试了这两种方法，得到了相同的结果。较小的图像渲染没有问题乐代码如下： Private Sub DisplayImg(bWrite As Boolean) Dim sHTMLFilePath As String Dim sImageFilePath As String Dim sContent As String

截图：

尝试在MS Access 2010的IE web浏览器控件中显示大图像（大于5000x5000）时，不会显示该图像

我正在使用VBA浏览对象的文档并将内容写入其中。我已经测试了这两种方法，得到了相同的结果。较小的图像渲染没有问题

乐代码如下：

Private Sub DisplayImg(bWrite As Boolean)

Dim sHTMLFilePath As String
Dim sImageFilePath As String
Dim sContent As String

sImageFilePath = "d:\img.png"
sHTMLFilePath = "d:\html.html"

sContent = "<html>"
sContent = sContent & vbCrLf & "<head>"
sContent = sContent & vbCrLf & "</head>"
sContent = sContent & vbCrLf & "<style>"
sContent = sContent & vbCrLf & GetCSS ' gets css from db
sContent = sContent & vbCrLf & "</style>"
sContent = sContent & vbCrLf & "<body>"
sContent = sContent & vbCrLf & "<img class=" & Chr(34) & "img_wb" & Chr(34) & " src=" & Chr(34) & sImageFilePath & Chr(34) & ">"
sContent = sContent & vbCrLf & "</body>"
sContent = sContent & vbCrLf & "</html>"

If bWrite = False Then ' navigate
    Call CreateNewTextFile(sHTMLFilePath, sContent) ' creates the html file
    Me.wb.navigate sHTMLFilePath
Else ' write
    Me.wb.Document.Clear
    Me.wb.Document.write sContent
    Me.wb.Document.Close
End If

End Sub

Private子显示img（b写入为布尔值）
将sHTMLFilePath设置为字符串
Dim sImageFilePath作为字符串
像字符串一样模糊的内容
sImageFilePath=“d:\img.png”
sHTMLFilePath=“d:\html.html”
sContent=“”
sContent=sContent&vbCrLf&“
sContent=sContent&vbCrLf&“
sContent=sContent&vbCrLf&“
scocontent=scocontent&vbCrLf&GetCSS'从数据库获取css
sContent=sContent&vbCrLf&“
sContent=sContent&vbCrLf&“
sContent=sContent&vbCrLf&“
sContent=sContent&vbCrLf&“
sContent=sContent&vbCrLf&“
如果bWrite=False，则“导航”
调用CreateNewTextFile（sHTMLFilePath，scoContent）'创建html文件
Me.wb.navigate sHTMLFilePath
别人写的
Me.wb.Document.Clear
Me.wb.Document.write sContent
Me.wb.Document.Close
如果结束
端接头

您确定可以吗？否则，您可以在此处对图像重新设置像素：

我在GoDaddy help上找到了这个： “注意：图像需要格式化为.jpg、.jpeg、.gif或.png文件。每个文件的图像上载限制为30MB。虽然可以上载最大为5000 x 5000像素的图像，但图像的显示大小不会超过1920 x 1080像素。”

确实可以吗？否则，您可以在此处对图像重新设置像素：

我在GoDaddy help上找到了这个：

“注意：图像需要格式化为.jpg、.jpeg、.gif或.png文件。每个文件的图像上载限制为30MB。虽然可以上载5000 x 5000像素的图像，但图像的显示大小不会超过1920 x 1080像素。”

您能提供测试代码吗？我在最初的问题中添加了代码。谢谢。你能提供测试过的代码吗？我在最初的问题中添加了代码。谢谢。我在VisualStudio2012中测试了同样的东西，它可以工作，但我想在Access中这是不可能的，因为控件的限制。这有意义吗？重新对图像进行像素化不是一个解决方案。文件大小不是问题-我可以以4000x4000显示30mb大小的图像。重新混合不是解决方案吗？为什么？我想展示的图片实际上是一张大的技术图纸，它进入最终报告，必须按比例打印。重新混合会影响图形中的细节。该报告也是HTML格式的，非常大（大小为A0或更大），并且也显示在应用程序中，具有相同的问题（图形未显示在报告正文中）。目前，我决定使用默认浏览器从外部打开报表-这是目前唯一可行的方法。我在visual studio 2012中测试了同样的方法，并且可以正常工作，但我想在Access中这是不可能的，因为控件的限制。这有意义吗？重新对图像进行像素化不是一个解决方案。文件大小不是问题-我可以以4000x4000显示30mb大小的图像。重新混合不是解决方案吗？为什么？我想展示的图片实际上是一张大的技术图纸，它进入最终报告，必须按比例打印。重新混合会影响图形中的细节。该报告也是HTML格式的，非常大（大小为A0或更大），并且也显示在应用程序中，具有相同的问题（图形未显示在报告正文中）。目前，我决定使用默认浏览器从外部打开报告-这是目前唯一可行的方法。