一、功能说明
1.本插件可自动读取数据库的表和字段的列表,适用于动易SiteWeaver6.5,并且只有超级管理账号才有权使用此插件。
2.本插件具有普通替换和高级替换以及赋值模式(v1.2新增)功能,若无特别需要,建议使用普通模式,较不易出错。
3.替换时可设定替换项目数,方便控制(v1.1新增).
4.此插件主程序只有一个文件,安装方便,只需要再修改下admin_index_left.asp文件,加入链接即可正常使用
二、安装步骤
1.将压缩包里的Admin_Replace.asp文件上传到空间的管理目录内(例如Admin)
2.参照下面的Admin_index_left.asp修改方法进行修改,修改后上传到服务器的管理目录(例如Admin)覆盖同名文件即可,也可用压缩包内的文件进行覆盖。
三、使用说明
1.普通模式:选择好你要替换的数据所在的数据表(例如PE_Template),在下面会自动出现字段列表,选择相应的字段(例如TemplateContent),然后填写查找和替换的字符即可
2.高级模式:选择好你要替换的数据所在的数据表(例如PE_Template),在下面会自动出现字段列表,选择相应的字段(例如TemplateContent),然后填写查找和替换开始结束(和采集系统相似)的字符即可
3.赋值模式:选择好你要替换的数据所在的数据表(例如PE_Template),在下面会自动出现字段列表,选择相应的字段(例如TemplateContent),然后填写选定字段要修改为的值
找到“系统信息”前的以下代码:
Response.Write "<table cellpadding=0 cellspacing=0 width=167 align=center>" & vbCrLf
Response.Write " <tr>" & vbCrLf
Response.Write " <td height=28 class=menu_title onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title'; background='Images/Admin_left_04.gif' id=menuTitle208><span>系统信息</span> </td>" & vbCrLf
插入以下代码:
If AdminPurview = 1 Then
Response.Write "<table cellpadding=0 cellspacing=0 width=167 align=center>" & vbCrLf
Response.Write " <tr>" & vbCrLf
Response.Write " <td height=28 class=menu_title onmouseover=this.className='menu_title2'; onmouseout=this.className='menu_title'; background='Images/Admin_left_03.gif' id=menuTitle9999 onclick=""new Element.toggle('submenu9999')"" style='cursor:hand;'><span class=glow>插件管理</span></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
Response.Write " <tr>" & vbCrLf
Response.Write " <td style='display:none' align='right' id='submenu9999'><div class=sec_menu style='width:165'>" & vbCrLf
Response.Write " <table cellpadding=0 cellspacing=0 align=center width=130>" & vbCrLf
'数据库内容批量替换程序添加开始
Response.Write " <tr>" & vbCrLf
Response.Write " <td height=20><a href=Admin_Replace.asp target=main>数据库内容批量替换</a></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
'数据库内容批量替换程序添加结束
Response.Write " </table>" & vbCrLf
Response.Write " </div>" & vbCrLf
Response.Write " <div style='width:167'>" & vbCrLf
Response.Write " <table cellpadding=0 cellspacing=0 align=center width=130>" & vbCrLf
Response.Write " <tr>" & vbCrLf
Response.Write " <td height=5></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
Response.Write " </table>" & vbCrLf
Response.Write " </div></td>" & vbCrLf
Response.Write " </tr>" & vbCrLf
Response.Write "</table>" & vbCrLf
End If
效果:
说明:
1、该插件支持ACCESS以及MSSQL数据库;
2、该插件是针对字段表进行修改的,之前没有使用过该插件的用户,请在使用前备份好数据库,以便在替换出错后恢复;
插件下载:点击下载