qqcf_qq.asp

软件下载平台 软件下载平台

<%
' 乘风电影V3.5 Mssql版
' 制　作：乘　风
' 开发网站：乘风原创程序
' 网站网址：http://www.qqcf.com
' 程序演示：http://www.qqcf.com/?action=try
' 最新版本下载：http://www.qqcf.com/?action=down
' 程序安装演示:http://www.qqcf.com/?Action=setup&Setup=cffilmforsql
' 使用帮助：http://www.qqcf.com/?Action=help&Help=cffilmforsql

' 功　能：
' 1.系统做免费或收费的电影网站都可以，支持免费，点数，包月等方式观看和下载电影
' 2.支持全站生成htm静态页面，生成速度极快，全自动生成
' 3.支持防盗链，可完全整合Helix和Servu服务器，完善的防盗链机制
' 4.在后台可以自由管理网站上的广告
' 5.支持网站上的注册用户在线支付购买电影点数，也可升级包月等方式
' 6.可以完全整合原有网站上的注册用户使用，无需在电影系统重新注册直接登陆即可
%>

<!--#Include File="Conn.asp"-->
<!--#include File="QQCF_MyFunction.asp"-->
<%If RsSet("QQ_State")=-1 Then%>
<%
Tmp=HttpPath(2)
%>
<%If ChkStr(Request("Action"),1)="" Then%>
var online= new Array();
<%
QQCode_2=RsSet("QQ_Code")&","
QQCode=Replace(QQCode_2,",",":")
QQCode_2=Left(QQCode_2,Len(QQCode_2)-1)
%>
document.write("<script src='http://webpresence.qq.com/getonline?Type=1&<%=QQCode%>'></script>");
document.write("<script src='<%=Tmp%>QQCF_qq.asp?Action=getcode&QQ=<%=QQCode_2%>'></script>");
<%End If%>

<%If Request("Action")="getcode" Then%>
if (!document.layers)
document.write("<div id='divStayTopLeft' style='position:absolute'>");
document.write("<LAYER left='624' top='2215' id=divStayTopLeft>");
document.write("<TABLE cellSpacing=0 cellPadding=0 width=110 border=0>");
document.write("  <TBODY>");
document.write("    <TR> ");
document.write("      <TD width=110><IMG src='<%=Tmp%>QQCF_Pic/kefu_up.jpg' border=0></TD>");
document.write("    </TR>");
document.write("    <TR>");
document.write("     <TD vAlign=center background='<%=Tmp%>QQCF_Pic/kefu_middle.jpg'>");


<%
adm_qq=ChkStr(Request("QQ"),1)
QQ=split(adm_qq,",")
for N=0 to UBound(QQ)
MyQQ=MyQQ+QQ(N)+":"
next
%>
<% for N=0 to UBound(QQ) %>
if (online[<%=n%>]==1){
document.write("&nbsp;<img src=<%=Tmp%>QQCF_Pic/QQOnline.gif border=0 align=middle><a href='http://wpa.qq.com/msgrd?V=1&Uin=<%=QQ(n)%>&Site=在线咨询&Menu=no' title='QQ在线上' target=blank ><font color=ff0000><span style='font-size:12px;'><%=QQ(n)%> 在线</span></font></a><br>");
}else{
document.write("&nbsp;<img src=<%=Tmp%>QQCF_Pic/QQOffline.gif border=0 align=middle><a href='http://wpa.qq.com/msgrd?V=1&Uin=<%=QQ(n)%>&Site=在线咨询&Menu=no' title='QQ不在线' target=blank ><font color=000000><span style='font-size:12px;'><%=QQ(n)%> 留言</span></font></a><br>");
}
<%next%>
document.write("</TD>");
document.write("    </TR>");
document.write("    <TR> ");
document.write("      <TD width=110><IMG src='<%=Tmp%>QQCF_Pic/kefu_down.jpg' border=0></TD>");
document.write("    </TR>");
document.write("  </TBODY>");
document.write("</TABLE>");
document.write("</LAYER>");


var verticalpos="frombottom"
if (!document.layers)
document.write('</div>')
function JSFX_FloatTopDiv()
{
	var startX =screen.width-150,
	startY = 280;
	var ns = (navigator.appName.indexOf("Netscape") != -1);
	var d = document;
	function ml(id)
	{
		var el=d.getElementById?d.getElementById(id):d.all?d.all[id]:d.layers[id];
		if(d.layers)el.style=el;
		el.sP=function(x,y){this.style.left=x;this.style.top=y;};
		el.x = startX;
		if (verticalpos=="fromtop")
		el.y = startY;
		else{
		el.y = ns ? pageYOffset + innerHeight : document.body.scrollTop + document.body.clientHeight;
		el.y -= startY;
		}
		return el;
	}
	window.stayTopLeft=function()
	{
		if (verticalpos=="fromtop"){
		var pY = ns ? pageYOffset : document.body.scrollTop;
		ftlObj.y += (pY + startY - ftlObj.y)/8;
		}
		else{
		var pY = ns ? pageYOffset + innerHeight : document.body.scrollTop + document.body.clientHeight;
		ftlObj.y += (pY - startY - ftlObj.y)/8;
		}
		ftlObj.sP(ftlObj.x, ftlObj.y);
		setTimeout("stayTopLeft()", 10);
	}
	ftlObj = ml("divStayTopLeft");
	stayTopLeft();
}
JSFX_FloatTopDiv();
<%End If%>
<%End If%>

<%connclose()%>