⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 gqinfo.asp

📁 欢迎使用酷航设计系统
💻 ASP
字号:
<!--#include file="xbqq_head.asp" -->
<%
    sub navigation()
    response.write " &gt;&gt; "
    response.write "<a href='buy.asp'>供求信息</a>"
    response.write " &gt;&gt; "
    response.write "信息浏览"
    end sub
%>
<div align="center">
	<table border="0" cellpadding="0" cellspacing="0" width="778" height="50" bgcolor="#FFFFFF">
		<tr>
			<td width="218" valign="top">
<% 
 Xbqq_login
 xbqq_Marquee
 xbqq_Search

%>
</td>
			<td width="560" valign="top">
<div align="center">
				<table border="0" cellpadding="0" cellspacing="0" width="550" height="28" id="table1" background="xbqq_img/kind1.gif">
					<tr>
						<td>&nbsp;<img border="0" src="xbqq_img/ico1.gif" width="11" height="9">
						<font color="#FFFFFF">供求信息浏览</font> </td>
					</tr>
				</table>
</div>
<div align="center">
	<table border="0" cellpadding="0" cellspacing="0" width="550" height="5">
		<tr>
			<td></td>
		</tr>
	</table>
</div>
<div align="center">
	<table border="0" cellpadding="0" cellspacing="0" width="550" height="160" style="border: 1px solid #FF7500">
		<tr>
			<td bgcolor="#FFFFFF" width="100%">   
<!--新闻文章开始-->
<TABLE cellSpacing=3 cellPadding=5 width="100%" border=0>
<%
    dim sql
    dim rs
    dim rstype
    dim typesql
    dim title
    ID=CheckStr(Request.QueryString("ID")) 
    If isInt(ID)=False OR Not IsNumeric(ID) Then
    Response.Redirect "buy.asp" 
    Response.End()
    End If
	set rs=server.createobject("adodb.recordset")
	sql="update xbqqgq set dj=dj+1 where ID="&ID&""
	rs.open sql,conn,1,3 
%> 
<%
    ID=CheckStr(Request.QueryString("ID")) 
    If isInt(ID)=False OR Not IsNumeric(ID) Then
    Response.Redirect "buy.asp" 
    Response.End()
    End If
    set rs=server.createobject("adodb.recordset")
    rs.Open "Select * From xbqqgq where id="&id, conn,3,3
    if rs.bof and rs.eof then
    response.Redirect("News.asp")
    end if
%>
<TR> 
<TD align="center"><strong><%=rs("title")%></strong></TD>
</TR>
          <TR>
          <TD align="center"><hr size="1" width="80%" height="1"><a href="http://<%=Gaobei_http%>" target=_blank><%=Gaobei_http%></a>&nbsp;&nbsp;<%=rs("time")%></TD>
			</TR>
<TR> 
<TD height=34 style="line-height: <%=Gaobei_line_H%>"><%=rs("Content")%></TD>
</TR>

</TABLE>
<table width="548" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFCC66">
<tr>
<td width="193" height="34">
&nbsp;联系人:<%=rs("lxr")%>
</td>
<td width="180" height="34" bgcolor="#FF7500">
联系电话:<%=rs("tel")%></td>
<td width="175" height="34" bgcolor="#FFCC66">
IP地址:<%=rs("ip")%></td>
</tr>
<tr>
<td width="193" height="34" bgcolor="#FF7500">
&nbsp;邮件:<%=rs("email")%>
</td>
<td width="180" height="34">
所属省份:<%=rs("where")%></td>
<td width="175" height="34" bgcolor="#FF7500">
有效期至:<%=DateTimeFormat(rs("dqtime"),3)%></td>
</tr>
</table>


<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="362" height="34"> </td>
<td width="186">【<a href='buy.asp'>返回</a>】 【<a href="javascript:window.scroll(0,-360)">顶部</a>】 
【<a href="javascript:self.close()">关闭</a>】</td>
</tr>
</table>
<!-- 新闻文章结束-->
</td>
		</tr>
	</table>
</div>
			</td>
		</tr>
	</table>
</div>
<!--#include file="xbqq_foot.asp" -->

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -