自己写的{$动易系统-批量修改模版的小程序}(1) 前几天用动易的文章系统做了个站，开始的时候没有去精心管理模版，一味的做整体的网站策划，然后又忙于采集信息。要发布网站了，想把网站弄得漂亮点，才发现由于自己建的频道太多，再去把每个频道的每个模版去修改简直太麻烦，我的性格就是懒，否则不会用动易的系统，于是便写了个小程序。程序小，功能小，但是却很实用---大家别笑话菜鸟。PS：没有权限上传附件，只能把代码贴出来了，反正程序小，只有一个叶子。代码如下：（贴进来可能有些变形，将就看吧）<!--#include file="conn.ASP"--><html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>修改模版</title><style type="text/CSS技巧">CSS"><!--body,td,th { font-size: 12px;}body { margin-left: 0px; margin-top: 0px; margin-right: 0px; margin-bottom: 0px;}.input { border: 1px solid #006600;}.style1 {color: #FF0000}.style2 {color: #009900}--></style></head><!--************************************************************************************************功能介绍：实现修改相应“改动相同”的模版。程序制作：长春大学生信息港(http://www.0431stu.com)免责声明：本程序是恋飞的鸵鸟为自己维护网站所用，如果本程序存在BUG对您的网站造成损害，概不负责！************************************************************************************************--><body><%dim objrs,str1,str2,tempif request("action")="yes" then dim checkall,tps checkall=request("checkall") tps=request("tpId") response.write "<br><a href=z_Tp.asp>点击这里返回</a><br>替换进行中……<br>" OpenConn() set objrs= server.createobject("adodb.recordset") if checkall="yes" then
