ASP教程之ASP操纵Access数据库的程序。（转）

只看该作者 · 发表于 2015-1-16 22:45:13

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

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

x

因为ASP脚本语言非常简单，因此其代码也简单易懂，结合HTML代码，可快速地完成网站的应用程序。还无法完全实现一些企业级的功能：完全的集群、负载均横。access|程序|数据|数据库<%
---defineDSNnamesinarray
---enteroneormoreDSNnameinthedatabase_listarray
database_list=Array("Test","test1")
---enabledeletingtable?--Carefull!!
strEnableDeleteTable=False
----enddeclaration

----donotchangecodebelowthisline---------------------------------------------
field_value=Array("Integer","Double","char(255)","Memo","Date","Currency","YesNo")
field_display=Array("Integer","Number","Text","Memo","Date/Time","Currency","Yes/No")

dsn_name=Request("DatabaseName")
IfNotdsn_name=""Then
Setcon=Server.CreateObject("ADODB.Connection")
Con.Provider="sqloledb"
ifdsn_name="Test"then
ConStr="DataSource=127.0.0.1;InitialCatalog=test;UserID=test;Password=1111"
else
ConStr="DataSource=127.0.0.1;InitialCatalog=test1;UserID=test1;Password=1111"
endif
con.Openconstr
EndIf
table_name=Request("TableName")

IfRequest("AddNewTable")""Then
IfRequest("NewTableName")""Then
SQL="CREATETABLE"&Request("NewTableName")&"(fldAutoCounter)"
con.Execute(SQL)
EndIf
EndIf
IfRequest("AddNewField")""Then
Ifrequest("NewFieldName")""Then
SQL="ALTERTABLE"&table_name&"ADD"&request("NewFieldName")&""&request("NewFieldType")&"NULL"
con.Execute(SQL)
EndIf
EndIf
IfRequest("DeleteTable")""Then
SQL="DROPTABLE"&Request("TableName")
Con.Execute(SQL)
EndIf
IfRequest("DeleteColumn")""Then
ForEachitemInRequest("DeleteCol")
SQL="ALTERTABLE"&Request("TableName")&"DROP"&item
con.Execute(SQL)
Next
EndIf
-----filename--------------------------------------------------------
file=Request.ServerVariables("SCRIPT_NAME")
file=strReverse(file)
pos=Instr(file,"/")
file=Left(file,pos-1)
file=strReverse(file)
%>

<%
response.write"<!DOCTYPEHTMLPUBLIC""-//W3C//DTDHTML3.2Final//EN"">"
response.write"<HTML><HEAD><TITLE>DatabaseControl</TITLE></HEAD>"
response.write"<BODYbgcolor=""#FFFFFF""> <center>"

------------------------------------------------------------
response.write"<formaction="""&file&"""method=post>"
response.write"<fontface=verdanasize=3color=""#008080"">TotalDatabaseControl "
response.write"<fontface=Verdana,Arialsize=2>DatabaseName:"
response.write"<selectname=""databasename"">"
Fori=0touBound(database_list)
Ifdatabase_list(i)=Request("databasename")Then
response.write"<optionvalue="""&database_list(i)&"""selected>"&database_list(i)
Else
response.write"<optionvalue="""&database_list(i)&""">"&database_list(i)
EndIf
Next
response.write"</select>"
response.write"<inputtype=submitname=GoData楼上说交互性不好，太牵强了吧。在微软提供的一套框架中，利用asp做网站，开发效率高，使用人数少，减少不必要的开销。交互性是互动方式，是有开发人员决定的。

只看该作者 · 发表于 2015-1-18 17:56:11

如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。

只看该作者 · 发表于 2015-1-22 19:34:13

哪些内置对象是可以跳过的，或者哪些属性和方法是用不到的?

只看该作者 · 发表于 2015-1-31 09:35:14

哪些内置对象是可以跳过的，或者哪些属性和方法是用不到的?

只看该作者 · 发表于 2015-2-18 07:01:55

Application:这个存储服务端的数据，如果不清除，会直到web应用程序结束才清除(例如重启站点)

只看该作者 · 发表于 2015-3-6 01:27:31

尽管MS自己讲C#内核中更多的象VC，但实际上我还是认为它和Java更象一些吧。首先它是面向对象的编程语言，而不是一种脚本，所以它具有面向对象编程语言的一切特性，比如封装性、继承性、多态性等等，这就解决了刚才谈到的ASP的那些弱点。

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

从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了

只看该作者 · 发表于 2015-3-20 01:26:09

跟学别的语言一样，先掌握变量，流程控制语句(就是ifwhileselect)等，函数/过程，数组

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

[学习教程] ASP教程之ASP操纵Access数据库的程序。（转）

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

相关帖子