以下是menu.asp**
程式**
'---------------------------------------
'作者:野 草
'日期:2023年4月24日
'q q:94440079
'---------------------程式設計客棧------------------
'讀取xml檔案函式
function ycms_menu()
dim menu_temp,m
set goxml=server.createobject("microsoft.xmldom")
goxml.load(server.mappath("menu.xml"))
set goroot=goxml.documentelement.selectsinglenode("menu")
m=0
for each child in goroot.childnodes
set childmenu=goroot.childnodes.item(m)
dim menu_open,menu_title,menu_url
menu_open=childmenu.getattributenode("open").nodevalue
menu_name=childmenu.getattributenode("name").nodevalue
menu_url=goroot.childnodes.item(m).text
'判斷是否是彈出視窗
if menu_open=0 then
'判斷是否是第乙個,若是第乙個則去掉"┊"
if m=0 then
menu_temp=menu_temp&""&menu_name&""
else
menu_temp=menu_temp&"┊"&menu_name&""
end if
else
if m=0 then
menu_temp=menu_temp&""&menu_name&""
else
menu_temp=menu_temp&"┊"&menu_name&""
end if
end if
set childwww.cppcns.commenu=nothing
m=m+1
next
set goroot=nothing
set goxml=nothing
ycms_menu=menu_temp
end function
'輸出xml選單
response.write(ycms_menu())
%>
以下是menu.xml**:
程式**
<?xml version="1.0" encoding="gb2312"?>
**首頁" open="0">index.asp
news.asp
art.asp
程式設計客棧;pic.asp
dj.asp
down.asp
book.asp
link.asp
admin_menu.asp 後台管理xml檔案部分
以下是admin_menu.asp
程式**
'利用ado.stream元件儲存檔案
function s**e(file_body,file_name)
set os=server.createobject("adodb.stream")
os.type=2
os.open
os.charset="gb2312"
os.position=os.size
os.writetext=file_body
os.s**etofile server.mappath(file_name),2
os.close
set os=nothing
end function
if request.querystring("action")="ok" then
call s**e(request.form("content"),"menu.xml")
end if
%>
程式設計客棧gt;
本文標題: asp xml製作選單管理程式
本文位址:
RPM套件管理程式
一 定義 rpm redhat package management 是以一種資料庫記錄的方式將所需要的套件安裝到linux主機的一套管理程式。它的特點是將要安裝的套件先編譯並打包,通過包裝好的套件中預設的資料庫記錄,記錄這個套件在安裝的時候需要依賴屬性模組。在安裝的時候,rpm會先根據套間裡的記錄...
linux 桌面管理程式
gome 2 kde 3 xmonade 在ubuntu下安裝這些 非常簡單,只需要 sudo apt get install 命令就可以完成 解除安裝以gnome為例 ctrl alt f1 f6,抑或進入恢復模式 黑屏情況下顯示卡出現問題只能在無圖形化介面下進行操作 sudo apt get r...
日誌管理程式rsyslog
0 emerg 系統不可用 1 alert 特別留意的報警資訊.2 crit 非常嚴重的狀況 3 err 錯誤資訊.4 warning 警告資訊 5 notice 稍微需要注意的資訊.6 info 正常資訊 7 debug 除錯資訊,開發人員使用.用來分個服務和日誌級別 任何服務,或者任何級別 表示...