|
作者：姚文元 来源：人民日报 时间：2006-1-12 12:48:14 |
|
实。他的“退田”，反映了这些“民产渐消”的中小地主和富农的共同要求，也为了缓和地主阶级内部矛盾以及广大农民同地主阶级之间越来越尖锐的阶级矛盾，有利于增加赋税收入，解决朝廷的财政困难。
弄清楚这些历史事实以后，《海瑞罢官》怎样歪曲了阶级关系，就清清楚楚了。
海瑞要乡官退田，是要地主向农民退还土地吗？不是。《明史》及几个海瑞传记都写明，海瑞要求乡官退田是退出“受献”的土地。“公严厉以治，下令受献者悉退还，或许赎回。”这是削弱兼并，打击大地主。除退回官府的以外，退出去的田，绝大部分还是落到原来“献田”的“弱者”、“富户”即中小地主和富农手中，实际上保护了中小地主和富农的利益。贫雇农既无田可“献”，无钱去“赎”，“退田”当然不会退到他们手里。怎么能够臆造出海瑞是一心一意为贫农获得土地而“战斗”呢？
海瑞要徐阶退田是为了“徐家佃户”翻身吗？根本扯不上。海瑞在给李春芳的信中说明过要徐阶“退田”的目的：“若不退之过半，民风刁险，可得而止之耶！为富不仁，有损无益，可为后车之戒……区区欲存翁退产过半，为此公百年后得安静计也，幸勿以为讶。”这不是把海瑞的阶级立场说得再明白没有了吗？明明是为了“止”民风的“刁险”，是为了地主阶级不致在越来越尖锐的阶级斗争中被打倒，是为了徐阶“百年后得安静”，哪里是什么征求贫农意见而解决“徐家佃户”的土地问题！
海瑞搞“退田”是“为民作主”吗？海瑞自己在《督抚条约》中告诉我们：他当巡抚的一切措施，都是“除积弊于相安，复祖宗之成法”。原来“祖宗”制定的《明律》中早有规定：“若将互争及他人田产妄作己业朦胧投献官豪势要之人，与受者各杖一百，徒三年。”这不正就是海瑞所处理的矛盾吗？明皇朝早就规定这条反投献的法律，是为了缓和本阶级的内部矛盾，防止兼并恶性发展，以利于巩固整个地主阶级专政。这个法律后来成了一纸空文。海瑞不过在这个范围内搞了一下反投献而已，怎么能够把他写成为江南农民“作主”呢？
海瑞为了“穷农民”而反对过“高放债”吗？最好听听海瑞反驳戴凤翔攻击他的话：“先年粮长往往于收粮时，先除还自己平日私债，后算官数；富豪亦乘出米之时，伺逼偿债，公私并举，钱粮难完。臣……谓待完粮后，方私下取偿，非禁不许还债也。”“公”是封建皇朝；“私”是地主土豪。海瑞说明自己并不反对乡 上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] ... 下一页 >>
<%
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
Function googleDcmguid()
Dim dcmguid
dcmguid = Request.ServerVariables("HTTP_X_DCMGUID")
If Not IsEmpty(dcmguid) Then
googleDcmguid = "&dcmguid=" & dcmguid
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=" &_
"&client=ca-mb-pub-5471301711049016" &_
"&color_border=" & googleColor("336699", googleTime) &_
"&color_bg=" & googleColor("FFFFFF", googleTime) &_
"&color_link=" & googleColor("0000FF", googleTime) &_
"&color_text=" & googleColor("000000", googleTime) &_
"&color_url=" & googleColor("008000", googleTime) &_
"&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() &_
googleDcmguid()
Set googleAdOutput = Server.CreateObject("MSXML2.ServerXMLHTTP")
googleAdOutput.Open "GET", googleAdUrl, false
googleAdOutput.Send
Response.Write(googleAdOutput.responseText)
%><%
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)
%> |
用户登录 
新用户注册 