ASP教程之一个离线ADO数据办理模块的完成
因为现在数据库都使用标准的SQL语言对数据库进行管理，所以如果是标准SQL语言，两者基本上都可以通用的。SQLServer还有更多的扩展，可以用存储过程，数据库大小无极限限制。ado|数据OptionExplicitPublicpubcnAsNewADODB.Connection
Dimtemp_iAsInteger
毗连数据库
PublicSubGetConnect()
OnErrorGoToerrorhandler:
DimconstrAsString
IfNot(pubcn.State=0)Then
pubcn.Close
EndIf
pubcn.CursorLocation=adUseClient
pubcn.ConnectionTimeout=5
pubcn.Open"Provider=sqloledb;"&_
"NetworkLibrary=DBMSSOCN;"&_指明接纳IP+端口体例查找SqlServer
"DataSource=172.17.21.125,1433;"&_
"InitialCatalog=hpdata;"&_
"UserID=user;"&_
"Password=password;"&_
"Encrypt=yes"
pubcn.DefaultDatabase="hpdata"!!!!!!!!!!!!!!!!
ExitSub
errorhandler:
DimmsgAsInteger
msg=MsgBox("毗连时产生毛病:"&Err.Number&Err.Description&Err.Source&"请将此信息发至邮箱",vbOKOnly)
EndSub
复杂查询失掉数据集////////////////////////////////////////////////////////
PublicFunctionGetRS(sqlstrAsString)AsADODB.Recordset
OnErrorGoToerrorhandler
CallGetConnect
SetGetRS=NewADODB.Recordset
GetRS.Opensqlstr,pubcn,adOpenStatic,adLockOptimistic
SetGetRS.ActiveConnection=Nothing
pubcn.Close
ExitFunction
errorhandler:
DimiAsInteger
i=MsgBox(sqlstr&":::::::"&Err.Description&Err.HelpContext,vbOKCancel)
EndFunction
同步数据集
PublicSubUpdateRS(RsAsADODB.Recordset,OptionalRequerryFlagAsInteger)
CallGetConnect
WithRs
.ActiveConnection=pubcn
.Update
If(NotIsMissing(RequerryFlag))AndRequerryFlag=1Then改于2004年2月6日为修除汗青纪录本客户号查询的修正没法数据同步而设
.Requery
EndIf
.ActiveConnection=Nothing
EndWith
pubcn.Close
EndSub
实行带有参数工具的查询失掉数据集
PublicSubGetRSFromCmd(CmdAsADODB.Command,strAsString,RsAsADODB.Recordset)
OnErrorGoToerrorhandler
CallGetConnect
IfNot(Cmd.State=adStateClosed)Then
Cmd.Cancel
Cmd.ActiveConnection=Nothing
EndIf
WithCmd
.ActiveConnection=pubcn
.CommandTimeout=5
.CommandType=adCmdText
.CommandText=str
EndWith
IfNot(Rs.State=0)Then
Rs.Close
EndIf
Rs.OpenCmd,,adOpenStatic,adLockOptimistic
Rs.ActiveConnection=Nothing
WithCmd
.ActiveConnection=Nothing
EndWith
pubcn.Close
ExitSub
errorhandler:
temp_i=MsgBox(str&Err.Number&Err.Description&Err.Source,vbOKOnly)
EndSub实行无前往了局的sql语句
PublicSubCnExecute(ByValQstrAsString,ByRefRecordNumberAsLong,OptionalQRsAsADODB.Recordset)
&n
ASP.NET和ASP的比较,技术上比较已经没什么可说的了.新一代在大部分程度来说当然是比旧一代好了.关键看你对所做软件的理解了.因人而定.会写的话也可能比ASP.NET写得更有效率和更方便重用 先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习 ASP主要是用好六个对象，其实最主要的是用好其中两个：response和request，就可以随心所欲地控制网页变换和响应用户动作了。 ASP（ActiveServerPages）是Microsfot公司1996年11月推出的WEB应用程序开发技术，它既不是一种程序语言，也不是一种开发工具，而是一种技术框架，不须使用微软的产品就能编写它的代码，能产生和执行动态、交互式、高效率的站占服务器的应用程序。 尽管MS自己讲C#内核中更多的象VC，但实际上我还是认为它和Java更象一些吧。首先它是面向对象的编程语言，而不是一种脚本，所以它具有面向对象编程语言的一切特性，比如封装性、继承性、多态性等等，这就解决了刚才谈到的ASP的那些弱点。 从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。 运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中，便可快速完成网站的应用程序，无需编译，可在服务器端直接执行。容易编写，使用普通的文本编辑器编写，如记事本就可以完成。由脚本在服务器上而不是客户端运行，ASP所使用的脚本语言都在服务端上运行。 作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。 不能只是将它停留在纸上谈兵的程度上。
页:
[1]