<%@LANGUAGE="VBSCRIPT"%> <% set news = Server.CreateObject("ADODB.Recordset") news.ActiveConnection = MM_xj_STRING news.Source = "SELECT ID, title, time, pic FROM news ORDER BY ID DESC" news.CursorType = 0 news.CursorLocation = 2 news.LockType = 3 news.Open() news_numRows = 0 %> <% set picnews = Server.CreateObject("ADODB.Recordset") picnews.ActiveConnection = MM_xj_STRING picnews.Source = "SELECT ID, pic, alt FROM picnews ORDER BY ID DESC" picnews.CursorType = 0 picnews.CursorLocation = 2 picnews.LockType = 3 picnews.Open() picnews_numRows = 0 %> <% set pic = Server.CreateObject("ADODB.Recordset") pic.ActiveConnection = MM_xj_STRING pic.Source = "SELECT ID, pic FROM news ORDER BY ID DESC" pic.CursorType = 0 pic.CursorLocation = 2 pic.LockType = 3 pic.Open() pic_numRows = 0 %> <% set ynews = Server.CreateObject("ADODB.Recordset") ynews.ActiveConnection = MM_xj_STRING ynews.Source = "SELECT ID, title, time FROM ynews ORDER BY ID DESC" ynews.CursorType = 0 ynews.CursorLocation = 2 ynews.LockType = 3 ynews.Open() ynews_numRows = 0 %> <% set stars = Server.CreateObject("ADODB.Recordset") stars.ActiveConnection = MM_xj_STRING stars.Source = "SELECT * FROM stars ORDER BY ID DESC" stars.CursorType = 0 stars.CursorLocation = 2 stars.LockType = 3 stars.Open() stars_numRows = 0 %> <% Dim Repeat4__numRows Repeat4__numRows = 5 Dim Repeat4__index Repeat4__index = 0 pic_numRows = pic_numRows + Repeat4__numRows %> <% Dim Repeat2__numRows Repeat2__numRows = 5 Dim Repeat2__index Repeat2__index = 0 ynews_numRows = ynews_numRows + Repeat2__numRows %> <% Dim Repeat1__numRows Repeat1__numRows = 5 Dim Repeat1__index Repeat1__index = 0 news_numRows = news_numRows + Repeat1__numRows %> <% ' *** Move To Record: handle 'index' or 'offset' parameter if (Not MM_paramIsDefined And MM_rsCount <> 0) then ' use index parameter if defined, otherwise use offset parameter r = Request.QueryString("index") If r = "" Then r = Request.QueryString("offset") If r <> "" Then MM_offset = Int(r) ' if we have a record count, check if we are past the end of the recordset If (MM_rsCount <> -1) Then If (MM_offset >= MM_rsCount Or MM_offset = -1) Then ' past end or move last If ((MM_rsCount Mod MM_size) > 0) Then ' last page not a full repeat region MM_offset = MM_rsCount - (MM_rsCount Mod MM_size) Else MM_offset = MM_rsCount - MM_size End If End If End If ' move the cursor to the selected record i = 0 While ((Not MM_rs.EOF) And (i < MM_offset Or MM_offset = -1)) MM_rs.MoveNext i = i + 1 Wend If (MM_rs.EOF) Then MM_offset = i ' set MM_offset to the last possible record End If %> <% ' *** Move To Record: if we dont know the record count, check the display range If (MM_rsCount = -1) Then ' walk to the end of the display range for this page i = MM_offset While (Not MM_rs.EOF And (MM_size < 0 Or i < MM_offset + MM_size)) MM_rs.MoveNext i = i + 1 Wend ' if we walked off the end of the recordset, set MM_rsCount and MM_size If (MM_rs.EOF) Then MM_rsCount = i If (MM_size < 0 Or MM_size > MM_rsCount) Then MM_size = MM_rsCount End If ' if we walked off the end, set the offset based on page size If (MM_rs.EOF And Not MM_paramIsDefined) Then If (MM_offset > MM_rsCount - MM_size Or MM_offset = -1) Then If ((MM_rsCount Mod MM_size) > 0) Then MM_offset = MM_rsCount - (MM_rsCount Mod MM_size) Else MM_offset = MM_rsCount - MM_size End If End If End If ' reset the cursor to the beginning If (MM_rs.CursorType > 0) Then MM_rs.MoveFirst Else MM_rs.Requery End If ' move the cursor to the selected record i = 0 While (Not MM_rs.EOF And i < MM_offset) MM_rs.MoveNext i = i + 1 Wend End If %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" MM_keepURL="":MM_keepForm="":MM_keepBoth="":MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each Item In Request.QueryString NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepURL = MM_keepURL & NextItem & Server.URLencode(Request.QueryString(Item)) End If Next ' add the Form variables to the MM_keepForm string For Each Item In Request.Form NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepForm = MM_keepForm & NextItem & Server.URLencode(Request.Form(Item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm if (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) if (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) if (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> <% ' *** Move To Record: set the strings for the first, last, next, and previous links MM_keepMove = MM_keepBoth MM_moveParam = "index" ' if the page has a repeated region, remove 'offset' from the maintained parameters If (MM_size > 0) Then MM_moveParam = "offset" If (MM_keepMove <> "") Then params = Split(MM_keepMove, "&") MM_keepMove = "" For i = 0 To UBound(params) nextItem = Left(params(i), InStr(params(i),"=") - 1) If (StrComp(nextItem,MM_moveParam,1) <> 0) Then MM_keepMove = MM_keepMove & "&" & params(i) End If Next If (MM_keepMove <> "") Then MM_keepMove = Right(MM_keepMove, Len(MM_keepMove) - 1) End If End If End If ' set the strings for the move to links If (MM_keepMove <> "") Then MM_keepMove = MM_keepMove & "&" urlStr = Request.ServerVariables("URL") & "?" & MM_keepMove & MM_moveParam & "=" MM_moveFirst = urlStr & "0" MM_moveLast = urlStr & "-1" MM_moveNext = urlStr & Cstr(MM_offset + MM_size) prev = MM_offset - MM_size If (prev < 0) Then prev = 0 MM_movePrev = urlStr & Cstr(prev) %> 欢迎访问“谢晋影视艺术学院”网站
 
 

 

    谢晋

1923年 11月21日出生于浙江省上虞县,在家乡度过童年,并上了一年小学。
  三十年代随父母迁居上海继续读小学。
1938年 赴香港读中学。
1939年 回上海就读于大夏附中、稽山中学高中,业余时间到华光戏剧专科学校、金星电影训练班学习,指导老师有黄佐临、吴仞之等,并参加由于伶等人支持的学生戏剧活动,在多幕剧《岳云》中扮演岳云。
1941年 考入四川江安国立戏剧专科学校话剧科,受教于曹禺、洪深、焦菊隐、马彦祥、陈鲤庭等名家。
1943年 主动辍学,跟随马彦祥、洪深、焦菊隐去重庆中国青年剧社工作,在《少年游》、《槿花之歌》、《黄花岗》、《鸡鸣早看天》、《郁雷》等戏中担任剧务、场记和演员。这一时期,确立了向导演专业发展的艺术志向。
1947年 在南京国立戏剧专科学校导演专业复学,导师余上沅。
1983年 作品:《秋瑾》(导演)意大利举办“谢晋电影回顾展”。
1984年 作品:《高山下的花环》(导演) 获第5届中国电影“金鸡奖”最佳编剧奖、最佳男主角奖、最佳剪辑奖;第8届《大众电影》“百花奖”最佳故事片奖、最佳男演员奖、最佳男配角奖、最佳女配角奖;文化部1984年优秀影片一等奖;《文汇报》、《中国电影时报》新时期十年电影奖(1977一1987)故事片奖、导演奖。

    法国举办“谢晋电影回顾展”

1985年 美国十大城市举办“谢晋电影回顾展”。
1986年 作品:《芙蓉镇》(导演) 获第7届中国电影“金鸡奖”最佳故事片奖、最佳女主角奖、最佳女配角奖、最佳美术奖;第10届《大众电影》“百花奖”最佳故事片奖、最佳男演员奖、最佳女演员奖、最佳男配角奖。获捷克卡罗维.发利国际电影节大奖“水晶球奖”,(演员徐松子获“捷克戏剧家协会评委奖”);捷克第40届劳动人民电影节荣誉奖;民主德国电影家协会颁发的1989年发行影片评论奖、最佳外国故事片评论奖;法国第1届蒙彼利埃电影节“金熊猫奖”。
任第6届中国电影“金鸡奖”评委会主任委员。任美国电影艺术与科学学院委员。
前后曾任威尼斯国际电影节、东京国际电影节、印度国际电影节、塔什于电影节、阿尔及利亚电影节、马尼拉国际电影节评委。
1988年 作品:《最后的贵族》(导演) 获第1届中国电影节荣誉奖。
  任第8届中国电影“金鸡奖”评委会主任委员。任第5届中国文学艺术界联合会执行副主席。任第7届中国人民政治协商会议全国委员会委员;第1届中国残疾人联合会副主席。1989年 任第9届中国电影“金鸡奖”评委会主任委员。
1991年 作品:《清凉寺钟声》(导演)《启明星》(导演)1992年 8月8日谢晋——恒通影视有限公司成立于上海,任公司总经理、法人代表。美国举办“谢晋电影回顾展”。
1993年 作品:《老人与狗》(导演) 获上海电影评论学会1993年“十佳影片”奖。2月任上海谢晋——恒通明星学校校长;上海复旦大学、上海交通大学客座教授。
任第1届上海国际电影节评委会主席。任第8届中国人民政治协商会议全国委员会委员、常务委员;第2届中国残疾人联合会副主席。
1995年 作品:《女儿谷》(导演)获1995年第4届全国大学生电影节特别荣誉奖。5月任上海大学影视艺术技术学院院长;谢晋——恒通影视有限公司董事长。
1996年 任第6届中国文学艺术界联合会执行副主席。
1997年 作品:《鸦片战争》(导演) 获第17届中国电影“金鸡奖”最佳故事片奖、最佳摄影奖、最佳录音奖、最佳道具奖、最佳男配角奖;1997年度中国电影“华表奖”优秀故事片奖;上海影评人奖“永乐怀”1997年“十佳影片”荣誉称号。
1997年 加拿大蒙特利尔国际电影节“美洲特别大奖”。
1998年 任第4届中国长春电影节评委会主席。获香港(海外)文学艺术家协会颁发的中华文学及艺术家金龙奖“当代电影大师”称号。任第9届中国人民政治协商会议全国委员会常务委员。个人荣获上海市文学艺术杰出贡献奖。出版《我对导演艺术的追求》。
2000年 电影《女足9号》

 

 
地址:中国上海市桂林路100号 邮编:200234 电话:021-64322029 64322031 传真:021-54643341
 
本网站版权所有:上海师范大学 谢晋影视艺术学院
 
<% news.Close() %> <% picnews.Close() %> <% pic.Close() %> <% ynews.Close() %> <% stars.Close() %>