www.gusucode.com > 绿色环保工作企业网站源码程序 > editor_InsertRM.asp
<%@language=vbscript codepage=936 %> <% option explicit response.buffer=true '强制浏览器重新访问服务器下载页面,而不是从缓存读取页面 Response.Buffer = True Response.Expires = -1 Response.ExpiresAbsolute = Now() - 1 Response.Expires = 0 Response.CacheControl = "no-cache" %> <HTML><HEAD><TITLE>插入RealPlay文件</TITLE> <link rel="stylesheet" type="text/css" href="editor_dialog.css"> <script language="JavaScript"> function OK(){ var str1=""; var strurl=document.form1.url.value; if (strurl==""||strurl=="http://") { alert("请先输入RealPlay文件地址,或者上传RealPlay文件!"); document.form1.url.focus(); return false; } else { str1="<object classid='clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA' width="+document.form1.width.value+" height="+document.form1.height.value+"><param name='CONTROLS' value='ImageWindow'><param name='CONSOLE' value='Clip1'><param name='AUTOSTART' value='-1'><param name=src value="+document.form1.url.value+"></object><br><object classid='clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA' width="+document.form1.width.value+" height=60><param name='CONTROLS' value='ControlPanel,StatusBar'><param name='CONSOLE' value='Clip1'></object>" window.returnValue = str1+"$$$"+document.form1.UpFileName.value; window.close(); } } function IsDigit() { return ((event.keyCode >= 48) && (event.keyCode <= 57)); } </script> </head> <BODY bgColor=menu topmargin=15 leftmargin=15 > <form name="form1" method="post" action=""> <table width=100% border="0" cellpadding="0" cellspacing="2"> <tr><td> <FIELDSET align=left> <LEGEND align=left>RealPlay文件参数</LEGEND> <TABLE border="0" cellpadding="0" cellspacing="3"> <TR><TD >地址:<INPUT name="url" id=url value="http://" size=40> <%if trim(session("AdminName"))<>"" then%> <input type="button" name="Submit" value="..." title="从已上传文件中选择" onClick="javascript:window.open('editor_SelectUpFile.asp?DialogType=rm', 'selupfile', 'width=800, height=600, toolbar=no, menubar=no, scrollbars=yes, resizable=no, location=no, status=yes');"> <%end if%> </td></TR> <TR><TD >宽度:<INPUT name="width" id=width ONKEYPRESS="event.returnValue=IsDigit();" value=500 size=7 maxlength="4" > 高度:<INPUT name="height" id=height ONKEYPRESS="event.returnValue=IsDigit();" value=300 size=7 maxlength="4"></TD></TR> <TR><TD align=center>支持格式为:rm、ra、ram</TD></TR> </TABLE></fieldset></td><td width=80 align="center"><input name="cmdOK" type="button" id="cmdOK" value=" 确定 " onClick="OK();"> <br> <br> <input name="cmdCancel" type=button id="cmdCancel" onclick="window.close();" value=' 取消 '></td></tr> <tr> <td> <FIELDSET align=left> <LEGEND align=left>上传本地RealPlay文件</LEGEND> <iframe class="TBGen" style="top:2px" ID="UploadFiles" src="upload_dialog.asp?DialogType=rm" frameborder=0 scrolling=no width="350" height="25"></iframe> </fieldset> </td> <td width=80 align="center" valign="top"><input name="UpFileName" type="hidden" id="UpFileName" value="None"></td> </tr> </table> </form> </body> </html>