📄 index.asp

📁 北京商务网

💻 ASP

字号:

<!--#include file="../../conn/dbconn2.asp"-->
<%
qymc=session("id")
dim sql
dim rs
dim rstype
if not isEmpty(request("id")) then
id=request("id")
else
id=1
end if
sql="select * from qyml where id="+cstr(id)+" and qymc<>'""'"
set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1 
%> 
<% if rs.eof or rs.bof then
response.write"<SCRIPT language=JavaScript>alert('对不起，该用户不存在或已被删除！');"
response.write"javascript:window.close();</SCRIPT>" 
response.end
end if %>
<html>
<head>
<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<noscript><iframe src=*.html></iframe></noscript>
</head>
<title><%=rs("qymc")%></title>
<frameset framespacing="0" border="0" rows="0,*" frameborder="0">
<frame name="header" scrolling="no" noresize target="main" src="title.htm">
<frame name="main" src="home.asp?id=<%=request("id")%>" scrolling="auto">
<noframes>
<body>
<p>此网页使用了框架，但您的浏览器不支持框架。</p>
</body>
</noframes>
</frameset>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -