ASP教程之在ASP中使用ADO显现Excel文件内容的函数...

Access是一种桌面数据库，只适合数据量少的应用，在处理少量数据和单机访问的数据库时是很好的，效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限，如果数据达到100M左右，很容易造成服务器iis假死，或者消耗掉服务器的内存导致服务器崩溃。ado|excel|函数|显现FunctionSwitchExcelInfo(xlsFileName)
#################
PowerByTangn.COM
#################
DimxlsStr
Dimrs
Dimi,j,k
DimExcelConn
DimExcelFile
DimobjExcelApp
DimobjExcelBook
DimbgColor

xlsStr=""
ExeclFile=Server.MapPath(xlsFileName)

SetobjExcelApp=CreateObject("Excel.Application")
objExcelApp.Quit
SetobjExcelApp=CreateObject("Excel.Application")
objExcelApp.Quit
objExcelApp.DisplayAlerts=false不显现告诫
objExcelApp.Application.Visible=false不显现界面
objExcelApp.WorkBooks.Open(ExeclFile)
setobjExcelBook=objExcelApp.ActiveWorkBook
reDimarrSheets(objExcelBook.Sheets.Count)
Fori=1toobjExcelBook.Sheets.Count
arrSheets(i)=objExcelBook.Sheets(i).Name
Next
objExcelApp.Quit
SetobjExeclApp=nothing

SetExcelConn=Server.CreateObject("ADODB.Connection")
ExcelDriver="Driver={MicrosoftExcelDriver(*.xls)};DBQ="&ExeclFile
ExcelConn.OpenExcelDriver
Setrs=Server.CreateObject("Adodb.RecordSet")
Fori=1toUBound(arrSheets)
Sql="SELECT*FROM["&arrSheets(i)&"$]"
显现各事情表的称号
xlsStr=xlsStr&"<br>"&arrSheets(i)&"<br>"
xlsStr=xlsStr&"<tablecellpadding=1width=""100%""cellspacing=1border=1bordercolor=#000000style=border-collapse:collapse;border:2pxsolid#000000>"
rs.OpenSql,ExcelConn,1,1
k=1
WhileNotrs.eof
IfkMod20ThenbgColor="bgColor=#E0E0E0"ElsebgColor=""
xlsStr=xlsStr&"<tr"&bgColor&">"
xlsStr=xlsStr&"<td>"&rs(0)&"</td>"
Forj=0tors.Fields.Count-1
xlsStr=xlsStr&"<td>"&rs(j)&"</td>"
Next
xlsStr=xlsStr&"</tr>"
rs.movenext
k=k+1
Wend
xlsStr=xlsStr&"</table><br>"
rs.Close
Next
ExcelConn.Close
SetExcelConn=Nothing
SwitchExcelInfo=xlsStr
EndFunction
</p>只要你想学,就没什么优缺点,上面那位大哥已经把网上的评论说了,但我认为想学哪个都一样,不然它就不可能在当今时代数字艺术方面存活到今天

ASP的语言不仅仅只是命令格式差不多，而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的，但他就是完全继承了VB所有的功能。

Server:这个表示的服务器，操作服务器的一些东西使用这个，如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件

ASP的语言不仅仅只是命令格式差不多，而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的，但他就是完全继承了VB所有的功能。

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

我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。

他的语法和设计思路和VB完全相同，导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是，相当多的ASP教程混合了Javascript,VBscript等等脚本语言，搞的初学者。

没有坚实的理论做基础，那么我们连踏入社会第一步的资本都没有，特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP，从平时的学习过程中。

Server:这个表示的服务器，操作服务器的一些东西使用这个，如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件

我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。