ASP广告代码的解决？

ucash

想改变如下的代码，实现网页中嵌入广告的功能
/ C: |# H+ s1 K- l9 W: q" Y
& [! H% N+ F6 f9 ?代码如下（部分）：
sub content_down()
6 S9 _. l2 H6 c5 l- U0 sif rs("Grade")="0" then
hxGrade="游客身份"
elseif rs("Grade")="1" then
hxGrade="会员身份"
elseif rs("Grade")="2" then
hxGrade="VIP身份"
end if
- Q) g1 l% N. U, x7 _! qResponse.Write "<table width=""100%"" border=""1"" align=""center"" cellspacing=""0"" cellpadding=""3"" bgcolor=""#FFFFFF"" bordercolor=""#f0f0f0"" style=""border-collapse: collapse"">"
Response.Write "<tr>" & vbCrLf
Response.Write "<td colspan=3 align='center' HEIGHT=30><b><font color=ff6600><b>"&rs("soft_name")&"</b></font><b></td>" & vbCrLf
5 ?* m% N" O& z' iResponse.Write "</tr>" & vbCrLf
Response.Write "<tr>" & vbCrLf
% I# c8 D& g; J2 |! y7 }( VResponse.Write "<td height='25' align='center' width='15%'>加入时间</td>" & vbCrLf
Response.Write "<td width='35%'> "&rs("soft_joindate")&"</td>" & vbCrLf
Response.Write "<td rowspan='11' align='center' width='235'>" & vbCrLf
if rs("soft_showpic")<>"http://hx66.net" then
. d0 u3 p+ W# q$ t6 v5 f+ |Response.Write "<a href='"&rs("soft_showpic")&"' title='"&rs("soft_showpic")&"' target=_blank><img src='"&rs("soft_showpic")&"' border='0' valign='center'></a>" & vbCrLf
else
* ~6 t) d0 q: n, p- G) {: A2 yResponse.Write "<img src='img/nopic.gif' border='0' valign='center'>" & vbCrLf
end if
7 ]2 h. A: y+ ^) X8 S  QResponse.Write "</tr>" & vbCrLf
Response.Write "<tr>" & vbCrLf

想要实现的网页情况地址：http://www.vip138.com/showdown.asp?soft_id=28
8 B) i% A" l! v: C7 _2 J( v" }
3 d" a" x( @# \7 F想通过修改这段语句：
  t+ P; F& M0 d  Vif rs("soft_showpic")<>"http://hx66.net" then
Response.Write "<a href='"&rs("soft_showpic")&"' title='"&rs("soft_showpic")&"' target=_blank><img src='"&rs("soft_showpic")&"' border='0' valign='center'></a>" & vbCrLf
else
Response.Write "<img src='img/nopic.gif' border='0' valign='center'>" & vbCrLf
end if
4 U) m; W2 W, |) U& L6 d% |, S实现：有图片链接的时候，右侧显示图片，没有图片链接的时候显示以下代码生成的公告

$ v% b) S7 P0 H8 Z: u8 ~! `广告代码如下：
<script>
' i; Z. t& N5 ?7 cvar YahooCNADConfig=new Array();
YahooCNADConfig['adid']=363
YahooCNADConfig['wid']=XXXXX
YahooCNADConfig['w']=141
* A2 s9 F% D3 T+ z  {+ fYahooCNADConfig['h']=60
</script>
<script type='text/javascript' src='http://view.aliunion.cn.yahoo.com/showad.php'></script>

请教如何将广告代码替换部分语句实现这个功能？谢谢

mudone

替换：Response.Write "<img src='img/nopic.gif' border='0' valign='center'>" & vbCrLf
- _+ Y( [+ Q9 _$ [2 q+ s为：
Response.Write "<script>" & vbCrLf
* ~: ?# x  N: c( J7 k* l( v, k# nResponse.Write "var YahooCNADConfig=new Array();" & vbCrLf
Response.Write "YahooCNADConfig['adid']=363" & vbCrLf
Response.Write "YahooCNADConfig['wid']=XXXXX" & vbCrLf
Response.Write "YahooCNADConfig['w']=141" & vbCrLf
Response.Write "YahooCNADConfig['h']=60" & vbCrLf
Response.Write "</script>" & vbCrLf
Response.Write "<script type='text/javascript' src='http://view.aliunion.cn.yahoo.com/showad.php'></script>" & vbCrLf

ucash

非常感谢，我现在就试下～～～

ucash

非常感谢，PS个问题，如果要加个居中代码该怎么加呢？我模仿了下，好像不行

mudone

<div align="center">xxxxxx</div>