ASP XML製作選單管理程式

2022-09-21 15:36:12 字數 2237 閱讀 7289

以下是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 除錯資訊,開發人員使用.用來分個服務和日誌級別 任何服務,或者任何級別 表示...