ASP 网页中插入源码_IT百科

建议使用fck2.6.3以上版本.

首先，打开fckeditor下的fckconfig.js文件，找到FCKConfig.ToolbarSets["Default"]和FCKConfig.ContextMenu 在他们后面加上”InsertCode”，这个当然是自己要添加的工具栏的名字了。然后，我们在“fckeditor\editor\lang\”文件夹下找到zh-cn.js，在最后一行后面加上以下2句：

//自定义

InsertCode:"插入代码",

InsertCodeProp:"插入代码属性"

注意在这2句前DlgAboutInfo : "要获得更多信息请访问 "后面加个逗号咐樱。当然，还可以同样方法修改其他语言js文件，我就修改了繁体的zh.js和英文的en.js

现在，我们已经定义了工具栏，开始第二大步，打开“fckeditor\editor\js\”下的fckeditorcode_gecko.js和fckeditorcode_ie.js，我们开始注册工具栏；

第一步：在2个文件中搜索“InsertHorizontalRule”，在后面明岁加上“InsertCode”。

第二步：同样在2个文件中搜索“default:if (FCKRegexLib”，在“default”之前加上这么一句：

Case 'InsertCode':B = new FCKDialogCommand('InsertCode' , FCKLang.InsertCode ,'dialog/InsertCode/InsertCode.htm',510,450)break

这句话意思就是，点击工具栏图标时打开InsertCode.htm文件，定义了高和宽，至于文件内容我们之后再说。

第三步：还是在这2个文件，搜索“default:alert(FCKLang.UnknownToolbarItem”，在“default”之前加上下面一句：

case 'InsertCode':B = new FCKToolbarButton('InsertCode' , FCKLang.InsertCode,null,null,null,null,67)

这句话意思是定衡槐丛义了工具栏的图标，FCKeditor的默认图标文件是“fckeditor\editor\skins\default\”下的fck_strip.gif图片，本人由于不想用重复的默认图标，因此加了一个小图片:

（20*20）

默认图片是16*2056，用PS把画布加长到16*2072，再把自己的小图片放到最下面，这样，自定义的图片刚好排67位。以后加新功能还可以依次增加此图片。

好了。经过这么3步，我们已经把自定义工具栏加上去了。（在about之后，如果想加在中间，可以在刚才的第二和第三步里把添加的语句加到相应的Case前面。）

做了这么多，任务算完成1/3，加油！

下面我们开始定义“InsertCode.htm”文件：

在“fckeditor\editor\dialog\”下新增InsertCode文件夹，新建HTM文件InsertCode.htm，里面代码先拷贝“fckeditor\editor\dialog\fck_textfield.html”文件，好了，，大手术开始：

首先，在“<title></title>”中加上“Insert Code Properties”，这个是打开的新窗体的标题；更改FCKeditor的JS文件“common/fck_dialog_common.js”的引用为“../common/fck_dialog_common.js”，再加上双鱼编辑器里的插入代码脚本“<script src="code.js" type="text/javascript"></script>”。

然后更改“window.onload = function()”函数，把里面的if {} else{}删除掉，再把function Ok()里的代码全部删除，加上下面2句：

oEditor.FCK.InsertHtml(code())

window.parent.Cancel()

因为我们是更改成代码格式的字符串加到FCKeditor编辑器里，所以用到内置的InsertHtml函数，code()函数传过来的是字符串；至于下面的html代码，就更改为双鱼编辑器里InsertCode.htm的代码（这里就不提供了，本人把更改好的放上来，这里只做个简单说明）。

下面我们修改“code.js”文件里的代码，把“function code()”里的

window.returnValue = FormateCode(str,language,showLine,canCollapse,canAllCollapse,allRegion)

window.close()

这两句更改为一句：

return FormateCode(str,language,showLine,canCollapse,canAllCollapse,allRegion)

好了，至此，就可以使用插入代码功能了。（添加其他功能的时候到这一步就可以完成了。）

如果你加分的话[我可以帮你写代码哈]

set conn=Server.CreateObject("ADODB.CONNECTION")

connstr="Provider=Microsoft.Jet.OLEDB.4.0data Source=" &Server.MapPath("data.mdb")

conn.open connstr

set rs=server.createobject("adodb.recordset")

sql="select * from [信息]" '数据库的表名为信息

rs.open sql,conn,1,3 '执行SQL 并打开数据集

rs.addnew '用记录集新添加一条数据

C_Name=request("Name") '请求表单的变量，定义变量为c，这里接收C变理

rs("Name")=C_Name '将请求到的表单值传向记录集档做枝中代表Name字段的名称

'别的内容。如学号之类的地方同上

rs.update '更新一下数据库中的数据。

rs.close '关闭记录集

set rs=nothing '销毁记录集

conn.close '关闭数据库连接

set rs=nothing '销毁数据库连接

上面是添加数据

下面是显示数据

set conn=server.createobject("adodb.connection")

c&server.mappath("data.mdb") '这个就是数据库

conn.open connstr

<tr>

<td scope="胡返col"><div align="center">个人网址等</div></td>

</tr>

set rs=server.createobject("adodb.recordset")

sql="select * from [信息]" '数据库的表名为行敏信息

rs.open sql,conn,1,1 '执行SQL 并打开数据集

do while not rs.eof

<tr>

response.write("<td>" &rs("Name") &"</td>") '这儿显示的名字

'下面分别显示别的信息。我就不写了。你自己添上去就行了

</tr>

rs.movenext

loop

rs.close '关闭记录集

set rs=nothing '销毁记录集

conn.close '关闭数据库连接

set rs=nothing '销毁数据库连接

</table>

你想要的是，一次提交后，同时把那三条数据一起写入到数据库里吧

这个是可以实现的，思路如下：

前台，用js或jquery把要提交的数闹腊据获取到，然后用ajax发送到后台，

比如，你要提交的数据是：

李，标题1，内容1；王，标题2，内容2 ；

这些数据，每一条与每一条之间，要设置好间隔符号，第一条的每一项之间也要设置好间隔符

2.后慎弯裤台，处宽简理通过ajax获取到的数据，

把获取到的数据，拆分成一条条的记录，得到一个数组，然后开始循环添加数据。

欢迎分享，转载请注明来源：内存溢出

原文地址: http://outofmemory.cn/bake/11969011.html

ASP 网页中插入源码

发表评论

评论列表（0条）