ASP网页编程之使用OWC绘图的例子
源代码保护方面其实现在考虑得没那么多了..NET也可以反编译.ASP写得复杂的话别人能看得懂的话.他也有能力自己写了.这方面担心的倒不太多.纵观现在网上可以下载的那些所谓BBS还有什么网站等等的源代码<%OptionExplicit%><HTML>
<HEAD>
<TITLE>使用OWC绘图的例子</TITLE>
<!--#includevirtual="/include/adovbs.inc"-->
<%
FunctionExportChartToGIF(objCSpace,strAbsFilePath,strRelFilePath)
DimstrFileName
Randomize
strFileName=Timer&Rnd&".gif"
objCSpace.ExportPicturestrAbsFilePath&""&strFileName,"gif",600,350
ExportChartToGIF=strRelFilePath&"/"&strFileName
EndFunction
SubCleanUpGIF(GIFpath)
DimobjFS
DimobjFolder
Dimgif
setobjFS=Server.CreateObject("Scripting.FileSystemObject")
setobjFolder=objFS.GetFolder(GIFpath)
foreachgifinobjFolder.Files
ifinstr(gif.Name,".gif")>0andDateDiff("n",gif.DateLastModified,now)>10then
objFS.DeleteFileGIFpath&""&gif.Name,True
endif
next
setobjFolder=nothing
setobjFS=nothing
EndSub
%>
</HEAD>
<BODYBGCOLOR="#FFFFFF">
<%
dimobjChartSpace
dimobjChart
dimobjSeries
dimobjConn
dimobjRS
dimc
dimseries
dimstrChartAbsPath
dimstrChartRelPath
dimstrChartFile
strChartAbsPath=Server.MapPath("/mypath/temp")
strChartRelPath="temp"
setobjChartSpace=Server.CreateObject("OWC.Chart")
setobjChart=objChartSpace.Charts.Add()
setc=objChartSpace.Constants
objChart.Type=c.chChartTypeLineMarkers
objChart.HasLegend=True
setobjConn=Server.CreateObject("ADODB.Connection")
objConn.Open"provider=sqloledb;datasource=myserver;initialcatalog=testdb;userid=myuid;password=mypswd;"
setobjRS=Server.CreateObject("ADODB.Recordset")
setobjRS.ActiveConnection=objConn
objRS.CursorType=adOpenStatic
objRS.CursorLocation=adUseClient
objRS.Open"select*fromtestscoreorderbytest"
setobjChartSpace.DataSource=objRS
objChart.SetDatac.chDimSeriesNames,0,"student"
foreachobjSeriesinobjChart.SeriesCollection
objSeries.SetDatac.chDimCategories,0,"test"
objSeries.SetDatac.chDimValues,0,"score"
next
foreachaxisinobjChart.Axes
axis.HasTitle=True
ifaxis.Type=c.chCategoryAxisthen
axis.Title.Caption="Test"
else
axis.Title.Caption="Score"
endif
next
objChart.SeriesCollection(2).Interior.Color="red"
objChart.SeriesCollection(2).Line.Color="red"
strChartFile=ExportChartToGIF(objChartSpace,strChartAbsPath,strChartRelPath)
Response.Write"<IMGSRC="""&strChartFile&""">"&"<P>"
CleanUpGIFstrChartAbsPath
objRS.Close
setobjRS=nothing
setobjConn=nothing
setobjSeries=nothing
setobjChart=nothing
setobjChartSpace=nothing
%>
</BODY>
</HTML>
</p>因为现在数据库都使用标准的SQL语言对数据库进行管理,所以如果是标准SQL语言,两者基本上都可以通用的。SQLServer还有更多的扩展,可以用存储过程,数据库大小无极限限制。 学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点: 学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点: ASP.Net和ASP的最大区别在于编程思维的转换,而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程,而那些脚本语言属于弱类型、面向结构的编程语言,而非面向对象,这就明显产生以下几个问题: 以上是语言本身的弱点,在功能方面ASP同样存在问题,第一是功能太弱,一些底层操作只能通过组件来完成,在这点上是远远比不上PHP/JSP,其次就是缺乏完善的纠错/调试功能,这点上ASP/PHP/JSP差不多。 最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。 虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。 从事这个行业,那么你可以学ASP语言,简单快速上手,熟练dreamweav排版,写asp代码,熟练photoshop处理图片,打好基础就行了 Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名") 接下来就不能纸上谈兵了,最好的方法其实是实践。实践,只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好,因为你还没有熟练的能力去综合各种技术,这样只能使你自己越来越迷糊。
页:
[1]