📄 quan.asp

📁 WEB2.0圈子交友平台,以用户影音创意和分享为主导, 为用户提供:圈子,个人空间,博客,话题,相册,分类信息,短信,交友等免费服务,致力打造中国第一套 WEB2.0交友系统开源网站.

💻 ASP

字号:

<!--#include file="Include/Conn.asp" -->
<%id=request("id")
if id="" or IsNumeric(id)<>true then
response.write"请输入正确的写字楼ID号！"
response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select *  from "&WebSqlType&"_club where "&WebSqlType&"_id="&id&""
rs.open sql,conn,1,1
if not rs.eof then


    id=rs(""&WebSqlType&"_id")
    coname=rs(""&WebSqlType&"_title")
    co=trim(rs(""&WebSqlType&"_co"))
	'response.Write("<!DOCTYPE HTML PUBLIC '-//W3C//DTD HTML 4.01 Transitional//EN' 'http://www.w3.org/TR/html4/loose.dtd'>")
	response.write"<TITLE>"&coname&"</TITLE>"
    url=cityurl&"quan/"&co&"/index.asp?id="&id
	response.write"<frameset framespacing=0 cols=0,* rows=* border=0 frameborder=NO><frame src=about:blank marginwidth=0 marginheight=0 noresize><frame src="&url&"></frameset>"
 

else
    response.write"<script>alert('页面打开出错，下面是产生错误的可能原因：\n\n·该写字楼可能不存在');window.open('"&application("cityurl")&"','_parent');</script>"
    response.end
end if
rs.close%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -