程元振(?～764年)，唐代宗时大宦官。京兆三原(今陕西三原县)人。少年即入宫为宦者，直内侍省，累升为-生使、飞龙厩副使。
宝应元年(762)四月，肃宗皇帝病重，时张皇后与皇太子李豫关系不睦，恐太子即位后对自己不利，于是便召越王李系入宫，密谋发动政变，篡夺皇位。他们派内谒者监段恒俊挑选了200名年轻力壮的宦官，由越王李系亲自发给兵器，准备就绪后，张皇后派人召太子李豫进宫，企图谋杀太子。此事被程元振得知，他即找李辅国商议。二人领着禁军埋伏在李豫进宫时必经的陵霄门，待李豫来到，拦住李豫，告诉他张皇后等的阴谋，将李豫护送到飞龙厩隐藏起来。程、李二人领着禁军冲入宫中，逮捕了越王李系、段恒俊等，囚禁了张皇后。是夜，肃宗卒，程元振与李辅国主持拥立太子李豫即皇帝位，是为代宗。
代宗即位，以程元振有拥立之功，拜他为右监门将军，知内侍省事，掌管了皇宫大权。不久，又让他担任元帅行军司马。加镇军大将军、右监门卫大将军，封保宣县侯，统领禁军。九月，再迁骠骑大将军，进封邠(彬)国公，权势显赫。他和李辅国把持着朝廷内外军政大权，可以擢升官吏，可以处死将军。原淮西节度使王仲升与安史叛军作战失败被俘，叛乱平息后得释返朝，程元振为了网络亲信，便将其推荐为右羽林军大将军兼御史大夫。开了将军兼大夫的先例。在此之前，程元振企图笼络襄阳节度使来瑱为亲信，来瑱不肯附会。王仲升回朝后，程元振唆使王仲升诬陷来瑱，以皇帝之命将来瑱调入朝杀害。另有大臣裴冕，因事与程元振相违，又被嫁祸贬为施州刺史。再有同华节度使李怀让，受程元振诬陷，忧愤 。这样以来，各镇节度使、大将皆惧怕权奸谋害，疏远了朝廷，拥兵自保。
广德元年(763)十月，吐蕃、党项出兵东侵，一直打到关中西部的武功、乾县一带，代宗下诏调兵，各地节度使、将军无一人应命出兵勤王，致使吐蕃军攻下长安，代宗星夜仓惶出逃陕州，京城长安被乱兵抢掠洗劫一空，百姓遭受家破人亡之苦。于是，太常博士、翰林待诏柳伉向代宗上疏切谏，请求杀程元振以谢天下。疏说：“吐蕃、党项军队数万入关度陇，历秦渭，掠邠、泾，不血刃而入长安。在敌入寇关头，谋臣一言不发，武将不肯出战，三辅百姓也不愿护卫朝廷，此乃四方内外皆与皇帝离心叛道之势，究其原因，是皇帝疏远贤良，专宠宦官的结果。为挽救社稷，立斩程元振。皇帝自己削尊号，下诏引咎，率德励行，天下人必服。”代宗阅罢，不肯斩程元振，只下令尽削他的官，放归田里。
广德二年(764)十一月，郭子仪率军队收复了长安，代宗从陕州返回京城。程元振又从三原潜入长安，企图再见皇帝，以求任用。被御史发现，上疏弹劾，代宗才下令将他流放溱州(在今四川綦江县境)。行至江陵(今湖北江陵县)而死。