ASP教程之ASP中Split 函数的一例
写软件都是想的时间比写的时间要长的.如果反过来了就得看看是什么原因了.另外大家可以回去问问公司里的小MM.(一般企业里,跟你们交付软件接触得最多的是她们)函数 本例是一个数据库查询的例子，经由过程Split函数对查询字段举行了切割。用于想天真把持查询或开辟更深层使用的一个例子。<%
DimConn
DimRs
Dimj
Dimi
SetConn=Server.CreateObject("adodb.connection")
Conn.Open"driver={MicrosoftAccessDriver(*.mdb)};dbq="&Server.MapPath("mywebdatabaseGuestBook.mdb")
SetRs=Server.CreateObject("Adodb.RecordSet")
StrSql="Select*FromGuestBook"同等于下句。
StrSql=SplitText("TitleContent","","Select","FromGuestBook",",")
Rs.OpenStrSql,Conn,1,3
CallRsFieldShow("TitleContent","","题目:内容:","<br/><br/>")
j=Rs.Fields.count
Fori=0to(j-1)
Response.Write("第"&i+1&"个字段名："&Rs.Fields(i).Name&"<br><br>")
Next
%>
<%
ASP中把要查询的字段(Content)以字符串情势传送，附有前缀(PreText)、后缀(LastText)。
请求前后缀发生数组后，与查询字段的数量不异。
SubRsFieldShow(ByvalContent,ByvalSplitMark,ByvalPreText,ByvalLastText)
OnErrorResumeNext
EveryString=Split(Content,SplitMark)取得字符串数组，并赋值。
EveryPreText=Split(PreText,SplitMark)
EveryLastText=Split(LastText,SplitMark)
Fori=LBound(EveryString)toUBound(EveryString)
Response.WriteEveryPreText(i)&Rs(EveryString(i))&EveryLastText(i)输入了局
Next
EndSub
依照指定的格局输入字符串。
FunctionSplitText(ByvalContent,ByvalSplitMark,ByvalPreText,ByvalLastText,ByvalSplitChar)
OnErrorResumeNext
DimStrQ
StrQ=Split(Content,SplitMark)取得字符串数组，并赋值。
Fori=LBound(StrQ)toUBound(StrQ)使用函数获得数组下限和上限。
SplitText=SplitText&StrQ(i)&SplitChar举行组合
Next
SplitText=Left(SplitText,Len(SplitText)-1)往失落最初一个标记。
SplitText=PreText&SplitText&LastText加上前后缀并前往。
EndFunction
%>
你能够依据实践情形设置数据库路径、字段查询等。
输入了局：
题目:ASP中Split函数的一例
内容:www.webjx.com愈来愈多的内容了！
Windows本身的所有问题都会一成不变的也累加到了它的身上。安全性、稳定性、跨平台性都会因为与NT的捆绑而显现出来； Response:从字面上讲是“响应”，因此这个是服务端向客户端发送东西的，例如Response.Write 你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。 我们必须明确一个大方向，不要只是停留在因为学而去学,我们应有方向应有目标. 封装性使得代码逻辑清晰，易于管理，并且应用到ASP.Net上就可以使业务逻辑和Html页面分离，这样无论页面原型如何改变，业务逻辑代码都不必做任何改动；继承性和多态性使得代码的可重用性大大提高。 Response:从字面上讲是“响应”，因此这个是服务端向客户端发送东西的，例如Response.Write ASP的语言不仅仅只是命令格式差不多，而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的，但他就是完全继承了VB所有的功能。 Session:这个存储跟客户端会话过程的数据，默认20分钟失效 它可通过内置的组件实现更强大的功能，如使用A-DO可以轻松地访问数据库。
页:
[1]