在 asp 中显示来自 csv 文件的图像

Question

我已经完成我的脚本，它会在 table 秒内显示我的 csv。

但事情是这样的：我希望 table 4 在 csv 中显示来自 link 的我的实际图像。这可能吗？

这是按顺序显示我的 csv 的脚本示例：

Do Until oInStream.AtEndOfStream 
    sRows = oInStream.readLine
    arrRows = Split(sRows,";")

    strText = "<td><div align='center'>" + arrRows(0) + "<br></div></td>"
    Response.write(strText)
    strText = "<td><div align='center'>" + arrRows(1) + "</div></td>"
    Response.write(strText)
    strText = "<td><div align='center'>" + arrRows(2) + "</div></td>"
    Response.write(strText)
    strText = "<td><div align='center'>" + arrRows(3) + "</div></td>"
    Response.write(strText)
    strText = "<td><div align='center'>" + arrRows(4) + "</div></td>"
    Response.write(strText)
    strText = "<td><div align='center'>" + arrRows(5) + "</div></td>"
    Response.write(strText)
    strText = "<td><div align='center'>" + arrRows(6) + "</div></td>"
    Response.write(strText)
    Response.write("</tr>")
Loop

截图如下：

这里是 csv 的样子：

test,test,test,http://google.com/image.jpg,test,test,test

Answer 1

像这样尝试（如果您的图像是一行中的第四个元素）：

<%
    Do Until oInStream.AtEndOfStream 
        sRows = oInStream.readLine
        arrRows = Split(sRows,";")
%>
    <tr>
        <td><div align='center'><%=arrRows(0)%></div></td>
        <td><div align='center'><%=arrRows(1)%></div></td>
        <td><div align='center'><%=arrRows(2)%></div></td>
        <td><div align='center'><img src='<%=arrRows(3)%>' alt='' /></div></td>
        <td><div align='center'><%=arrRows(4)%></div></td>
        <td><div align='center'><%=arrRows(5)%></div></td>
        <td><div align='center'><%=arrRows(6)%></div></td>
    </tr>

<% Loop %>

其他方式：

Do Until oInStream.AtEndOfStream 
    sRows = oInStream.readLine
    arrRows = Split(sRows,";")

    strText = "<td><div align='center'>" + arrRows(0) + "<br></div></td>"
    Response.write(strText)
    strText = "<td><div align='center'>" + arrRows(1) + "</div></td>"
    Response.write(strText)
    strText = "<td><div align='center'>" + arrRows(2) + "</div></td>"
    Response.write(strText)
    strText = "<td><div align='center'><img src='" + arrRows(3) + "' alt='' /></div></td>"
    Response.write(strText)
    strText = "<td><div align='center'>" + arrRows(4) + "</div></td>"
    Response.write(strText)
    strText = "<td><div align='center'>" + arrRows(5) + "</div></td>"
    Response.write(strText)
    strText = "<td><div align='center'>" + arrRows(6) + "</div></td>"
    Response.write(strText)
    Response.write("</tr>")
Loop

Answer 2

根据要求：

Dim oInStream, sRows, arrRows, c
Do Until oInStream.AtEndOfStream
    sRows = oInstream.ReadLine
    arrRows = Split(sRows, ";")
    Response.Write("<tr>")
    For c = 0 To UBound(arrRows, 1)
        If c <> 3 Then
            Response.Write("<td><div align=""center"">")
            Response.Write(arrRows(c))
            Response.Write("</div></td>")
        Else
            Response.Write("<img src=""")
            Response.Write(arrRows(c))
            Response.Write(""" alt=""An image"" />")
        End If
    Next 'c
    Response.Write("</tr>")
Loop

以上代码直接写入Response Buffer，返回给客户端。根据 krlzlx 的 post...

，防止连接会加快速度，或者使用 HTML 版本

Dim oInStream, sRows, arrRows, c
Do Until oInStream.AtEndOfStream
    sRows = oInstream.ReadLine
    arrRows = Split(sRows, ";")%>
    <tr>
        <%For c = 0 To UBound(arrRows, 1)
            If c <> 3 Then%>
                <td><div align="center">
                    <%= arrRows(c) %>
                </div></td>
            <%Else%>
                <img src="<%= arrRows(c) %>" alt="An image" />
            <%End If
        Next 'c%>
    </tr>
<%Loop

您可能希望包含一个常量来记录实际包含图像的字段，以便您可以对此进行测试。

在 asp 中显示来自 csv 文件的图像

Show in asp a image from a csv file

csv

asp.net

asp-classic