您所在位置：主题：问一下一个关于从Access中获取图象URL显示Flash图片新闻的问题
wanliqun
[专家分：70] 发布于 2007-05-27 13:10:00
做了一个后台，其中可以在发表的文章中上传图片，然后选定该文章为Flash图片作为最近更新。现在问题是，发表的文章并非都得上传图片，现在那些没有上传图片的新闻在前台Flash新闻中显示出一片空白实在难看。
我想把那些没有上传图片的文章不显示在Flash新闻栏中，比如说我的数据库是：
PictureNews
Title D_Picture
大家好 ../img/fds.img
好罗
谢谢 ../img/fds.img
eof
我想只要那些D_picture字段不为空的图片显示在前台的Flash新闻栏中，不知道哪位高手能指点一下，下面是我的源代码：
<!--#include file="conn.asp" -->
<%
'创建数据集
set rs = server.createobject("adodb.recordset")
sql = "select * from PictureNews order by Date desc"
'rs.open SQL语句 当前链接 1代表启动一个keyset类型的游标 第四个参数指定LockType,确定打开RecordSet时应该使用
'的锁定类型 1,也是缺省值,RecordSet对象以只读方式启动,无法运行addNew, updata和delete等操作.
rs.open sql, conn, 1, 1
if not rs.eof and not rs.bof then
ImgAddress = rs("D_picture") '设定图象的URL
Link = rs("Link") '设定图象的链接
Title = rs("Title") '设定图象的标题
rs.movenext '回滚数据集
do while not rs.eof
ImgAddress = ImgAddress&"|"&rs("D_picture")
Link = Link&"|"&rs("Link")
Title = Title&"|"&trim(rs("Title"))
rs.movenext
loop
'关闭数据库连接
rs.close
'释放数据库资源
set rs = nothing
%>
<script language="Javascript">
<!--
<!--
function MM_swapImgRestore() {
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_preloadImages() {
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
function MM_findObj(n, d) {
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&blank.frames.length) {
d=blank.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && document.getElementById) x=document.getElementById(n); return x;
}
function MM_swapImage() {
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>
<BODY BGCOLOR=#FFFFFF text="#000000" LEFTMARGIN=0 TOPMARGIN=0 MARGINWIDTH=0 MARGINHEIGHT=0>
<table width="260" border="0" cellspacing="0" cellpadding="0" align="center" height="190">
<tr> <td height="190" align="center" class="16" valign="middle" width="260">
<!--mark ( auto_2004_sysztp ) parse begin-->
<!--焦点图开始-->
<script type="text/javascript">
<!--
var focus_width=270
var focus_height=187
var text_height=20
var swf_height = focus_height+text_height
var pics='<%=ImgAddress%>'
var links='<%=Link%>'
var texts='<%=Title%>'
document.write('<object ID="focus_flash" classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0" width="'+ focus_width +'" height="'+ swf_height +'">');
document.write('<param name="allowScriptAccess" value="sameDomain"><param name="movie" value="images/pixviewer.swf"><param name="quality" value="high"><param name="bgcolor" value="#ffffff">');
document.write('<param name="menu" value="false"><param name=wmode value="opaque">');
document.write('<param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'">');
document.write('<embed ID="focus_flash" src="flash/pixviewer.swf" wmode="opaque" FlashVars="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'" menu="false" bgcolor="#ffffff" quality="high" width="'+ focus_width +'" height="'+ swf_height +'" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />');
document.write('</object>');
//-->
</script>
<!--焦点图结束-->
<!-- mark ( auto_2004_sysztp ) parse end-->
</td></tr>
</table>
<%
else
response.write "<font color='red' align='center'>"
response.write "没有可用的图片新闻，请管理员添加!"
response.write "</font>"
end if
%>
谢谢！
我想把那些没有上传图片的文章不显示在Flash新闻栏中，比如说我的数据库是：
PictureNews
Title D_Picture
大家好 ../img/fds.img
好罗
谢谢 ../img/fds.img
eof
我想只要那些D_picture字段不为空的图片显示在前台的Flash新闻栏中，不知道哪位高手能指点一下，下面是我的源代码：
<!--#include file="conn.asp" -->
<%
'创建数据集
set rs = server.createobject("adodb.recordset")
sql = "select * from PictureNews order by Date desc"
'rs.open SQL语句 当前链接 1代表启动一个keyset类型的游标 第四个参数指定LockType,确定打开RecordSet时应该使用
'的锁定类型 1,也是缺省值,RecordSet对象以只读方式启动,无法运行addNew, updata和delete等操作.
rs.open sql, conn, 1, 1
if not rs.eof and not rs.bof then
ImgAddress = rs("D_picture") '设定图象的URL
Link = rs("Link") '设定图象的链接
Title = rs("Title") '设定图象的标题
rs.movenext '回滚数据集
do while not rs.eof
ImgAddress = ImgAddress&"|"&rs("D_picture")
Link = Link&"|"&rs("Link")
Title = Title&"|"&trim(rs("Title"))
rs.movenext
loop
'关闭数据库连接
rs.close
'释放数据库资源
set rs = nothing
%>
<script language="Javascript">
<!--
<!--
function MM_swapImgRestore() {
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_preloadImages() {
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
function MM_findObj(n, d) {
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&blank.frames.length) {
d=blank.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && document.getElementById) x=document.getElementById(n); return x;
}
function MM_swapImage() {
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>
<BODY BGCOLOR=#FFFFFF text="#000000" LEFTMARGIN=0 TOPMARGIN=0 MARGINWIDTH=0 MARGINHEIGHT=0>
<table width="260" border="0" cellspacing="0" cellpadding="0" align="center" height="190">
<tr> <td height="190" align="center" class="16" valign="middle" width="260">
<!--mark ( auto_2004_sysztp ) parse begin-->
<!--焦点图开始-->
<script type="text/javascript">
<!--
var focus_width=270
var focus_height=187
var text_height=20
var swf_height = focus_height+text_height
var pics='<%=ImgAddress%>'
var links='<%=Link%>'
var texts='<%=Title%>'
document.write('<object ID="focus_flash" classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0" width="'+ focus_width +'" height="'+ swf_height +'">');
document.write('<param name="allowScriptAccess" value="sameDomain"><param name="movie" value="images/pixviewer.swf"><param name="quality" value="high"><param name="bgcolor" value="#ffffff">');
document.write('<param name="menu" value="false"><param name=wmode value="opaque">');
document.write('<param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'">');
document.write('<embed ID="focus_flash" src="flash/pixviewer.swf" wmode="opaque" FlashVars="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'" menu="false" bgcolor="#ffffff" quality="high" width="'+ focus_width +'" height="'+ swf_height +'" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />');
document.write('</object>');
//-->
</script>
<!--焦点图结束-->
<!-- mark ( auto_2004_sysztp ) parse end-->
</td></tr>
</table>
<%
else
response.write "<font color='red' align='center'>"
response.write "没有可用的图片新闻，请管理员添加!"
response.write "</font>"
end if
%>
谢谢！