config.asp

公文传输系统 本案例SQL Server数据库,asp,系统登陆以及实现用户功能的网页文件

<%

Dim aStyle()
Redim aStyle(2)
' ------------------------------------------------------------------------------------------------------------------
' 本系统用到的变量介绍:
' 0=样式名称，1=按钮图标文件夹，2=Css样式文件夹，3=上传文件保存位置，4=最佳调用宽度，5=最佳调用高度
' 文件类型：6=其他，7=动画，8=图像，9=媒体，10=远程自动上传
' 文件大小：11=其他，12=动画，13=图像，14=媒体，15=远程自动上传
' 无用设置：16=是否显示状态栏，17=是否在粘贴Word文档的时候提示清理，18=默认编辑模式
' 19=路径模式：[0=相对路径，1=绝对路径，2=绝对根路径]
' 20=上传组件：[0=无组件上传，免费版本只提供无组件上传]
' 21=保存模式：[用于将所上传的文件分目录保存，选项有：年月日目录，年月目录，日目录等，免费版本无此功能！]
' 23=显示路径
' 无用设置：24=是否自动上传远程文件，25=默认是否显示指导方针，26=编辑器样式简介,27=是否允许自动选择语言，28=默认语言
' 无用设置：29=，30=，31=，32=，33=，34=，35=，36=，37=，38=，39=，40=，41=，42=
' ------------------------------------------------------------------------------------------------------------------
aStyle(1) = "blue|||blue|||blue|||../upfile/newsword/|||550|||350|||rar|zip|exe|doc|xls|chm|hlp|||swf|||gif|jpg|jpeg|bmp|||rm|mp3|wav|mid|midi|ra|avi|mpg|mpeg|asf|asx|wma|mov|||gif|jpg|jpeg|bmp|||5000|||500|||500|||5000|||1000|||1|||1|||EDIT|||1|||0|||0|||||||||1|||0|||Office标准风格按钮+蓝色，部分常用按钮，标准适合界面宽度|||1|||zh-cn|||0|||500|||300|||0|||版权所有...|||FF0000|||12|||宋体||||||0|||jpg|jpeg|||300|||FFFFFF|||1"
aStyle(2) = "mini|||blue|||blue|||../upfile/emailword/|||550|||350|||rar|zip|exe|doc|xls|chm|hlp|||swf|||gif|jpg|jpeg|bmp|||rm|mp3|wav|mid|midi|ra|avi|mpg|mpeg|asf|asx|wma|mov|||gif|jpg|jpeg|bmp|||5000|||500|||500|||5000|||1000|||1|||1|||EDIT|||1|||0|||0|||||||||1|||0|||Office标准风格按钮+蓝色，部分常用按钮，标准适合界面宽度|||1|||zh-cn|||0|||500|||300|||0|||版权所有...|||FF0000|||12|||宋体||||||0|||jpg|jpeg|||300|||FFFFFF|||1"

Dim aToolbar()
Redim aToolbar(4)
' --------------------------------
' 工具栏变量说明：（免费版本无效）
' 假定数组下标最大值为N
' 0=适用的编辑器样式编号
' 1到N-1=工具栏按钮代码
' N=工具栏编号（1、2、3）
' --------------------------------
aToolbar(1) = "1|||TBHandle|FormatBlock|FontName|FontSize|ZoomSelect|Bold|Italic|UnderLine|StrikeThrough|SuperScript|SubScript|TBSep|JustifyLeft|JustifyCenter|JustifyRight|JustifyFull|||格式工具栏|||1"
aToolbar(2) = "1|||TBHandle|Cut|Copy|Paste|PasteText|PasteWord|FindReplace|Delete|RemoveFormat|TBSep|UnDo|ReDo|SelectAll|UnSelect|TBSep|OrderedList|UnOrderedList|Indent|Outdent|ParagraphAttr|TBSep|ForeColor|BgColor|BackColor|BackImage|TBSep|absolutePosition|zIndexForward|zIndexBackward|||常用工具栏|||2"
aToolbar(3) = "1|||TBHandle|Image|Flash|Media|File|RemoteUpload|TBSep|TableMenu|FormMenu|ShowBorders|TBSep|Fieldset|Iframe|HorizontalRule|Marquee|CreateLink|Anchor|Map|Unlink|TBSep|Symbol|Emot|Excel|Art|NowDate|NowTime|TBSep|Quote|code|||高级工具栏|||3"
aToolbar(4) = "2|||TBHandle|FormatBlock|FontName|FontSize|ZoomSelect|TBSep|EditMenu|FontMenu|ParagraphMenu|ComponentMenu|ObjectMenu|ToolMenu|FormMenu|TableMenu|FileMenu|ZoomMenu|||mini工具栏|||1"
%>