书签 分享 收藏 举报 版权申诉 / 14

类型红栌温泉山庄在线编辑器.docx

  • 文档编号:11846315
  • 上传时间:2023-04-06
  • 格式:DOCX
  • 页数:14
  • 大小:19.50KB
-->

<%IfnStateFlag=1Then%>

"yes"Then%>style="display:

none"<%EndIf%>class=StatusBarBtnOffid=eWebEditor_CODEonClick="setMode('CODE')">/modecode.gif"width=50height=15align=absmiddle>

"yes"Then%>style="display:

none"<%EndIf%>width=5>

/modeedit.gif"width=50height=15align=absmiddle>

/modetext.gif"width=50height=15align=absmiddle>

/modepreview.gif"width=50height=15align=absmiddle>

12px;cursor:

hand;"onClick="copyContent()">复制

9pt">

9pt">远程自动上传

pointer;"onClick="sizeChange(300)">/sizeplus.gif"width=20height=20alt="增高编辑区">

pointer;"onClick="sizeChange(-300)">/sizeminus.gif"width=20height=20alt="减小编辑区">

<%EndIf%>

hidden;OVERFLOW:

hidden;POSITION:

absolute;WIDTH:

1px;HEIGHT:

1px">

action=remote&type=remote&style=<%=sStyleName%>&ModId=<%=Request("ModId")%>"method="post"target="eWebEditor_UploadTarget"style="margin:

0">

300px;height:

40px;position:

absolute;display:

none">

9pt">...远程文件收集中...请等待...

<%

'显示调用错误提示

SubShowErr(str)

CallDBConnEnd()

Response.Write"调用错误:

"&str

Response.End

EndSub

'初始化

SubInit()

'取全屏标志

sFullScreen=Trim(Request.QueryString("fullscreen"))

'取对应的内容ID

sContentID=Trim(Request.QueryString("id"))

IfsContentID=""ThenShowErr"请传入调用参数ID,即隐藏的内容表单项ID!

"

'取样式初始值

sStyleName=Get_SafeStr(Trim(Request.QueryString("style")))

IfsStyleName=""ThensStyleName="standard"

Dims_SelfUrl,s_ApplicationName,n_Application,i

s_SelfUrl=UCase(Request.ServerVariables("SERVER_NAME")&":

"&Request.ServerVariables("SERVER_PORT")&Request.ServerVariables("SCRIPT_NAME")&"?

style="&sStyleName)

n_Application=0

DimaApplicationName,aApplicationUrl,aApplicationValue

aApplicationName=Application("eWebEditor_ApplicationName")

aApplicationUrl=Application("eWebEditor_ApplicationUrl")

IfIsArray(aApplicationName)=TrueThen

n_Application=UBound(aApplicationName)

'是否在内存中

Fori=1Ton_Application

IfaApplicationUrl(i)=s_SelfUrlThen

s_ApplicationName=aApplicationName(i)

aApplicationValue=Application(s_ApplicationName)

sStyleID=aApplicationValue(0)

sStyleName=aApplicationValue

(1)

sStyleDir=aApplicationValue

(2)

sStyleCSS=aApplicationValue(3)

sStyleUploadDir=aApplicationValue(4)

nStateFlag=aApplicationValue(5)

sDetectFromWord=aApplicationValue(6)

sInitMode=aApplicationValue(7)

sBaseUrl=aApplicationValue(8)

sVersion=aApplicationValue(9)

sReleaseDate=aApplicationValue(10)

sLicense=aApplicationValue(11)

sToolBarNormal=aApplicationValue(12)

sToolBarFullScreen=aApplicationValue(13)

sBaseHref=aApplicationValue(14)

sAutoRemote=aApplicationValue(15)

sShowBorder=aApplicationValue(16)

IfsFullScreen="1"Then

sToolBar=sToolBarFullScreen

Else

sToolBar=sToolBarNormal

EndIf

ExitSub

EndIf

Next

EndIf

'初始化数据库连接

CallDBConnBegin()

sSql="select*fromewebeditor_stylewheres_name='"&sStyleName&"'"

oRs.OpensSql,oConn,0,1

IfNotoRs.EofThen

sStyleID=oRs("lingbiqishi.org/S_ID")

sStyleName=oRs("S_Name")

sStyleDir=oRs("S_Dir")

sStyleCSS=oRs("S_CSS")

sStyleUploadDir=oRs("S_UploadDir")

nStateFlag=oRs("S_StateFlag")

配套讲稿:

如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。

特殊限制:

部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。

关 键  词:
温泉 山庄 在线 编辑器
提示  冰豆网所有资源均是用户自行上传分享,仅供网友学习交流,未经上传用户书面授权,请勿作他用。
关于本文
本文标题:红栌温泉山庄在线编辑器.docx
链接地址:https://www.bdocx.com/doc/11846315.html
关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服 - 联系我们

copyright@ 2008-2022 冰点文档网站版权所有

经营许可证编号:鄂ICP备2022015515号-1

收起
展开