|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
asp是基于web的一种编程技术,可以说是cgi的一种。它可以完成以往cgi程序的所有功能,如计数器、留言簿、公告板、聊天室等等。数据|数据库|随机<%
"一个从数据库中随机读取记录的例子
SetRs1=server.CreateObject("adodb.recordset")
SetRs=server.CreateObject("ADODB.RECORDSET")
SQL="SelectidfromArticleorderbyiddesc"
rs.Opensql,dataconn,3,3
Ifnotrs.EOFthen
total=rs("id")"取最年夜的ID
rs.Close
Randomize
R=Int((total-1+1)*Rnd+1)
SQL="Selectid,contentfromArticlewhereid="&R
rs.Opensql,dataconn,3,3
ifnotrs.EOFthen
content=RS("content")
content=replace(content,chr(10),"<br>")
content=replace(content,chr(13),"<br>")
content=replace(content,"<br><br>","<br>")
Response.Writecontent
else
sql1="selectcontentfromArticle"
rs1.Opensql1,dataconn,3,3
ifnoteofthen
"取第一条记录作为默许的显现记录
content=RS1("content")
content=replace(content,chr(10),"<br>")
content=replace(content,chr(13),"<br>")
content=replace(content,"<br><br>","<br>")
Response.Writecontent
else
"数据库为空
Response.Write"不存在"
endif
rs1.Close
endif
Rs.Close
endif
setRs=nothing
%></p>源代码保护方面其实现在考虑得没那么多了..NET也可以反编译.ASP写得复杂的话别人能看得懂的话.他也有能力自己写了.这方面担心的倒不太多.纵观现在网上可以下载的那些所谓BBS还有什么网站等等的源代码 |
|