中文虚拟域名实现(2) (环境:中文NT)
中文虚拟域名实现(2) (环境:中文NT),中文虚拟域名实现(2) (环境:中文NT)
*******************************
<%@ LANGUAGE="VBSCRIPT" %
<!--#include file="dbdb/connmm.inc"--
<html
<head
<titledomain forword</title
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"
<style type="text/css"
<!--
.MMS { font-size: 11pt; text-decoration: none}
.MMS1 { font-size: 10pt; text-decoration: none}
--
</style</head
<body topmargin="10" leftmargin="0"
<div align="center"
<% set rs=server.createobject("adodb.recordset")
sql="select * from info where user='"&request("domain2")&"' and password='"&request("pass2")&"'"
rs.open sql,conn,1,1
if rs.bof and rs.eof then
response.write "<br<br<br<font color=black此域名(http://msstudio.net/"&request("domain2")&")不存在或密码错误!</font<br<br<br"
rs.close
else
if request("newpass2")=request("newpassagain2") then
if request("newpass2")="" and request("email2")="" then
conn.execute("update info set target='"&request("target2")&"' where user ='"&request("domain2")&"'")
end if
if request("newpass2")="" and request("email2")<"" then
conn.execute("update info set target='"&request("target2")&"',email='"&request("email2")&"' where user ='"&request("domain2")&"'")
end if
if request("newpass2")<"" and request("email2")<"" then
conn.execute("update info set target='"&request("target2")&"',email='"&request("email2")&"',password='"&request("newpass2")&"' where user ='"&request("domain2")&"'")
end if
if request("newpass2")<"" and request("email2")="" then
conn.execute("update info set target='"&request("target2")&"',password='"&request("newpass2")&"' where user ='"&request("domain2")&"'")
end if
'foldername="d:domain" & request("domain2")
'Set fs = CreateObject("Scripting.FileSystemObject")
'fs.CreateFolder(foldername)
'set fs = nothing
m_mailinfo="<html<head"+chr(13)+CHR(10)
m_mailinfo=m_mailinfo+"<titledomain forword</title"+chr(13)+CHR(10)
m_mailinfo=m_mailinfo+"<meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312"""+chr(13)+CHR(10)
m_mailinfo=m_mailinfo+"<meta http-equiv=""refresh"" content=""0;URL=http://"+request("target2")+""""+chr(13)+CHR(10)
m_mailinfo=m_mailinfo+"<script language=""JavaScript"" src="http://img.jcwcn.com/attachment/portal"