仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 546|回复: 9
打印 上一主题 下一主题

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

[复制链接]
若天明 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:45:33 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

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

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

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

关头词:ASP

MODIFY。ASP
*******************************
<%@LANGUAGE="VBSCRIPT"%>
<!--#includefile="dbdb/connmm.inc"-->

<html>
<head>
<title>domainforword</title>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<styletype="text/CSS">
<!--
.MMS{font-size:11pt;text-decoration:none}
.MMS1{font-size:10pt;text-decoration:none}
-->
</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"<br><br><br><fontcolor=black>此域名(http://msstudio.net/"&request("domain2")&")不存在或暗码毛病!</font><br><br><br>"
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"<br><br><br><fontcolor=black>祝贺!域名(<ahref=""http://msstudio.net/"&request("domain2")&""">http://msstudio.net/"&request("domain2")&"</a>)修正乐成!</font><br><br><br>"




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

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

<%@LANGUAGE="VBSCRIPT"%>
<!--#includefile="dbdb/connmm.inc"-->

<html>
<head>
<title>domainforword</title>
<metahttp-equiv</p>楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用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,就可以随心所欲地控制网页变换和响应用户动作了。
莫相离 该用户已被删除
5#
发表于 2015-2-4 15:47:13 | 只看该作者
封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。
因胸联盟 该用户已被删除
6#
发表于 2015-2-10 03:20:36 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
第二个灵魂 该用户已被删除
7#
发表于 2015-2-28 18:10:09 | 只看该作者
作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。
海妖 该用户已被删除
8#
发表于 2015-3-10 03:33:37 | 只看该作者
运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改,找出你觉得可以提高性能的地方,加上自己的设计,那就更上一个层次了,也就会真正地感到有所收获。
小魔女 该用户已被删除
9#
发表于 2015-3-17 04:11:00 | 只看该作者
用户端的浏览器不需要提供任何别的支持,这样大提高了用户与服务器之间的交互的速度。
小妖女 该用户已被删除
10#
发表于 2015-3-23 18:45:23 | 只看该作者
虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-24 02:46

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表