<!--#include file="../Include/Const.Asp" -->
<!--#include file="../Include/Bk_safe.Asp" -->
<!--#include file="../Include/ConnDatabase.asp" -->
<%
'*********************************************
'软件名称：博科企业网站内容管理系统（BOKECMS）
'软件开发：博科网络科技工作室
'网    址：http://www.bokew.net
'服务  QQ：530051328
'服务邮箱：bbfhq@163.com
'微信公众号：bokewlkj
'*********************************************
%>
<%
    dim rs,sql,regid
	set rs=server.CreateObject("adodb.recordset")
	regid=request.Form("regid")
	sql="select top 1 id from BokeCMS_Members where MemName='"&regid&"'"
	rs.open sql,conn,1,1
	if rs.eof and rs.bof then
		response.Write 1
	else
		response.Write 0
	end if
	rs.close
	set rs=nothing
  %>
