📄 go.asp

📁 不错的ASP整站源代码。在IIS环境下运行都没有问题

💻 ASP

字号:

<!--#include file="articleconn.asp"-->
<html>
<%
   dim sql
   dim rs
   dim listname
   dim typename
   typename="口水吧"
   set rs=server.createobject("adodb.recordset")
   sql="select * from learning where articleid="&request("id")
   rs.open sql,conn,1,1
   picture=rs("images1")
   %>
<head>
<title><%=rs("title")%></title>
<link rel="stylesheet" type="text/css" href="css/style.css">
</head>
<body bgcolor="#FFFFFF"	><div align="center">
<center>
    <!--#include file="guang.asp"--> <br>
    <p align="center"><br>
      <%
if not isnull(picture) and picture<> "" then
	if right(   trim(picture),3  )="swf" then%>
	<OBJECT	classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
	codebase="http://active.macromedia.com/flash2/cabs/swflash.cab#version=4,0,0,0"
	ID=Movie1 WIDTH=400 HEIGHT=300	vspace="0" hspace="0" border="0" align="middle">
	<PARAM	NAME=movie VALUE=<%=picture%>>
	<PARAM	NAME=quality VALUE=high>
	<PARAM	NAME=bgcolor VALUE=#FFFFFF>
	<embed	src=<%=picture%> quality="high"	bgcolor="#FFFFFF" TYPE="application/x-shockwave-flash">
	</OBJECT>
	<%else
	response.write "<img src=" + picture + " border=0>"
	end if
end if
%> <br>
    </p>
    <p align="left"> <font face="Webdings" size="4" color="#FF0000">q</font> <a	href="review.asp?ID=<%=rs("articleid")%>" >文
      章 点 评</a> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<font color="#FF0000"><%=rs("reviewcount")%>
      篇</font><br>
      <br>
    </p>
  </center></div>
<p align="center"><a href="javascript:self.close()">『关闭窗口』</a><b></b></p>
 </body> </html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -