<%
Dim sUsername, sPassword
sUsername = "admin"
sPassword = "admin"

Dim aStyle()
Redim aStyle(1)
aStyle(1) = "mail||||||blue1|||../UpLoadUC/|||500|||300|||rar|zip|pdf|doc|xls|ppt|chm|hlp|||swf|||gif|jpg|jpeg|bmp|||rm|mp3|wav|mid|midi|ra|avi|mpg|mpeg|asf|asx|wma|mov|||gif|jpg|bmp|||200|||200|||200|||200|||200|||1|||1|||EDIT|||2|||0|||0|||||||||1|||0|||邮件|||||||||1|||300|||600|||0|||水印|||000000|||12|||宋体||||||0|||jpg|jpeg|||100|||FFFFFF|||1|||1|||gif|jpg|bmp|wmz|png|||200|||100|||9|||66|||17|||5|||5|||0|||100|||100|||1|||5|||5|||88|||31|||1|||0||||||1||||||1|||1|||0"

Dim aToolbar()
Redim aToolbar(1)
aToolbar(1) = "1|||Copy|Paste|Delete|FontMenu|Bold|Italic|UnderLine|ForeColor|BackColor|JustifyLeft|JustifyCenter|JustifyRight|JustifyFull|Image|Flash|Marquee|Emot|FindReplace|RemoteUpload|||工具栏1|||1"
%>