<
%@LANGUAGE
=
"
VBSCRIPT
"
CODEPAGE
=
"
936
"
%
>
< !DOCTYPE HTML PUBLIC " -//W3C//DTD HTML 4.01 Transitional//EN " " http://www.w3.org/TR/html4/loose.dtd " >
< html >
< head >
< meta http - equiv = " Content-Type " content = " text/html; charset=gb2312 " >
< title > 无标题文档 </ title >
< ! --
FCKeditor: 是编辑器的文件夹包。
http: // www.fckeditor.net
优点:
1支持各国语言
2客户操作十分方便
-->
< ! -- #INCLUDE file = " FCKeditor/fckeditor.asp " -->
</ head >
< body >
< form name = " form1 " method = " post " action = " editorTest_Request.asp " >
< table border = " 0 " align = " center " cellpadding = " 0 " cellspacing = " 0 " >
< tr >
< td colspan = " 2 " >< div align = " center " >< strong > 用户注册 </ strong ></ div ></ td >
</ tr >
< tr >
< td > 用户名: </ td >
< td >< input name = " txtUserName " type = " text " size = " 20 " ></ td >
</ tr >
< tr >
< td > 密 码: </ td >
< td >< input name = " txtPwd " type = " text " size = " 20 " ></ td >
</ tr >
< tr >
< td > 个人简介: </ td >
< td >
< % ' ====================================核心代码
Dim oFCKeditor
Set oFCKeditor = New FCKeditor
oFCKeditor.BasePath = " FCKeditor/ "
oFCKeditor.Height = 500
oFCKeditor.Width = 550
oFCKeditor.Value = " 这个是给编辑器初始值 " // 这个是给编辑器初始值
oFCKeditor.Create " DetailDesc "
' ============================
' 在另一个页面只要Request("DetailDesc") 就可获取“个人简介”的值。
% >
</ td >
</ tr >
< tr >
< td >& nbsp; </ td >
< td >< input type = " submit " name = " Submit " value = " 提交 " >
< input type = " reset " name = " Submit2 " value = " 重置 " ></ td >
</ tr >
</ table >
</ form >
</ body >
</ html >
< !DOCTYPE HTML PUBLIC " -//W3C//DTD HTML 4.01 Transitional//EN " " http://www.w3.org/TR/html4/loose.dtd " >
< html >
< head >
< meta http - equiv = " Content-Type " content = " text/html; charset=gb2312 " >
< title > 无标题文档 </ title >
< ! --
FCKeditor: 是编辑器的文件夹包。
http: // www.fckeditor.net
优点:
1支持各国语言
2客户操作十分方便
-->
< ! -- #INCLUDE file = " FCKeditor/fckeditor.asp " -->
</ head >
< body >
< form name = " form1 " method = " post " action = " editorTest_Request.asp " >
< table border = " 0 " align = " center " cellpadding = " 0 " cellspacing = " 0 " >
< tr >
< td colspan = " 2 " >< div align = " center " >< strong > 用户注册 </ strong ></ div ></ td >
</ tr >
< tr >
< td > 用户名: </ td >
< td >< input name = " txtUserName " type = " text " size = " 20 " ></ td >
</ tr >
< tr >
< td > 密 码: </ td >
< td >< input name = " txtPwd " type = " text " size = " 20 " ></ td >
</ tr >
< tr >
< td > 个人简介: </ td >
< td >
< % ' ====================================核心代码
Dim oFCKeditor
Set oFCKeditor = New FCKeditor
oFCKeditor.BasePath = " FCKeditor/ "
oFCKeditor.Height = 500
oFCKeditor.Width = 550
oFCKeditor.Value = " 这个是给编辑器初始值 " // 这个是给编辑器初始值
oFCKeditor.Create " DetailDesc "
' ============================
' 在另一个页面只要Request("DetailDesc") 就可获取“个人简介”的值。
% >
</ td >
</ tr >
< tr >
< td >& nbsp; </ td >
< td >< input type = " submit " name = " Submit " value = " 提交 " >
< input type = " reset " name = " Submit2 " value = " 重置 " ></ td >
</ tr >
</ table >
</ form >
</ body >
</ html >