全部直播图片

<% set frst = Server.CreateObject("adodb.recordset") sql = "select * from info order by uploadtime asc" frst.open sql,myconn,1,1 fcount = frst.recordcount if fcount > 0 then ''显示内容 'Set Isize=Server.CreateObject("WinImg.ImgSize") for i = 1 to fcount if frst.eof then exit for if i mod 2 = 0 then tbbgcolor = "" else tbbgcolor = "#0066cc" fid = frst("id").Value ftitle = frst("fileTitle").Value fdesc = frst("fileDesc").Value ftype = frst("fileType").Value fpath = frst("filePath").Value fsize = frst("filesize").Value fhits = frst("hits").Value fuploadtime = frst("uploadTime").Value 'FileNameStr=Server.Mappath(fpath) 'Isize.GetImgSize Cstr(FileNameStr) %> <% frst.movenext next else %> 还没有上传的内容！ <% end if frst.close set frst = nothing myconn.close set myconn = nothing %>