📄 style.aspx
字号:
"<tr><td width='15%'>上传组件:</td><td width='35%'>" & s_FormUploadObject & " <span class=red>*</span></td><td width='15%'>自动目录:</td><td width='35%'>" & s_FormAutoDir & " <span class=red>*</span></td></tr>" & _
"<tr><td width='15%'>图片目录:</td><td width='35%'><input type=text class=input size=20 name=d_dir title='存放此样式图片文件的目录名,必须在ButtonImage下,最大50个字符长度' value=""" & sStyleDir & """> <span class=red>*</span></td><td width='15%'>样式目录:</td><td width='35%'><input type=text class=input size=20 name=d_css title='存放此样式css文件的目录名,必须在CSS下,最大50个字符长度' value=""" & sStyleCSS & """> <span class=red>*</span></td></tr>" & _
"<tr><td width='15%'>最佳宽度:</td><td width='35%'><input type=text class=input name=d_width size=20 title='最佳引用效果的宽度,数字型' value='" & sStyleWidth & "'> <span class=red>*</span></td><td width='15%'>最佳高度:</td><td width='35%'><input type=text class=input name=d_height size=20 title='最佳引用效果的高度,数字型' value='" & sStyleHeight & "'> <span class=red>*</span></td></tr>" & _
"<tr><td width='15%'>状 态 栏:</td><td width='35%'>" & s_FormStateFlag & " <span class=red>*</span></td><td width='15%'>Word粘贴:</td><td width='35%'>" & s_FormDetectFromWord & " <span class=red>*</span></td></tr>" & _
"<tr><td width='15%'>远程文件:</td><td width='35%'>" & s_FormAutoRemote & " <span class=red>*</span></td><td width='15%'>指导方针:</td><td width='35%'>" & s_FormShowBorder & " <span class=red>*</span></td></tr>" & _
"<tr><td width='15%'>自动语言检测:</td><td width='35%'>" & s_FormAutoDetectLanguage & " <span class=red>*</span></td><td width='15%'>默认语言:</td><td width='35%'>" & s_FormDefaultLanguage & " <span class=red>*</span></td></tr>" & _
"<tr><td width='15%'>上传文件浏览:</td><td width='35%'>" & s_FormAllowBrowse & " <span class=red>*</span></td><td width='15%'> </td><td width='35%'> </td></tr>" & _
"<tr><td>备注说明:</td><td colspan=3><input type=text name=d_memo size=90 title='此样式的说明,更有利于调用' value=""" & sStyleMemo & """></td></tr>" & _
"<tr><td colspan=4><span class=red> 上传文件及系统文件路径相关设置(只有在使用相对路径模式时,才要设置显示路径和内容路径):</span></td></tr>" & _
"<tr><td width='15%'>路径模式:</td><td width='35%'>" & s_FormBaseUrl & " <span class=red>*</span> <a href='#baseurl'>说明</a></td><td width='15%'>上传路径:</td><td width='35%'><input type=text class=input size=20 name=d_uploaddir title='上传文件所存放路径,相对eWebEditor根目录文件的路径,最大50个字符长度' value=""" & sStyleUploadDir & """> <span class=red>*</span></td></tr>" & _
"<tr><td width='15%'>显示路径:</td><td width='35%'><input type=text class=input size=20 name=d_basehref title='显示内容页所存放路径,必须以"/"开头,最大50个字符长度' value=""" & sStyleBaseHref & """></td><td width='15%'>内容路径:</td><td width='35%'><input type=text class=input size=20 name=d_contentpath title='实际保存在内容中的路径,相对显示路径的路径,不能以"/"开头,最大50个字符长度' value=""" & sStyleContentPath & """></td></tr>" & _
"<tr><td colspan=4><span class=red> 允许上传文件类型及文件大小设置(文件大小单位为KB,0表示没有限制):</span></td></tr>" & _
"<tr><td width='15%'>图片类型:</td><td width='35%'><input type=text class=input name=d_imageext size=20 title='用于图片相关的上传,最大250个字符长度' value='" & sStyleImageExt & "'></td><td width='15%'>图片限制:</td><td width='35%'><input type=text class=input name=d_imagesize size=20 title='数字型,单位KB' value='" & sStyleImageSize & "'></td></tr>" & _
"<tr><td width='15%'>Flash类型:</td><td width='35%'><input type=text class=input name=d_flashext size=20 title='用于插入Flash动画,最大250个字符长度' value='" & sStyleFlashExt & "'></td><td width='15%'>Flash限制:</td><td width='35%'><input type=text class=input name=d_flashsize size=20 title='数字型,单位KB' value='" & sStyleFlashSize & "'></td></tr>" & _
"<tr><td width='15%'>媒体类型:</td><td width='35%'><input type=text class=input name=d_mediaext size=20 title='用于插入媒体文件,最大250个字符长度' value='" & sStyleMediaExt & "'></td><td width='15%'>媒体限制:</td><td width='35%'><input type=text class=input name=d_mediasize size=20 title='数字型,单位KB' value='" & sStyleMediaSize & "'></td></tr>" & _
"<tr><td width='15%'>其它类型:</td><td width='35%'><input type=text class=input name=d_fileext size=20 title='用于插入其它文件,最大250个字符长度' value='" & sStyleFileExt & "'></td><td width='15%'>其它限制:</td><td width='35%'><input type=text class=input name=d_filesize size=20 title='数字型,单位KB' value='" & sStyleFileSize & "'></td></tr>" & _
"<tr><td width='15%'>远程类型:</td><td width='35%'><input type=text class=input name=d_remoteext size=20 title='用于自动上传远程文件,最大250个字符长度' value='" & sStyleRemoteExt & "'></td><td width='15%'>远程限制:</td><td width='35%'><input type=text class=input name=d_remotesize size=20 title='数字型,单位KB' value='" & sStyleRemoteSize & "'></td></tr>" & _
"<tr><td colspan=4><span class=red> 缩略图及水印相关设置:</span></td></tr>" & _
"<tr><td width='15%'>图形处理组件:</td><td width='35%'>" & s_FormSLTSYObject & "</td><td width='15%'>处理图形扩展名:</td><td width='35%'><input type=text name=d_sltsyext size=20 class=input value=""" & sSLTSYExt & """></td></tr>" & _
"<tr><td width='15%'>缩略图使用状态:</td><td width='35%'>" & s_FormSLTFlag & "</td><td width='15%'>缩略图长度条件</td><td width='35%'><input type=text name=d_sltminsize size=20 class=input title='图形的长度只有达到此最小长度要求时才会生成缩略图,数字型' value='" & sSLTMinSize & "'>px</td></tr>" & _
"<tr><td width='15%'>缩略图生成长度:</td><td width='35%'><input type=text name=d_sltoksize size=20 class=input title='生成的缩略图长度值,数字型' value='" & sSLTOkSize & "'>px</td><td width='15%'> </td><td width='35%'> </td></tr>" & _
"<tr><td width='15%'>水印使用状态:</td><td width='35%'>" & s_FormSYFlag & "</td><td width='15%'>水印宽度条件:</td><td width='35%'><input type=text name=d_syminsize size=20 class=input title='图形的宽度只有达到此最小宽度要求时才会生成水印,数字型' value='" & sSYMinSize & "'>px</td></tr>" & _
"<tr><td width='15%'>文字水印内容:</td><td width='35%'><input type=text name=d_sytext size=20 class=input title='当使用文字水印时的文字内容' value=""" & sSYText & """></td><td width='15%'>文字水印字体颜色:</td><td width='35%'><input type=text name=d_syfontcolor size=20 class=input title='当使用文字水印时文字的颜色' value=""" & sSYFontColor & """></td></tr>" & _
"<tr><td width='15%'>文字水印阴影颜色:</td><td width='35%'><input type=text name=d_syshadowcolor size=20 class=input title='当使用文字水印时的文字阴影颜色' value=""" & sSYShadowColor & """></td><td width='15%'>文字水印阴影大小:</td><td width='35%'><input type=text name=d_syshadowoffset size=20 class=input title='当使用文字水印时文字的阴影大小' value=""" & sSYShadowOffset & """>px</td></tr>" & _
"<tr><td width='15%'>文字水印字体大小:</td><td width='35%'><input type=text name=d_syfontsize size=20 class=input title='当使用文字水印时文字的字体大小' value=""" & sSYFontSize & """>px</td><td width='15%'>文字水印字体名称:</td><td width='35%'><input type=text name=d_syfontname size=20 class=input title='当使用文字水印时文字的字体名' value=""" & sSYFontName & """></td></tr>" & _
"<tr><td width='15%'>图片水印图片路径:</td><td width='35%'><input type=text name=d_sypicpath size=20 class=input title='当使用图片水印时图片的路径' value=""" & sSYPicPath & """></td><td width='15%'></td><td width='35%'></td></tr>" & _
s_Button & _
"</form>" & _
"</table><br>")
Dim sMsg
sMsg = "<a name=baseurl></a><p><span class=blue><b>路径模式设置说明:</b></span><br>" & _
"<b>相对路径:</b>指所有的相关上传或自动插入文件路径,编辑后都以""UploadFile/...""或""../UploadFile/...""形式呈现,当使用此模式时,显示路径和内容路径必填,显示路径必须以""/""开头和结尾,内容路径设置中不能以""/""开头。<br>" & _
"<b>绝对根路径:</b>指所有的相关上传或自动插入文件路径,编辑后都以""/eWebEditor/UploadFile/...""这种形式呈现,当使用此模式时,显示路径和内容路径不必填。<br>" & _
"<b>绝对全路径:</b>指所有的相关上传或自动插入文件路径,编辑后都以""http://xxx.xxx.xxx/eWebEditor/UploadFile/...""这种形式呈现,当使用此模式时,显示路径和内容路径不必填。</p>"
Call ShowMessage(sMsg)
End Sub
Sub InitStyle()
Dim b, aCurrStyle
b = False
sStyleID = Trim(Request("id"))
If IsNumeric(sStyleID) = True Then
nStyleID = Clng(sStyleID)
If nStyleID <= Ubound(aStyle) Then
aCurrStyle = Split(aStyle(nStyleID), "|||")
sStyleName = aCurrStyle(0)
sStyleDir = aCurrStyle(1)
sStyleCSS = aCurrStyle(2)
sStyleUploadDir = aCurrStyle(3)
sStyleBaseHref = aCurrStyle(22)
sStyleContentPath = aCurrStyle(23)
sStyleWidth = aCurrStyle(4)
sStyleHeight = aCurrStyle(5)
sStyleMemo = aCurrStyle(26)
'nStyleIsSys = aCurrStyle()
sStyleFileExt = aCurrStyle(6)
sStyleFlashExt = aCurrStyle(7)
sStyleImageExt = aCurrStyle(8)
sStyleMediaExt = aCurrStyle(9)
sStyleRemoteExt = aCurrStyle(10)
sStyleFileSize = aCurrStyle(11)
sStyleFlashSize = aCurrStyle(12)
sStyleImageSize = aCurrStyle(13)
sStyleMediaSize = aCurrStyle(14)
sStyleRemoteSize = aCurrStyle(15)
sStyleStateFlag = aCurrStyle(16)
sStyleAutoRemote = aCurrStyle(24)
sStyleShowBorder = aCurrStyle(25)
sAutoDetectLanguage = aCurrStyle(27)
sDefaultLanguage = aCurrStyle(28)
sStyleUploadObject = aCurrStyle(20)
sStyleAutoDir = aCurrStyle(21)
sStyleDetectFromWord = aCurrStyle(17)
sStyleInitMode = aCurrStyle(18)
sStyleBaseUrl = aCurrStyle(19)
sSLTFlag = aCurrStyle(29)
sSLTMinSize = aCurrStyle(30)
sSLTOkSize = aCurrStyle(31)
sSYFlag = aCurrStyle(32)
sSYText = aCurrStyle(33)
sSYFontColor = aCurrStyle(34)
sSYFontSize = aCurrStyle(35)
sSYFontName = aCurrStyle(36)
sSYPicPath = aCurrStyle(37)
sSLTSYObject = aCurrStyle(38)
sSLTSYExt = aCurrStyle(39)
sSYMinSize = aCurrStyle(40)
sSYShadowColor = aCurrStyle(41)
sSYShadowOffset = aCurrStyle(42)
sStyleAllowBrowse = aCurrStyle(43)
b = True
End If
End If
If b = False Then
GoError ("无效的样式ID号,请通过页面上的链接进行操作!")
End If
End Sub
Sub CheckStyleForm()
sStyleName = Trim(Request("d_name"))
sStyleDir = Trim(Request("d_dir"))
sStyleCSS = Trim(Request("d_css"))
sStyleUploadDir = Trim(Request("d_uploaddir"))
sStyleBaseHref = Trim(Request("d_basehref"))
sStyleContentPath = Trim(Request("d_contentpath"))
sStyleWidth = Trim(Request("d_width"))
sStyleHeight = Trim(Request("d_height"))
sStyleMemo = Trim(Request("d_memo"))
sStyleImageExt = Request("d_imageext")
sStyleFlashExt = Request("d_flashext")
sStyleMediaExt = Request("d_mediaext")
sStyleRemoteExt = Request("d_remoteext")
sStyleFileExt = Request("d_fileext")
sStyleImageSize = Request("d_imagesize")
sStyleFlashSize = Request("d_flashsize")
sStyleMediaSize = Request("d_mediasize")
sStyleRemoteSize = Request("d_remotesize")
sStyleFileSize = Request("d_filesize")
sStyleStateFlag = Request("d_stateflag")
sStyleAutoRemote = Request("d_autoremote")
sStyleShowBorder = Request("d_showborder")
sAutoDetectLanguage = Request("d_autodetectlanguage")
sDefaultLanguage = Request("d_defaultlanguage")
sStyleUploadObject = Request("d_uploadobject")
sStyleAutoDir = Request("d_autodir")
sStyleDetectFromWord = Request("d_detectfromword")
sStyleInitMode = Request("d_initmode")
sStyleBaseUrl = Request("d_baseurl")
sSLTFlag = Trim(Request("d_sltflag"))
sSLTMinSize = Trim(Request("d_sltminsize"))
sSLTOkSize = Trim(Request("d_sltoksize"))
sSYFlag = Trim(Request("d_syflag"))
sSYText = Trim(Request("d_sytext"))
sSYFontColor = Trim(Request("d_syfontcolor"))
sSYFontSize = Trim(Request("d_syfontsize"))
sSYFontName = Trim(Request("d_syfontname"))
sSYPicPath = Trim(Request("d_sypicpath"))
sSLTSYObject = Trim(Request("d_sltsyobject"))
sSLTSYExt = Trim(Request("d_sltsyext"))
sSYMinSize = Trim(Request("d_syminsize"))
sSYShadowColor = Trim(Request("d_syshadowcolor"))
sSYShadowOffset = Trim(Request("d_syshadowoffset"))
sStyleAllowBrowse = Trim(Request("d_allowbrowse"))
sStyleUploadDir = Replace(sStyleUploadDir, "\", "/")
sStyleBaseHref = Replace(sStyleBaseHref, "\", "/")
sStyleContentPath = Replace(sStyleContentPath, "\", "/")
If Right(sStyleUploadDir, 1) <> "/" Then sStyleUploadDir = sStyleUploadDir & "/"
If Right(sStyleBaseHref, 1) <> "/" Then sStyleBaseHref = sStyleBaseHref & "/"
If Right(sStyleContentPath, 1) <> "/" Then sStyleContentPath = sStyleContentPath & "/"
If sStyleName = "" Or GetTrueLen(sStyleName) > 50 Then
GoError ("样式名不能为空,且不大于50个字符长度!")
End If
If IsSafeStr(sStyleName) = False Then
GoError ("样式名请勿包含特殊字符!")
End If
If sStyleDir = "" Or GetTrueLen(sStyleDir) > 50 Then
GoError ("按钮图片目录名不能为空,且不大于50个字符长度!")
End If
If IsSafeStr(sStyleDir) = False Then
GoError ("按钮图片目录名请勿包含特殊字符!")
End If
If sStyleCSS = "" Or GetTrueLen(sStyleCSS) > 50 Then
GoError ("样式CSS目录名不能为空,且不大于50个字符长度!")
End If
If IsSafeStr(sStyleCSS) = False Then
GoError ("样式CSS目录名请勿包含特殊字符!")
End If
If sStyleUploadDir = "" Or GetTrueLen(sStyleUploadDir) > 50 Then
GoError ("上传路径不能为空,且不大于50个字符长度!")
End If
If IsSafeStr(sStyleUploadDir) = False Then
GoError ("上传路径请勿包含特殊字符!")
End If
Select Case sStyleBaseUrl
Case "0"
If sStyleBaseHref = "" Or GetTrueLen(sStyleBaseHref) > 50 Then
GoError ("当使用相对路径模式时,显示路径不能为空,且不大于50个字符长度!")
End If
If IsSafeStr(sStyleBaseHref) = False Then
GoError ("当使用相对路径模式时,显示路径请勿包含特殊字符!")
End If
If Left(sStyleBaseHref, 1) <> "/" Then
GoError ("当使用相对路径模式时,显示路径必须以"/"开头!")
End If
If sStyleContentPath = "" Or GetTrueLen(sStyleContentPath) > 50 Then
GoError ("当使用相对路径模式时,内容路径不能为空,且不大于50个字符长度!")
End If
If IsSafeStr(sStyleContentPath) = False Then
GoError ("当使用相对路径模式时,内容路径请勿包含特殊字符!")
End If
If Left(sStyleContentPath, 1) = "/" Then
GoError ("当使用相对路径模式时,内容路径不能以"/"开头!")
End If
Case "1", "2"
sStyleBaseHref = ""
sStyleContentPath = ""
End Select
If IsNumeric(sStyleWidth) = False Then
GoError ("请填写有效的最佳引用宽度!")
End If
If IsNumeric(sStyleHeight) = False Then
GoError ("请填写有效的最佳引用高度!")
End If
If GetTrueLen(sStyleImageExt) > 250 Then
GoError ("图片文件类型不能大于250个字符长度!")
End If
If GetTrueLen(sStyleFlashExt) > 250 Then
GoError ("Flash文件类型不能大于250个字符长度!")
End If
If GetTrueLen(sStyleMediaExt) > 250 Then
GoError ("媒体文件类型不能大于250个字符长度!")
End If
If GetTrueLen(sStyleFileExt) > 250 Then
GoError ("其它文件类型不能大于250个字符长度!")
End If
If GetTrueLen(sStyleRemoteExt) > 250 Then
GoError ("远程文件类型不能大于250个字符长度!")
End If
If IsNumeric(sStyleImageSize) = False Then
GoError ("请填写有效的图片限制大小!")
End If
If IsNumeric(sStyleFlashSize) = False Then
GoError ("请填写有效的Flash限制大小!")
End If
If IsNumeric(sStyleMediaSize) = False Then
GoError ("请填写有效的媒体文件限制大小!")
End If
If IsNumeric(sStyleFileSize) = False Then
GoError ("请填写有效的其它文件限制大小!")
End If
If IsNumeric(sStyleRemoteSize) = False Then
GoError ("请填写有效的远程文件限制大小!")
End If
If IsNumeric(sSLTMinSize) = False Then
GoError ("请填写有效的缩略图使用最小长度条件,不能为空,且为数字型!")
End If
If IsNumeric(sSLTOkSize) = False Then
GoError ("请填写有效的缩略图生成长度,不能为空,且为数字型!")
End If
If IsNumeric(sSYMinSize) = False Then
GoError ("请填写有效的水印的最小宽度条件,不能为空,且为数字型!")
End If
If sSYText = "" Then
GoError ("请填写有效水印文字内容,不能为空!")
End If
If isValidColor(sSYFontColor) = False Then
GoError ("请填写有效的水印文字颜色,6位长度,如黑色:000000!")
End If
If isValidColor(sSYShadowColor) = False Then
GoError ("请填写有效的水印文字阴影颜色,6位长度,如白色:FFFFFF!")
End If
If IsNumeric(sSYShadowOffset) = False Then
GoError ("请填写有效的水印文字阴影大小,不能为空,且为数字型!")
End If
If IsNumeric(sSYFontSize) = False Then
GoError ("请填写有效的水印文字大小,不能为空,且为数字型!")
End If
If sSYFontName = "" Then
GoError ("请填写水印文字字体名称,不能为空!")
End If
End Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -