none
ASP高手帮忙 RRS feed

  • 问题

  • 下面是一段代码  作用是 显示打的广告。。
    请问 如何在 客服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


    …|▌'寔堅蔃の/「≯還寔╪.逞蔃﹖
    2009年3月30日 4:20

答案

全部回复

  • 错了 是这段代码   如何在服务器名称前面新加一个 表单?  竖起的表单。。并且在客服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>

    …|▌'寔堅蔃の/「≯還寔╪.逞蔃﹖
    2009年3月30日 4:41
  • 加图片方法:
    <img src='http://www.xxx.com/1.jpg' />

    如果是加在背景中,注意路径即可
    孟宪会
    2009年3月30日 4:58
    版主
  • 竖起的表单?不明白啥意思?
    <form></form>叫表单
    孟宪会
    2009年3月30日 5:00
    版主
  • 按照你第一个帖子写的, 应该是在  客服QQ 前面这样写
    <img src='http://www.xxx.com/1.jpg' >

    One, Piece ..
    2009年3月31日 12:08