?? add.asp
字號:
<!--#include file = "Startup.asp"-->
<%
' ======================
' 功能:增加新聞
' 描述:提供一個新增表單,包括新聞標題和新聞內(nèi)容,新聞內(nèi)容使用eWebEditor進行編輯;
' 同時接收上傳文件,以便刪除新聞時,同時刪除上傳文件;
' 并由編輯區(qū)中上傳的文件,提供標題新聞的圖片選擇。
' ======================
Call Header("增加新聞")
Call Content()
Call Footer()
' 本頁內(nèi)容區(qū)
Sub Content()
%>
<Script Language=JavaScript>
// 當上傳圖片等文件時,往下拉框中填入圖片路徑,可根據(jù)實際需要更改此函數(shù)
function doChange(objText, objDrop){
if (!objDrop) return;
var str = objText.value;
var arr = str.split("|");
var nIndex = objDrop.selectedIndex;
objDrop.length=1;
for (var i=0; i<arr.length; i++){
objDrop.options[objDrop.length] = new Option(arr[i], arr[i]);
}
objDrop.selectedIndex = nIndex;
}
// 表單提交客戶端檢測
function doSubmit(){
if (document.myform.d_title.value==""){
alert("新聞標題不能為空!");
return false;
}
// getHTML()為eWebEditor自帶的接口函數(shù),功能為取編輯區(qū)的內(nèi)容
if (eWebEditor1.getHTML()==""){
alert("新聞內(nèi)容不能為空!");
return false;
}
document.myform.submit();
}
// 表單提交客戶端檢測
function doCheck(){
if (document.myform.d_title.value==""){
alert("新聞標題不能為空!");
return false;
}
// getHTML()為eWebEditor自帶的接口函數(shù),功能為取編輯區(qū)的內(nèi)容
if (eWebEditor1.getHTML()==""){
alert("新聞內(nèi)容不能為空!");
return false;
}
// 表單有效性檢測完后,自動上傳遠程文件
// 函數(shù):remoteUpload(strEventUploadAfter)
// 參數(shù):strEventUploadAfter ; 上傳完后,觸發(fā)的函數(shù)名,如果上傳完后不需動作可不填參數(shù)
eWebEditor1.remoteUpload("doSubmit()");
return false;
}
// 表單提交(當遠程上傳完成后,觸發(fā)此函數(shù))
function doSubmit(){
document.myform.submit();
}
</Script>
<form action="addsave.asp" method="post" name="myform" onsubmit="return doCheck();">
<% '取源文件名 %>
<input type=hidden name=d_originalfilename>
<% '取保存的方件名,如果不要帶路徑的填充下拉框,可以在下面的表單項加入onchange事件 %>
<input type=hidden name=d_savefilename>
<% '取保存的文件名(帶路徑),使用帶路徑的填充下拉框 %>
<input type=hidden name=d_savepathfilename onchange="doChange(this,document.myform.d_picture)">
<table cellspacing=3 align=center>
<tr>
<td>新聞標題:</td>
<td><input type="text" name="d_title" value="" size="90"></td>
</tr>
<tr>
<td>標題圖片:</td>
<td><select name="d_picture" size=1><option value=''>無</option></select> 當編輯區(qū)有插入圖片時,將自動填充此下拉框</td>
</tr>
<tr>
<td>新聞內(nèi)容:</td>
<td>
<%
' ewebeditor.asp文件調(diào)用的參數(shù):
' id:下面表單項textarea的名稱,在此表單中是d_content,注意大小寫
' style:編輯器的樣式名稱,可在eWebEditor的后臺設置
' originalfilename:用于獲取源文件名的表單項名,在此表單中是d_originalfilename
' savefilename:用于獲取保存文件名的表單項名,在此表單中是d_savefilename
' savepathfilename:用于獲取保存帶路徑文件名的表單項名,在此表單中是d_savepathfilename
%>
<textarea name="d_content" style="display:none"></textarea>
<iframe ID="eWebEditor1" src="../../ewebeditor.asp?id=d_content&style=s_newssystem&originalfilename=d_originalfilename&savefilename=d_savefilename&savepathfilename=d_savepathfilename" frameborder="0" scrolling="no" width="550" HEIGHT="350"></iframe>
</td>
</tr>
</table>
<p align=center><input type=submit name=btnSubmit value=" 提 交 "> <input type=reset name=btnReset value=" 重 填 "></p>
</form>
<%
End Sub
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -