ndex.asp 维六酷博客管理系统 1.1源码程序 - ASP源码程序

www.gusucode.com > 维六酷博客管理系统 1.1源码程序 > index.asp

    <!-- #include file="conn.asp" -->
<!--#include file="include.asp"-->
<%
Dim title,ok,keywords,info
Set rs=conn.Execute("Select Top 1 * From WebBasicInfo")
title=rs("W_WebSiteName")
keywords=rs("W_WebSiteKeyword")
info=rs("W_WebSiteIntr")
rs.close
Set rs=nothing
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE><%=siteName%></TITLE>
<META NAME="Author" CONTENT="">
<META NAME="Keywords" CONTENT="<%=siteKeywords%>">
<META NAME="Description" CONTENT="<%=siteContent%>">
</HEAD>
<BODY topmargin="0" leftmargin="0">
<center >
<IFRAME ID=IFrame1 FRAMEBORDER=0 SCROLLING="NO" style="border:0px #CCC solid;" width="100%" height="100%" SRC="default.asp"></IFRAME>

<div style="Z-INDEX:0; POSITION: absolute;left:695;top:574; width:300px;border:0px #CCC solid;BACKGROUND-COLOR:transparent;">
	<IFRAME ID=IFrame1 FRAMEBORDER=0 SCROLLING=NO allowTransparency="true"  width="305" height="35" SRC="bottom.asp"></IFRAME>
</div>

</center>
</BODY>
</HTML>