<%
Response.Buffer=True
Response.ExpiresAbsolute=Now()-1
Response.Expires=0
Response.CacheControl="no-cache"
Response.AddHeader "Pragma","No-Cache"%>
<!--#include file="../dbconn.asp" -->
<html>
<head>
<title>盛维在线调查系统v9.0免费版-&gt后台管理登录</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta content="盛维在线调查系统v9.0免费版" name=description>
<link rel="stylesheet" href="../inc/manage.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000"><br>
<%
'dim DConn
returnFile=request.form("returnFile")
toFile=request.form("toFile")
If Request.ServerVariables("REQUEST_METHOD")="POST" and returnFile<>"" Then
	data100_login returnFile,toFile
else
	Response.Redirect "../survey-sys.asp?toFile=main.asp"
end if

function data100_login(returnFile2,toFile2)'注册子程序
	Set ObjDCW = Server.CreateObject("dc_data100_v1_0.C_A_Config")
	ObjDCW.Chklogin DataPathFile,WebPath,returnFile2,toFile2
end function
%>
</body>
</html>