set rs=...
... 这里就不说了
显示图片:<img src="<%=rs("picpath")%>">这样读取的图片是按原来尺寸显示,你可以限制尺寸:
<img src="<%=rs("picpath")%>" width="这里你可以设置" heigth="这里你可以设置" border="0">这样就可以了。
比如:IMAGE为你数据库中存放图片的字段:显示就用
<img src="相对路径/<%==rs("IMAGE")%>">
要是你的IMAGE为图片的具体路径就直接用
<img src="<%==rs("IMAGE")%>">
把代码放到你要显示图片的地方就可以了
这个代码写的有乱.. 无论如何... 试试看用以下代码取代Sub ShowPage试试看
Sub ShowPage(objRS,no)
objRS.AbsolutePosition=no
Response.Write ("<tr>")
For J=0 To objRS.Fields.Count-1
Data="<td >" &objRS.Fields(j).name &"</td>"
If objRS.Fields(j).name = "图片" then
Data = Data &"<td><img src=""" &objRS.Fields(j).value &"""></td>"
Else
Data = Data &"<td>" &objRS.Fields(j).value &"</td>"
End If
Response.Write Data
Next
Response.Write("</tr>")
End Sub
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)