|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。还无法完全实现一些企业级的功能:完全的集群、负载均横。‘#######news_update.asp
<!--#includefile="news_session.asp"-->
<SCRIPTID=clientEventHandlersJSLANGUAGE=javascript>
<!--
functionclient_onblur(ii){
server=eval("form1.server"+ii)
if(server.value==""){
client=eval("form1.client"+ii)
clientvalue=client.value+""
varlen=clientvalue.length
a=clientvalue.lastIndexOf()
clientvalue=clientvalue.substring(a+1)
//alert(clientvalue);
server.value=clientvalue
}
}
functionform1_onsubmit(){
for(i=1;i<1;i++){
client=eval("form1.client"+i)
server=eval("form1.server"+i)
if(client.value!=""&&server.value==""){alert("上传后的文件名不克不及空!");server.focus();returnfalse}
}
}
//-->
</SCRIPT>
<%dimmyid
myid=Request.QueryString("id")
iflen(myid)=0then
Response.Write"没有该旧事"
Response.End
endif
dimmyfso,myread,mytext,newscontent
#######翻开对应的旧事内容文件,并读取用变量存储
setmyfso=createobject("scripting.filesystemobject")
ifmyfso.FileExists(server.mappath("./news_content/"&myid&".txt"))then
setmyread=myfso.opentextfile(server.mappath("./news_content/"&myid&".txt"),1,0)
newscontent=myread.readall
myread.close
newscontent=replace(newscontent,"<br>",chr(13))
newscontent=replace(newscontent,"","")
newscontent=replace(newscontent,"",chr(32))
newscontent=replace(newscontent,"",chr(34))
else
Response.Write"该旧事已被删除"
Response.End
endif
dimmytext2,myread2#######翻开旧事列表文件
setmyread2=myfso.opentextfile(server.mappath("./new_list.asp"),1,0)
ifmyread2.atendofstreamthen
Response.Write"没有旧事内容"
Response.End
endif
mytext2=myread2.readall
dimlistarray
listarray=split(mytext2,"|")#########读取纪录并以#支解成listarray数组
dimcount,sf,i,title,src
count=ubound(listarray)
fori=0tocount###########依据ID找到该旧事并用变量存储给旧事的题目
sf=split(listarray(i),",")
ifright(sf(0),7)=right(myid,7)then
title=sf(1)
src=sf(3)
exitfor
endif
next
%>
<head>
<style>
td{font-size:9pt}
INPUT.buttonface{
BACKGROUND-COLOR:#0079F2;BORDER-BOTTOM:#3333331pxoutset;BORDER-LEFT:#3333331pxoutset;BORDER-RIGHT:</p>asp可以轻松地实现对页面内容的动态控制,根据不同的浏览者,显示不同的页面内容。而浏览者一点觉察不出来,就像为他专门制作的页面一样。使用各种各样的组件,asp可以完成无比强大的功能。 |
|