<% If InStr(pTag,"user")=0 Then Response.Write "您的權限不足" Response.Write "" Response.Write "
" Response.Write "

" Response.Write "

敬愛的" & pName & "
" Response.Write "您不是網管者
不允許您進入

" Response.Write "

" Response.Write "

" Response.Write "

" Response.Write "
" Response.Write "" Response.Write "" Else%> 新增最新消息

新增網站日誌
公告主旨：
公告內容：
請選擇心情圖案：
選擇

<%End If%>