
<%
'暂时未启用
response.End()

sub chktel()
	if request.Cookies("aynameid")="" then call PopErr2("请登录后再操作","/")
	sql="select aynameid,ayqq,aytel,ayshenfenzheng,aymail,aywebname from ayname where aynameid="&request.Cookies("aynameid")&"" 
	rs.open sql,conn,1,1
	if rs.bof and rs.eof then
	call PopErr2("请登录后再操作","/")
	else
		if rs("ayqq")="" or isnull(rs("ayqq"))=true then call PopErr2("请先完善帐号信息","buchong")
		if rs("aytel")="" or isnull(rs("aytel"))=true then call PopErr2("请先完善帐号信息","buchong")
		if trim(rs("aymail"))="" or isnull(trim(rs("aymail")))=true then call PopErr2("请先完善帐号信息","buchong")
	end if
	rs.close
end sub
%>