仓酷云

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

[学习教程] ASP编程:ASP做查询剖析器(Query Analyzer)(IV)

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

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

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

x
无法实现跨操作系统的应用。当然这也是微软的理由之一,只有这样才能发挥ASP最佳的能力。可是我却认为正是Windows限制了ASP,ASP的概念本就是为一个能让系统运行于一个大的多样化环境而设计的;查询剖析createTable.asp

<%@LANGUAGE=VBScript%>
<%
OptionExplicit
Response.Buffer=True
Response.ContentType="text/html;charset=iso-8859-1"

--------------------------------------------------------------
---Declarations
--------------------------------------------------------------

DimintNumColumns,strTableName,intCurrentColumn,intTableNum

DimstrTable,booltableinfo,strsqlserver,strLog_in,strUser_password

--------------------------------------------------------------
---Initialization
--------------------------------------------------------------

strTable=request("choosetable")
booltableinfo=request("booltableinfo")
strsqlserver=request("sqlserver")
strLog_in=request("log_in")
strUser_password=request("user_password")

intNumColumns=request("howMany")
strTableName=request("tableName")
intTableNum=1

--------------------------------------------------------------
---Functions
--------------------------------------------------------------


--------------------------------------------------------------
SubOutputTableHeader()

response.write("<trbgcolor=""#ebf498"">"&vbCrLf)
response.write("<td><b>ColumnName</b></td>"&vbCrLf)
response.write("<td><b>DataType</b></td>"&vbCrLf)
response.write("<td><b>Size</b></td>"&vbCrLf)
response.write("<td><b>Null?</b></td>"&vbCrLf)
response.write("<td><b>Unique?</b></td>"&vbCrLf)
response.write("<td><b>PrimaryKey</b></td>"&vbCrLf)
response.write("</tr>"&vbCrLf&vbCrLf)

EndSub

--------------------------------------------------------------

SubOutputFieldRow(strTableName,intFieldNum)

response.write("<tr>"&vbCrLf)
response.write("<td><inputtype=textname=colum"&intFieldNum&"></td>"&vbCrLf)
response.write("<td><selectsize=1name=dtype"&intFieldNum&">"&vbCrLf)
IfintFieldNum=1Then
response.write("<optionvalue=""intIDENTITY(1,1)"">Identity</option>"&vbCrLf)
EndIf
response.write("<optionvalue=varchar>varchar</option>"&vbCrLf)
response.write("<optionvalue=text>text</option>"&vbCrLf)
response.write("<optionvalue=datetime>datetime</option>"&vbCrLf)
response.write("<optionvalue=money>money</option>"&vbCrLf)
response.write("<optionvalue=smallint>smallint</option>"&vbCrLf)
response.write("<optionvalue=int>int</option>"&vbCrLf)
response.write("<optionvalue=real>real</option>"&vbCrLf)
response.write("<optionvalue=float>float</option>"&vbCrLf)
response.write("<optionvalue=bit>bit</option>"&vbCrLf)
response.write("<optionvalue=varbinary>varbinary</option>"&vbCrLf)
response.write("<optionvalue=image>image</option>"&vbCrLf)
response.write("</select></td>"&vbCrLf)
response.write("<td><inputtype=textsize=3name=size"&intFieldNum&"></td>"&vbCrLf)
response.write("<td><selectname=nullbox"&intFieldNum&">"&vbCrLf)
response.write("<optionvalue=""DISALLOWNULL"">NotNull</option>"&vbCrLf)
</p>ASP由于使用了COM组件所以它会变的十分强大,但是这样的强大由于WindowsNT系统最初的设计问题而会引发大量的安全问题。只要在这样的组件或是操作中一不注意,哪么外部攻击就可以取得相当高的权限而导致网站瘫痪或者数据丢失;
山那边是海 该用户已被删除
11#
发表于 2015-3-27 05:09:17 | 只看该作者
弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。
莫相离 该用户已被删除
10#
发表于 2015-3-27 05:09:16 | 只看该作者
它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。
活着的死人 该用户已被删除
9#
发表于 2015-3-27 05:09:14 | 只看该作者
另外因为asp需要使用组件,所以了解一点组件的知识(ADODB也是组件)
谁可相欹 该用户已被删除
8#
发表于 2015-3-19 02:24:23 | 只看该作者
以HTML语言整合(HTML负责界面上,ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。
愤怒的大鸟 该用户已被删除
7#
发表于 2015-3-11 16:55:48 | 只看该作者
如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:
若相依 该用户已被删除
6#
发表于 2015-3-4 04:47:23 | 只看该作者
下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助...
蒙在股里 该用户已被删除
5#
发表于 2015-2-14 05:15:44 | 只看该作者
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
若天明 该用户已被删除
地板
发表于 2015-2-5 23:26:37 | 只看该作者
交流是必要的,不管是生活还是学习我们都要试着去交流,通过交流我们可以学到很多我们自己本身所没有的知识,可以分享别人的经验甚至经历。
分手快乐 该用户已被删除
板凳
发表于 2015-1-29 06:40:32 来自手机 | 只看该作者
用户端的浏览器不需要提供任何别的支持,这样大提高了用户与服务器之间的交互的速度。
飘灵儿 该用户已被删除
沙发
发表于 2015-1-20 09:50:17 | 只看该作者
我们必须明确一个大方向,不要只是停留在因为学而去学,我们应有方向应有目标.
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-12-24 01:38

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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