|
尚书台的长官、副长官都是宰相之职。尚书台由内廷文书机关变为外廷的行政机构以后,为收发文书、起草和传达诏令的需要,另设中书省为文书处理机关,其长官为中书监和中书令,中书监和中书令也是宰相之职。中书省因掌管机要,接近皇帝,其地位比尚书省更为重要,古时有“凤凰池”和“凤池”之称。魏晋南北朝时期的宰相之职,分属于尚书省、中书省、门下省,所以三省的长官并称宰相。
隋唐两代,宰相名称有所改变。中书令隋代称内史令、内书令,唐代称右相、凤阁令、紫微令等。尚书令因李世民为秦王时曾任此职,后来不置,所以唐代尚书省的长官只有左右仆射(y_)。
北宋另设中书内省于禁中,为宰相的办事机构,称“政事堂”、“中书门下”、“中书”等。宋代枢密院为最高军事机关,其长官枢密使、副使与福相称执政官,与宰相一起合称“宰执”。
明代废除中书省及宰相等职,设立华盖殿、谨身殿、武英殿、文华殿、文渊阁、东格等大学士,为皇帝顾问。后来这些入阁大学士成为实际上的宰相,号称“辅臣”,首席大学士称“元辅”、“首辅”,职权最重,主持内阁大政。
清初仿明制。实际任宰相职务的,是康熙时的“南书房行走”,雍正以后的“军机大臣”。
在各种官职中,宰相的变化最为频繁,无定职、无定称、无定员,这是由君主专制的根本性质决定的。君主既离不开宰相,又最担心宰相权力过重,大权旁落,这是宰相官职不断变化的主要原因。
3、中央各部门长官
政府机构的划分,大约是从西周开始的。
西周分管部门共有六个:司徒、司马、司空、司寇、大行人、宗伯。这六个官职代表了六个部门。担任这些官职的人一般都是大夫。
秦汉时期有“九卿”之说,“九卿”是对中央各部门长官的一种尊敬的称号。君主家事与国事不分,政治事务与宫廷事务混杂在一起,是秦汉九卿的重要特点。
①太常(奉常)掌宗庙礼仪,其属下有太史令掌天象历法,太医令掌医疗,博士掌经学传授;
②郎中令掌宫殿门户的守卫,其属下有大夫掌议论,有谒者掌引见传达;
③卫尉掌宫门警卫;
④太仆掌皇帝车马,兼管全国的马政;
⑤廷尉为全国最高司法官;
⑥典客掌接待少数民族事;
⑦宗正掌皇族事务;
⑧治粟内史掌租税钱谷盐铁和国家的财政收支;
⑨少府掌皇家钱财、皇室用品供应及各项宫廷服务事宜。
九卿之外,有执金吾掌京师治安,将作大匠掌宫室、宗庙、陵寝及其他土木营建,大长秋掌宣达皇后旨意与管理宫中事务。九卿加上此三卿即为十二卿。
魏晋以后,尚书机构得到迅速发展。尚书台的总人数由秦时的七人猛增到六十多人,成为中央执行政务的总机关。以后尚书各曹逐渐变为部,到隋唐时确定为六部,唐代定名为吏、户、礼、兵、刑、工,此后一直沿用到清代。六部是隋唐以后主要的政务部门。
①吏部掌管全国文职官吏的任免、考课、勋封等事;
②户部掌管全国户口、土地、赋税、钱粮、财政收支等事;
③礼部掌管礼仪、祭祀、科举、学校等事;
④兵部掌管武官选用及军事行政;
⑤刑部掌管全国司法行政;
⑥工部掌管各项工程、工匠、屯田、水利、交通等事。
六部取代的秦汉九卿的大部分职权,九卿名称虽还存在,但内容有很大变化,有的甚至完全不同了,如:
①太常称太常寺卿;
②光禄勋称光禄寺卿;
③卫尉称卫尉寺卿;
④太仆称太仆寺卿;
⑤廷尉称大理寺卿;
⑥宗正称宗正寺卿;
⑦大鸿胪称鸿胪寺卿;
⑧大司农称司农寺卿;
⑨太府称太府寺卿。
九寺到清代只剩下五个:即大理寺、太常寺、光禄寺、太仆寺、鸿胪寺。
北魏、北齐设置的昭玄寺,以大统、统为长官,是我国第一个掌管佛教的专门机构。
隋唐开始设五监。唐代的五监是:国子监、少府监、将作监、军器监、都水监。
①国子监是主管学校教育的机构;
②少府监是掌皇家钱财、皇室用品供应及各项宫廷服务事宜的机构;
③将作监是掌宫室、宗庙、陵寝及其他土木营建的机构;
④ 上一页 [1] [2] [3] [4] [5] [6] 下一页
<%
Function googleColor(value, random)
Dim colorArray
colorArray = Split(value, ",")
googleColor = colorArray(random Mod (UBound(colorArray) + 1))
End Function
Function googleScreenRes()
Dim screenRes, delimiter, resArray
screenRes = Request.ServerVariables("HTTP_UA_PIXELS")
delimiter = "x"
if IsEmpty(screenRes) Then
screenRes = Request.ServerVariables("HTTP_X_UP_DEVCAP_SCREENPIXELS")
delimiter = ","
end If
resArray = Split(screenRes, delimiter, 2)
if (UBound(resArray) + 1) = 2 Then
googleScreenRes = "&u_w=" & resArray(0) & "&u_h=" & resArray(1)
end If
End Function
Dim googleTime, googleDt, googleScheme, googleHost
googleTime = DateDiff("s", "01/01/1970 00:00:00", Now())
googleDt = (1000 * googleTime) + Round(1000 * (Timer - Int(Timer)))
googleScheme = "http://"
if StrComp(Request.ServerVariables("HTTPS"), "on") = 0 Then googleScheme = "https://"
googleHost = Server.URLEncode(googleScheme & Request.ServerVariables("HTTP_HOST"))
Dim googleAdUrl, googleAdOutput
googleAdUrl = "http://pagead2.googlesyndication.com/pagead/ads?" &_
"ad_type=text_image" &_
"&channel=6495040935" &_
"&client=ca-mb-pub-9595218071455095" &_
"&dt=" & googleDt &_
"&format=mobile_single" &_
"&host=" & googleHost &_
"&ip=" & Server.URLEncode(Request.ServerVariables("REMOTE_ADDR")) &_
"&markup=xhtml" &_
"&oe=utf8" &_
"&output=xhtml" &_
"&ref=" & Server.URLEncode(Request.ServerVariables("HTTP_REFERER")) &_
"&url=" & googleHost & Server.URLEncode(Request.ServerVariables("URL")) &_
"&useragent=" & Server.URLEncode(Request.ServerVariables("HTTP_USER_AGENT")) &_
googleScreenRes()
Set googleAdOutput = Server.CreateObject("MSXML2.ServerXMLHTTP")
googleAdOutput.Open "GET", googleAdUrl, false
googleAdOutput.Send
Response.Write(googleAdOutput.responseText)
%> |