ASP编程：中文假造域名完成(2) (情况：中文NT)

只看该作者 · 发表于 2015-1-16 23:45:33

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有帐号？立即注册

x

优点：简单易学、开发速度快、有很多年“历史”，能找到非常多别人做好的程序来用、配合activeX功能强大，很多php做不到的asp+activeX能做到，例如银行安全控件中文中文假造域名完成(2)(情况：中文NT)

关头词：ASP

MODIFY。ASP
*******************************
<%@LANGUAGE="VBSCRIPT"%>


<html>
<head>
<title>domainforword</title>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<styletype="text/CSS">

</style></head>

<bodytopmargin="10"leftmargin="0">
<divalign="center">

<%setrs=server.createobject("adodb.recordset")
sql="select*frominfowhereuser="&request("domain2")&"andpassword="&request("pass2")&""
rs.opensql,conn,1,1
ifrs.bofandrs.eofthen
response.write" <fontcolor=black>此域名（http://msstudio.net/"&request("domain2")&"）不存在或暗码毛病！ "
rs.close
else
ifrequest("newpass2")=request("newpassagain2")then
ifrequest("newpass2")=""andrequest("email2")=""then
conn.execute("updateinfosettarget="&request("target2")&"whereuser="&request("domain2")&"")
endif
ifrequest("newpass2")=""andrequest("email2")""then
conn.execute("updateinfosettarget="&request("target2")&",email="&request("email2")&"whereuser="&request("domain2")&"")
endif
ifrequest("newpass2")""andrequest("email2")""then
conn.execute("updateinfosettarget="&request("target2")&",email="&request("email2")&",password="&request("newpass2")&"whereuser="&request("domain2")&"")
endif
ifrequest("newpass2")""andrequest("email2")=""then
conn.execute("updateinfosettarget="&request("target2")&",password="&request("newpass2")&"whereuser="&request("domain2")&"")
endif

foldername="d:domain"&request("domain2")
Setfs=CreateObject("Scripting.FileSystemObject")
fs.CreateFolder(foldername)
setfs=nothing

m_mailinfo="<html><head>"+chr(13)+CHR(10)
m_mailinfo=m_mailinfo+"<title>domainforword</title>"+chr(13)+CHR(10)
m_mailinfo=m_mailinfo+"<metahttp-equiv=""Content-Type""content=""text/html;charset=gb2312"">"+chr(13)+CHR(10)
m_mailinfo=m_mailinfo+"<metahttp-equiv=""refresh""content=""0;URL=http://"+request("target2")+""">"+chr(13)+CHR(10)
m_mailinfo=m_mailinfo+"<scriptlanguage=""JavaScript""src=""../mss.js""></script></head>"+chr(13)+CHR(10)
m_mailinfo=m_mailinfo+"<bodybgcolor=""#FFFFFF"">loading...</body></html>"

whichfile="d:domain"&request("domain2")&"default.htm"
Setfs=CreateObject("Scripting.FileSystemObject")
Setthisfile=fs.createTextFile(whichfile,True)
thisfile.Writem_mailinfo
thisfile.Close

response.write" <fontcolor=black>祝贺！域名（<ahref=""http://msstudio.net/"&request("domain2")&""">http://msstudio.net/"&request("domain2")&"</a>）修正乐成！ "

else
response.write" <fontcolor=black>暗码毛病！ "
endif
endif
%>
</div>
</body>
</html>

ADD。ASP
*****************************************************

<%@LANGUAGE="VBSCRIPT"%>


<html>
<head>
<title>domainforword</title>
<metahttp-equiv楼上说交互性不好，太牵强了吧。在微软提供的一套框架中，利用asp做网站，开发效率高，使用人数少，减少不必要的开销。交互性是互动方式，是有开发人员决定的。

只看该作者 · 发表于 2015-1-20 11:42:10

ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。　　因为ASP脚本语言非常简单，因此其代码也简单易懂，结合HTML代码，可快速地完成网站的应用程序。

只看该作者 · 发表于 2015-1-25 07:39:45

运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改，找出你觉得可以提高性能的地方，加上自己的设计，那就更上一个层次了，也就会真正地感到有所收获。

只看该作者 · 发表于 2015-1-26 15:45:27

ASP主要是用好六个对象，其实最主要的是用好其中两个：response和request，就可以随心所欲地控制网页变换和响应用户动作了。

只看该作者 · 发表于 2015-2-4 15:47:13

封装性使得代码逻辑清晰，易于管理，并且应用到ASP.Net上就可以使业务逻辑和Html页面分离，这样无论页面原型如何改变，业务逻辑代码都不必做任何改动；继承性和多态性使得代码的可重用性大大提高。

只看该作者 · 发表于 2015-2-10 03:20:36

完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。

只看该作者 · 发表于 2015-2-28 18:10:09

作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。

只看该作者 · 发表于 2015-3-10 03:33:37

运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改，找出你觉得可以提高性能的地方，加上自己的设计，那就更上一个层次了，也就会真正地感到有所收获。

只看该作者 · 发表于 2015-3-17 04:11:00

用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。

只看该作者 · 发表于 2015-3-23 18:45:23

虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家，只是从一个例子告诉你怎么用。不会深入讨论，更不会将没有出现在例子里的方法都一一列举出来。

		自动登录	找回密码
密码			立即注册

[学习教程] ASP编程：中文假造域名完成(2) (情况：中文NT)

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子