网格计算

开发平台：

PHP

Include.asp：源码内容

							<!--#Include File="../Inc/Config.asp"--><%
'==========================================
'文 件 名：Include.asp
'文件用途：管理员控制
'版权所有：方卡在线
'==========================================
'验证管理员
Call FKDB.DB_Open()
If Request.Cookies("FkAdminName")<>"" And Request.Cookies("FkAdminPass")<>"" Then
	Sqlstr="Select * From [Fk_Admin] Where Fk_Admin_User=1 And Fk_Admin_LoginName='"&Request.Cookies("FkAdminName")&"' And Fk_Admin_LoginPass='"&Request.Cookies("FkAdminPass")&"'"
	Rs.Open Sqlstr,Conn,1,3
	If Not Rs.Eof Then
		Response.Cookies("FkAdminId")=Rs("Fk_Admin_Id")
		Response.Cookies("FkAdminLimitId")=Rs("Fk_Admin_Limit")
		If Rs("Fk_Admin_Limit")>0 Then
			Rs.Close
			Sqlstr="Select * From [Fk_Limit] Where Fk_Limit_Id=" & Request.Cookies("FkAdminLimitId")
			Rs.Open Sqlstr,Conn,1,3
			If Not Rs.Eof Then
				Response.Cookies("FkAdminLimit")=Rs("Fk_Limit_Content")
			Else
				Response.Cookies("FkAdminLimit")="No"
			End If
		End If
		Login=True
	End If
	Rs.Close
Else
	Response.Cookies("FkAdminLimitId")="100000"
End If
%>

						