<%
if Instr(session("AdminPurview"),"|13,")=0 then
response.write ("
您没有管理该模块的权限!
")
response.end
end if
dim Result
Result=request.QueryString("Result")
dim ID,PriceNameCh,PriceNameEn,ViewFlagCh,ViewFlagEn,SortNameCh,SortID,SortPath
dim GroupID,GroupIdName,Exclusive,NoticeFlag,SourceCh,SourceEn,ContentCh,ContentEn,SeoKeywordsCH,SeoKeywordsEN,SeoDescriptionCH,SeoDescriptionEN,Show
ID=request.QueryString("ID")
call PriceEdit()
call AdminSiteInfo
%>