
<%dbs="../"%>
<!--#include file="../inc/config.asp"-->
<!--#include file="uccook.asp"-->
<!--#include file="uc.asp"-->
<%
set rs=Server.CreateObject("Adodb.Recordset")
	sql="select * from H_Domain where H_UI=1 and  UID="&UID&""
	rs.open sql,conn,1,1
	if rs.eof then
	response.Write "<script >alert('提示：\n\n 我们检测到您没有开通博客功能了\n\n我们将帮助您返回开通页...');location.href='Home_temp_add.asp';</script>"
	response.End()	
	end if
'开始调用数据并开始上传
Ubloger=Replace(Replace(Left(request.Form("Ubloger"),600),"<","["),">","]")
Ublogkey=Replace(Replace(Left(request.Form("Ublogkey"),5),"<","["),">","]")
'判断日期格式
if Ublogkey="" then
    response.write"<script >alert('提示：\n\n对不起，权限没有填写！');history.back(-1);</script>"
response.end
end if

''开始写入数据
set rs=Server.CreateObject("Adodb.Recordset")
	sql="select * from H_user where ID="&UID&""
	rs.open sql,conn,1,3
	rs("Ubloger")=Ubloger
	rs("Ublogkey")=Ublogkey
	rs.update
	rs.close
	set rs=nothing	
	response.Write "<script >alert('提示：\n\n修改成功,立即返回...');location.href='home_Edit.asp';</script>"
	response.End()	
%>

