📄 insertvideo.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%option explicit%>
<!--#include file="../Conn.asp"-->
<!--#include file="../SysCls/KS_CommonCls.asp"-->
<!--#include file="../Inc/Session1.asp"-->
<%
'===================================================================================================================
'软件名称:科汛网站管理系统
'当前版本:科汛网站管理系统 V2.2 SP2 Free
'Copyright (C) 2006-2008 Kesion.Com All rights reserved.
'产品咨询QQ:9537636,41904294
'技术支持QQ:111394,54004407
'程序版权:科汛网络
'程序开发:科汛网络开发组(总策划:林文仲)
'E-Mail :kesioncms@hotmail.com webmaster@kesion.com
'官方网站:http://www.kesion.com
'演示站点:http://test.kesion.com
'郑重声明:
' ①、免费版本请在程序首页保留版权信息,并做上本站LOGO友情连接,商业版本无此要求;
' ②、任何个人或组织不得在授权允许的情况下删除、修改、拷贝本软件及其他副本上一切关于版权的信息;
' ③、科汛网络保留此软件的法律追究权利
'===================================================================================================================
Response.Buffer = True
Response.Expires = -1
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
Dim KSCls
Set KSCls = New InsertVideo
KSCls.Execute()
Set KSCls = Nothing
Class InsertVideo
Private KSCMS
Private AdminDir
Private ChannelID
Private FromUrl
Private CurrPath,InstallDir
Private Sub Class_Initialize()
Set KSCMS=New CommonCls
End Sub
Private Sub Class_Terminate()
Set KSCMS=Nothing
End Sub
Public Sub Execute()
FromUrl=KSCMS.G("FromUrl")
IF FromUrl=1 Then '后台调用,检查是否登录
Dim KSLoginCls
Set KSLoginCls = New LoginCheckCls1
KSLoginCls.Execute()
Set KSLoginCls= Nothing
End IF
ChannelID = KSCMS.G("ChannelID")
CurrPath=KSCMS.ReturnChannelUpFilesDir(ChannelID)
AdminDir=KSCMS.GetDomain & KSCMS.GetConfig("AdminDir")
Set KSCMS=Nothing
%>
<HTML><HEAD><TITLE>插入视频文件</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="Editor.css">
<script language="JavaScript" src="../inc/Common.js"></script>
<script language="JavaScript">
function OK(){
var str1="";
var autoplayvalue;
var strurl=document.VideoForm.url.value;
if (!IsExt(strurl,'avi|wmv|asf|mpg|mp3'))
{
alert('文件类型不对,请重新选择!');
document.VideoForm.url.focus();
return;
}
if (strurl==""||strurl=="http://")
{
alert("请先输入视频文件地址,或者上传视频文件!");
document.VideoForm.url.focus();
return false;
}
else
{
if (VideoForm.autoplay.checked==true)
{autoplayvalue=1;}
else
{autoplayvalue=0;}
str1="<OBJECT id=MediaPlayer1"
str1=str1+=" codeBase=http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=5,1,52,701standby=Loading"
str1=str1+=" type=application/x-oleobject height="+document.VideoForm.height.value+" width="+document.VideoForm.width.value
str1=str1+=" classid=CLSID:6BF52A52-394A-11d3-B153-00C04F79FAA6 VIEWASTEXT>"
str1=str1+=" <PARAM NAME=\"URL\" value="+document.VideoForm.url.value+">"
str1=str1+=" <param name=\"AudioStream\" value=\"-1\">"
str1=str1+=" <param name=\"AutoSize\" value=\"0\">"
str1=str1+=" <param name=\"AutoStart\" value=\""+autoplayvalue+"\">"
str1=str1+=" <param name=\"AnimationAtStart\" value=\"0\">"
str1=str1+=" <param name=\"AllowScan\" value=\"-1\">"
str1=str1+=" <param name=\"AllowChangeDisplaySize\" value=\"-1\">"
str1=str1+=" <param name=\"AutoRewind\" value=\"0\">"
str1=str1+=" <param name=\"Balance\" value=\"0\">"
str1=str1+=" <param name=\"BaseURL\" value>"
str1=str1+=" <param name=\"BufferingTime\" value=\"5\">"
str1=str1+=" <param name=\"CaptioningID\" value>"
str1=str1+=" <param name=\"ClickToPlay\" value=\"-1\">"
str1=str1+=" <param name=\"CursorType\" value=\"0\">"
str1=str1+=" <param name=\"CurrentPosition\" value=\"-1\">"
str1=str1+=" <param name=\"CurrentMarker\" value=\"0\">"
str1=str1+=" <param name=\"DefaultFrame\" value>"
str1=str1+=" <param name=\"DisplayBackColor\" value=\"0\">"
str1=str1+=" <param name=\"DisplayForeColor\" value=\"16777215\">"
str1=str1+=" <param name=\"DisplayMode\" value=\"0\">"
str1=str1+=" <param name=\"DisplaySize\" value=\"4\">"
str1=str1+=" <param name=\"Enabled\" value=\"-1\">"
str1=str1+=" <param name=\"EnableContextMenu\" value=\"-1\">"
str1=str1+=" <param name=\"EnablePositionControls\" value=\"0\">"
str1=str1+=" <param name=\"EnableFullScreenControls\" value=\"0\">"
str1=str1+=" <param name=\"EnableTracker\" value=\"-1\">"
str1=str1+=" <param name=\"InvokeURLs\" value=\"-1\">"
str1=str1+=" <param name=\"Language\" value=\"-1\">"
str1=str1+=" <param name=\"Mute\" value=\"0\">"
str1=str1+=" <param name=\"PlayCount\" value=\"1\">"
str1=str1+=" <param name=\"PreviewMode\" value=\"0\">"
str1=str1+=" <param name=\"Rate\" value=\"1\">"
str1=str1+=" <param name=\"SAMILang\" value>"
str1=str1+=" <param name=\"SAMIStyle\" value>"
str1=str1+=" <param name=\"SAMIFileName\" value>"
str1=str1+=" <param name=\"SelectionStart\" value=\"-1\">"
str1=str1+=" <param name=\"SelectionEnd\" value=\"-1\">"
str1=str1+=" <param name=\"SendOpenStateChangeEvents\" value=\"-1\">"
str1=str1+=" <param name=\"SendWarningEvents\" value=\"-1\">"
str1=str1+=" <param name=\"SendErrorEvents\" value=\"-1\">"
str1=str1+=" <param name=\"SendKeyboardEvents\" value=\"0\">"
str1=str1+=" <param name=\"SendMouseClickEvents\" value=\"0\">"
str1=str1+=" <param name=\"SendMouseMoveEvents\" value=\"0\">"
str1=str1+=" <param name=\"SendPlayStateChangeEvents\" value=\"-1\">"
str1=str1+=" <param name=\"ShowCaptioning\" value=\"0\">"
str1=str1+=" <param name=\"ShowControls\" value=\"-1\">"
str1=str1+=" <param name=\"ShowAudioControls\" value=\"-1\">"
str1=str1+=" <param name=\"ShowDisplay\" value=\"0\">"
str1=str1+=" <param name=\"ShowGotoBar\" value=\"0\">"
str1=str1+=" <param name=\"ShowPositionControls\" value=\"-1\">"
str1=str1+=" <param name=\"ShowStatusBar\" value=\"-1\">"
str1=str1+=" <param name=\"ShowTracker\" value=\"-1\">"
str1=str1+=" <param name=\"TransparentAtStart\" value=\"-1\">"
str1=str1+=" <param name=\"VideoBorderWidth\" value=\"0\">"
str1=str1+=" <param name=\"VideoBorderColor\" value=\"0\">"
str1=str1+=" <param name=\"VideoBorder3D\" value=\"0\">"
str1=str1+=" <param name=\"Volume\" value=\"70\">"
str1=str1+=" <param name=\"WindowlessVideo\" value=\"0\">"
str1=str1+="</OBJECT>"
window.returnValue = str1+"$$$"+document.VideoForm.UpFileName.value;
window.close();
}
}
function windowplay(){
var str1="";
if(document.VideoForm.url.value=="http://"){
document.VideoForm.url.value=""
}
str1="<OBJECT id=MediaPlayer1"
str1=str1+=" codeBase=http://activex.microsoft.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=5,1,52,701standby=Loading"
str1=str1+=" type=application/x-oleobject height="+document.VideoForm.height.value+" width="+document.VideoForm.width.value
str1=str1+=" classid=CLSID:6BF52A52-394A-11d3-B153-00C04F79FAA6 VIEWASTEXT>"
str1=str1+=" <PARAM NAME=\"URL\" value="+document.VideoForm.url.value+">"
str1=str1+=" <param name=\"AudioStream\" value=\"-1\">"
str1=str1+=" <param name=\"AutoSize\" value=\"0\">"
str1=str1+=" <param name=\"AutoStart\" value=\"-1\">"
str1=str1+=" <param name=\"AnimationAtStart\" value=\"0\">"
str1=str1+=" <param name=\"AllowScan\" value=\"-1\">"
str1=str1+=" <param name=\"AllowChangeDisplaySize\" value=\"-1\">"
str1=str1+=" <param name=\"AutoRewind\" value=\"0\">"
str1=str1+=" <param name=\"Balance\" value=\"0\">"
str1=str1+=" <param name=\"BaseURL\" value>"
str1=str1+=" <param name=\"BufferingTime\" value=\"5\">"
str1=str1+=" <param name=\"CaptioningID\" value>"
str1=str1+=" <param name=\"ClickToPlay\" value=\"-1\">"
str1=str1+=" <param name=\"CursorType\" value=\"0\">"
str1=str1+=" <param name=\"CurrentPosition\" value=\"-1\">"
str1=str1+=" <param name=\"CurrentMarker\" value=\"0\">"
str1=str1+=" <param name=\"DefaultFrame\" value>"
str1=str1+=" <param name=\"DisplayBackColor\" value=\"0\">"
str1=str1+=" <param name=\"DisplayForeColor\" value=\"16777215\">"
str1=str1+=" <param name=\"DisplayMode\" value=\"0\">"
str1=str1+=" <param name=\"DisplaySize\" value=\"4\">"
str1=str1+=" <param name=\"Enabled\" value=\"-1\">"
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -