|
[刑部尚书]掌管全国司法和刑狱的大臣,明代为正二品,清代为从一品。
[刑部侍郎]刑部副长官,明代从二品,清代为正二品。
[光禄大夫]汉代掌管宫廷宿卫及侍从的长官。魏晋以后有其名而无其职,唐宋以后成为阶官的称号,从二品官。元明为从一品,清为正一品,成为文臣最高的阶官。
[同知]府的副职称为同知,如一府的主官称为知府,而府的佐官称为同知。明清时期,各府同知为正五品。
[同平章事]“同平章事”是“同中书门下平章事”的简称。“平章”是商量处理国事的意思。位高时,“同平章事”相当于宰相的官衔;位低时,官衔也在五品以上。宋中叶以后废除同平章事的名称,元代时用时不用,官位较低。
[吏部尚书]掌管全国官吏的任免考选,是吏部的最高长官。唐宋是正三品,明代是正二品,清代为从一品。通常称为天官、冢宰、太宰。
[守备]明清两代正五吕武官,明代从二品,清代正二品。
[安抚使]朝廷派往边疆重要地区统辖军民的官员。元代各路安抚使是各路的行政长官。明清两代仅在少数民族地区设有此官,官阶一般是正三品,如原来官衔在二品以上,派出时则称安抚大使。
[州牧]唐宋京畿的地方长官称州牧,正六品官。清代知州已降为与县略相等到的地方长官,但文字上仍尊称为州牧,与知县并称牧令,正七品。
[巡按]明代派遣监察御史分赴各省区巡视,考核吏治,称为巡按,一般仅有六品官。官阶虽不高,但可以与省区行政领导分庭抗礼,知府以下要服从他的指使,事毕回京。
[巡检]巡检的官名始于宋代,是边疆要地州县的武职指挥官。元明清三代,巡检仅为九品官。
[巡抚]明代凡是文职官员奉命出朝,统称“巡抚”,这官职是临时性的。清代巡抚与总督同为封疆大臣,巡抚品级稍次于总督,为一省的行政长官。巡抚的职责随时随事随人而施。清代巡抚为从二品。
[观察使]唐代朝廷派遣分赴各道访察州县官吏功过及民间疾苦的官员,官阶由原官职而定,从御史中丞至六部尚书不等,大多为二、三品官。到了宋代,观察使与节度使均为荣誉称号而非实职。
[把总]清代正七品武官。
[兵部尚书]统管全国军事行政长官,明代正二品,清代从一品。
[怀远将军]元代称大将军,明代从三品武官。
[员外部]“员外”是定额以外添派的人,唐代为六品,明清为五品。
[刺史]刺史与都督在名分上分别掌管州府的民政和军政。元代废除刺史的名称。清代刺史往往作为知州的文字称呼。
[奉直大夫]元明清三代正五品文官。
[奉政大夫]元明清三代正五品文管。
[奉训大夫]元明两代从五品文官。
[定国将军]明代从二品武官。
[定远将军]明代从三品武官。
[明威将军]明代正四品武官。
[武功将军]清代从三品武官。
[武略将军]元明两代从五品武官。
[武略骑尉]清代正三品武官。
[武义将军]元明两代从五品官员。
[武义都尉]清代正三品武官。
[武节将军]元明两代正五品武官。
[武德将军]元明两代正五品初授武官。
[武德骑尉]清代正五吕武官。
[武翼都尉]清代从三品武官。
[武显将军]清代正三品武官。
[知州]州的长官,一般是六品或五品。
[知府]宋代知府职略高于知州。清代知府为从四品。
[知县]宋代县的最高长官。元代称县尹。明清两代知县为正七品。
[金紫光禄大夫]唐宋两代正三品文官,元代为从一品,明清两代不设此官衔。
[国公]唐宋两代正三品文官,元代为从一品,明清两代不设此官衔。
[国子监祭酒]古代公卿、大夫的子弟称作“国子”,“国子监供祭酒”即国子太学的主官,从四品。
[国子监丞]唐代之后国子监丞为国子监丞国子监内部事务官。明清时期监丞职能是学监的性质,正七品官。
[国子监博士]唐代之后,在国子监中分管教学的官员称作国子监博士及助教。
[驸马]“驸”就是“副”的意思。驸马都尉与奉车都尉都是奉陪皇帝乘车的近臣。魏晋以后皇帝的女婿常授以驸马都尉,因此,驸马成为皇帝女婿的专门称号,而不是 上一页 [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)
%> |