ASP高手帮忙

Question

下面是一段代码  作用是 显示打的广告。。
请问 如何在 客服QQ："&rs("QQ")&"  这前面 加上一个图像啊？  我要插入一个图像 在这个 客服QQ 前面 始终不对  如何插入的啊？


<%
'=================================================
'过程名：SetRed_ads
'作  用：精品广告推荐，按照天数计算
'=================================================
sub SetRed_ads
sql="select top "&fineMathematics&" Gq_sfdata.id,Gq_sfdata.name,Gq_sfdata.IP,Gq_sfdata.service,Gq_sfdata.Sdate,Gq_sfdata.hour,Gq_sfdata.minute,Gq_sfdata.addr,Gq_sfdata.QQ,Gq_sfdata.xingzhi,Gq_sfdata.homepage,Gq_sfdata.download,Gq_sfdata.gameid,Gq_GameType.game,Gq_sfdata.download,Gq_sfdata.fine,Gq_sfdata.finetime,Gq_sfdata.time"
sql=sql&" from Gq_sfdata,Gq_GameType where Gq_sfdata.gameid=Gq_GameType.id"
sql=sql&" and Gq_sfdata.ulock=1 and Gq_sfdata.fine=1 and Gq_sfdata.gameid="&indexsf&" order by Gq_sfdata.hour,Gq_sfdata.minute"
rs.open sql,conn,1,1
if rs.eof and rs.bof then
rs.close
else
while not rs.eof
if checkday(rs("finetime"),rs("time")) then
Response.Write "<TR bgColor="&bg_1&" onmouseover=javascript:this.bgColor='"&bg_1_1&"' onmouseout=javascript:this.bgColor='"&bg_1&"'>"
Response.Write "<TD width="&w1&" align=center><a href="&weburl&"/go.htm?u="&rs("homepage")&" target=_blank><font color=#FF0000 >"&rs("name")&"</font></a></TD>"
Response.Write "<TD width="&w2&"><a href="&weburl&"/go.htm?u="&rs("homepage")&" target=_blank>"&rs("IP")&"</a></TD>"
%>
<TD width="<%=w3%>">
<font color=#FF0000><b>→本站全天固顶极力推荐←</b>
<%
Response.Write "</TD>"
if (rs("Service"))=0 then
Response.Write "<TD width="&w4&" align=center>"&rs("Addr")&""&split(ssign,",")(rs("Service"))&"</TD>"
else
if (rs("Service"))=1 then
Response.Write "<TD width="&w4&" align=center><font color=blue>"&rs("Addr")&""&split(ssign,",")(rs("Service"))&"</font></TD>"
else
Response.Write "<TD width="&w4&" align=center><font color=black>"&rs("Addr")&""&split(ssign,",")(rs("Service"))&"</font></TD>"
end if
end if
Response.Write "<TD>"&rs("xingzhi")&"-<img border='0' src='Skin/Are/hot.gif' width='26' height='13'></TD>"
Response.Write "<TD width="&w5&">客服QQ："&rs("QQ")&"</TD>"
Response.Write "<TD align=""center"" width="&w6&"><a href="&weburl&"/go.htm?u="&rs("homepage")&" target=_blank><font color=#FF0000>点击进入<img border='0' src='Skin/Div_YaYiKo/New.gif'></font></a></TD>"
Response.Write "</TR>"
end if
rs.movenext
wend
rs.close
end if
end sub

---

…|▌'寔堅蔃の/「≯還寔╪.逞蔃﹖

Answer 1

错了 是这段代码   如何在服务器名称前面新加一个 表单？  竖起的表单。。并且在客服QQ前面 加一个 图片。。如何加？
不知道咋写。。。 在  客服QQ 前面写上<img>http://www.xxx.com/1.jpg</img> 没效果 怎么回事？
response.write "<TD width="&w5&" background=Skin/YaYiKo_Cms/Title_bg.gif><font color='#a84200'><b>客服QQ</b></font></TD>"

<!--#include file="inc/config.asp"-->
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/code.asp"-->
<!--#include file="inc/new.asp"-->
<!--#include file="inc/SqlIn.Asp"-->
<link rel='stylesheet' href='Skin/Css/style.css' type='text/css'>
<%
start="小偷"
if not isempty(request("page")) then
 currentPage=cint(request("page"))
else
 currentPage=1
end if
menu=htmlencode(request("menu"))
if menu="" or (not isnumeric(menu)) or isnull(menu) then
 menu="all"
end if
set rs = server.createobject("adodb.recordset")
dim w1,w2,w3,w4,w5,w6
w1=""&sfdata_1&""
w2=""&sfdata_2&""
w3=""&sfdata_3&""
w4=""&sfdata_4&""
w5=""&sfdata_5&""
w6=""&sfdata_6&""
function checkday(toptime,topday)
 if not isnull(toptime) then
 if cdate(toptime)+topday>=date then
   checkday=true
 else
   checkday=false
 end if
 else
   checkday=false
 end if
end function
call head()
%>
<table width="950"  border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><%
response.write "<TABLE cellSpacing=1 cellPadding=4 width=961 align=center border=0 bgcolor=#EE8215>"
response.write "<TBODY>"
response.write "<tr align='center'>"
response.write "<TD height=28 width="&w1&" background=Skin/YaYiKo_Cms/Title_bg.gif><font color='#a84200'><b>服务器名称</b></font></TD>"
response.write "<TD width="&w2&" background=Skin/YaYiKo_Cms/Title_bg.gif><font color='#a84200'><b>服务器IP</b></font></TD>"
response.write "<TD width="&w3&" background=Skin/YaYiKo_Cms/Title_bg.gif><font color='#a84200'><b>开机时间[月/日/时间]</b></font></TD>"
response.write "<TD width="&w4&" background=Skin/YaYiKo_Cms/Title_bg.gif><font color='#a84200'><b>线路类别</b></font></TD>"
response.write "<TD background=Skin/YaYiKo_Cms/Title_bg.gif><b><font color='#a84200'>版本介绍</font></b></TD>"
response.write "<TD width="&w5&" background=Skin/YaYiKo_Cms/Title_bg.gif><font color='#a84200'><b>客服QQ</b></font></TD>"
response.write "<TD width="&w6&" background=Skin/YaYiKo_Cms/Title_bg.gif><font color='#a84200'><b>详细介绍</b></font></TD>"
call SetRed_ads()
if hour(now)>hottime_1 then
call Overnight_a()
end if
if hour(now)<hottime_2 then
call Overnight_b()
end if
if minute(now)<30 then
call Today_00()
end if
if minute(now)>=30 then
call Today_30()
call Today_30_1()
end if
call Today_00_30_1()
if minute(now)<30 then
call Today_30_2()
end if
call Today_00_30_2()
if hour(now)<=hottime_1 then
call Before()
end if
if SFstatus=1 then
end if
%></td>
</tr>
</table>
<table width="950" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><%
call days_1()
call night_1()
call days_2()
call night_2()
if SFstatus=1 then
end if
%></td>
</tr>
</table>
<table width="950" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><%
call yesterday()
if SFstatus=1 then
end if
%></td>
</tr>
</table>

---

…|▌'寔堅蔃の/「≯還寔╪.逞蔃﹖

Answer 2

加图片方法：
<img src='http://www.xxx.com/1.jpg' />

如果是加在背景中，注意路径即可

---

孟宪会

Answer 3

竖起的表单？不明白啥意思？
<form></form>叫表单

---

孟宪会

Answer 4

按照你第一个帖子写的, 应该是在  客服QQ 前面这样写

<img src='http://www.xxx.com/1.jpg' >

---

One, Piece ..