ASP网站制作之旧事更新体系(1)

源代码保护方面其实现在考虑得没那么多了..NET也可以反编译.ASP写得复杂的话别人能看得懂的话.他也有能力自己写了.这方面担心的倒不太多.纵观现在网上可以下载的那些所谓BBS还有什么网站等等的源代码米仙贤人　　
功效：依据数据库中的内容主动更新旧事，
办法：从数据库News中主动读往旧事内容，数据库称号News.mdb

<!--#includefile="conn.asp"-->
1：以下是conn.asp中的内容，感化是翻开数据库。
<%
onerrorresumenext
Dimconn
DimRs
DimDBpath
setconn=server.createobject("Adodb.connection")
SetRs=Server.createObject("Adodb.RecordSet")
DBPath=server.mappath("News.mdb")
conn.Open"driver={MicrosoftAccessDriver(*.mdb)};DBQ="&DBPath
Conn.ConnectionString="DSN=AddNews;User=;PassWord="
Conn.Open"DSN=AddNews"
%>

2：依据旧事项目来写SQL语句，同时实行该SQL语句，在本例中统共是8个旧事项。
<%ForI=1to8Step1%>
<%
TypeIDStr=CStr(I)
SqlStr="SelectNews_ClassID,News_Class,News_Title,"_
&"News_HtmlPathFromNewsListWhereNews_ClassID="&TypeIDStr&""
SetDBRec=conn.Execute(SqlStr)
Response.WriteTypeIDStr
%>

3：入手下手逐句的读往旧事项目，入手下手显现旧事Title
DBRec.MoveFirst
WhileNotDBRec.Eof
titStr=DBRec.Fields("News_Title")
comStr="<tdwidth=100%valign=topalign=leftheight=100%bgcolor=#FFFFCC>"
Response.Write"<tr>"
Response.WriteComStr&titStr
Response.Write"</tr>"
DBRec.MoveNext
WEnd

4：本程序申明，如今News库中，存有旧事内容，假如要实行ADDIndex，倡议是先清空开数据库。本数据库仅供Index.asp程序利用。在本例中，统共有是显现两列。
</p>专业性的服务。有的ASP商提供垂直型的应用服务，针对某一特定行业提供应用服务。

交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。

Response:从字面上讲是“响应”，因此这个是服务端向客户端发送东西的，例如Response.Write

接下来就不能纸上谈兵了，最好的方法其实是实践。实践，只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好，因为你还没有熟练的能力去综合各种技术，这样只能使你自己越来越迷糊。

弱类型造成潜在的出错可能：尽管弱数据类型的编程语言使用起来回方便一些，但相对于它所造成的出错几率是远远得不偿失的。

交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。

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

我们必须明确一个大方向，不要只是停留在因为学而去学,我们应有方向应有目标.

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

不能只是将它停留在纸上谈兵的程度上。

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