<!--#include virtual="/inc-freehost-function/FreeHostFunction.asp"-->
<%
If session("DNSAUID")="" Then
	ec="授权非法，请您先登陆。"
	Response.Redirect "e.asp?e="&ec
end if
Function POSTHTTPS(tar,ref,body)
Dim returnstr
body=Cstr(body)
Set xml = Server.CreateObject("Msxml2.ServerXMLHTTP.3.0")
xml.setTimeouts FreeHost_t1, FreeHost_t2, FreeHost_t3, FreeHost_t4
xml.Open "POST", tar, False
xml.setRequestHeader "Content-Length",Len(body)
xml.setRequestHeader "CONTENT-TYPE","application/x-www-form-urlencoded"
xml.setRequestHeader "REFERER",ref
xml.setRequestHeader "COOKIE", left(session("dopost_cookie"),instr(1,session("dopost_cookie"),";")-1)
xml.setRequestHeader "COOKIE", left(session("dopost_cookie"),instr(1,session("dopost_cookie"),";")-1)
xml.send body
returnstr = bytes2BSTR(xml.responsebody)
	POSTHTTPS = returnstr
End Function

tar="http://mgt.dns.com.cn"&request.QueryString
retdns=POSTHTTPS(tar,tar,request.form)
retdns=replace(retdns,"/images/","http://mgt.dns.com.cn/images/")

%>
<%=retdns%>