中文虚拟域名实现(2) (环境:中文NT)

雾幕里

雾幕里

2016-01-29 17:18

中文虚拟域名实现(2) (环境:中文NT),中文虚拟域名实现(2) (环境:中文NT)
  MODIFY。ASP
*******************************
<%@ 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"
展开更多 50%)
分享

猜你喜欢

中文虚拟域名实现(2) (环境:中文NT)

ASP
中文虚拟域名实现(2) (环境:中文NT)

中文虚拟域名实现(3) (环境:中文NT)

ASP
中文虚拟域名实现(3) (环境:中文NT)

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

中文虚拟域名实现(1) (环境:中文NT)

ASP
中文虚拟域名实现(1) (环境:中文NT)

NT 下虚拟域名的实现

ASP
NT 下虚拟域名的实现

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

用localeCompare实现中文排序

Web开发
用localeCompare实现中文排序

玩转虚拟域名◎+

PHP
玩转虚拟域名◎+

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

处理数码后期照片时需注意周围光源

处理数码后期照片时需注意周围光源

shift键十大密招全面揭密大公开

shift键十大密招全面揭密大公开
下拉加载更多内容 ↓