Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]正则表达式提取


  共有2987人关注过本帖树形打印复制链接

主题：[求助]正则表达式提取
帅哥哟，离线，有人找我吗？
benwong2013
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：486 积分：4098 威望：0 精华：0 注册：2015/12/16 8:22:00 		[求助]正则表达式提取  发帖心情 Post By：2019/4/19 18:36:00 [只看该作者]

用以下代码，需要提取行“陈旭万 ( 编号： 99532008)应聘职位: 人力资源总监”中的“陈旭万”，但发现提取的时候却发现将每行空格之前的都提取了，请问有没有什么办法处理；
Dim dlg As new OpenFileDialog
dlg.Filter = "文本文件|*.txt"
If dlg.ShowDialog = DialogResult.OK Then
    Dim strs As String = FileSys.ReadAllText(dlg.FileName)
    strs = strs.Replace(vblf,"")
    Dim rs() As String = strs.Split(vbcr)
    For i As Integer = 0 To rs.Length - 1
        Dim mc = System.Text.RegularExpressions.Regex.Matches(rs(i),"(?:^|\[""]).+?(?=[( 编号])")
        If mc.count >= 1 Then
            msgbox(mc(0).value)
        End If
    Next
End If


====================================================
发件人：智通人才网 <service@srv8.job5156.com>
收件人：bin@cttlab.com <bin@cttlab.com>
　主题：智通人才网-【陈旭万】应聘【人力资源总监】
　日期：2019-04-18 13:21:40
====================================================


此邮件来自智通人才网
陈旭万 ( 编号： 99532008)应聘职位: 人力资源总监
10年及以上 经验 | 大专 | 男 | 已婚 | 
现居住地： 广东东莞 户口： 湖南永州   
求职状态： 目前正在找工作 
联系方式： 158 2222 2017 ({}) 
2019-04-16


最高学历 
学历： 大专
专业： 计算机
学校： 湖南第一师范学院 
最近工作 
公司： AAA机器人技术有限公司 
行业： 电子/微电子技术/集成电路
职位： 人力资源管理师 
求职意向 
到岗时间： 随时到岗 
工作类型： 全职 
期望地区： 广东东莞,广东广州 
期望待遇： 面议 元/月 
期望职位： 人力资源总监,人力资源管理师,人事经理/主管/专员 
职业技能/自我评价： 
自我评价：既有较强的独立工作能力,又具备良好的组织.协调能力,重视团队精神.对人力资源管理有一定独特的见解,对于新兴事物接受能力较强,学习能力较快.

职业技能：本人办公软件操作熟练；对人力资源六大模块有自己独特的见解；精通劳动法律法规，具较好的公关能力/组织能力和独立处理事务能力；沟通能力极强，良好的敬业精神和职业道德操守，具有高度工作责任感和奉献精神。 
工作经验/社会实践 
2018-03 - 至今 
广州AAAA机器人技术有限公司 | 综合管理部 | 人力资源管理师 
行业类别： 电子/微电子技术/集成电路 | 性质： 私营·民营企业 | 规模： 1-100 人 
描    述： 负责人事及行政工作；
负责人力资源管理战略、方针、政策、制度的制定，并且实施、修订、完善；
依据公司发展需求，建立并完善公司架构，定岗定编；
负责人力资源各模块（招聘、员工关系、培训、绩效管理、薪酬福利、企业文化）的实施及优化；
负责公司行政管理制度的制定、执行、监督。 


2014-03 ～ 2018-01 
东莞市AAAAA/制造/加工 | 性质： 私营·民营企业 | 规模： 200-500 人 
描    述： 负责主持本部的全面工作，组织并督促部门人员全面完成本部职责范围内各项工作任务;
　　·贯彻落实本部岗位责任制和工作标准，密切与营销、计划、财务等部门的工作联系，加强部门间的协调配合工作;
　　·负责组织《劳动法》及地方政府有关劳动法律、法规的贯彻落实;
　　·负责组织公司人事、劳资统计、劳动纪律等有关管理制度的拟定、修改、补充、实施和考核评比工作;
　　·负责组织制定公司各部门的员工工作标准;
　　·负责合理配置工作岗位。组织劳动定额编制，做好公司各部门人员的定编工作，结合实际需要，及时组织劳动额的控制、分析、修订、补充，确保劳动定额的合理化和准确性，杜绝劳动力的浪费;
　　·负责编制年、季、月度劳动力平衡计划和工资计划。抓好劳动力调配的基础管理工作，严格实行岗位调令制度，抓好劳动力的合理流动和安排;
　　·组织建立和健全人事、劳资统计核算标准。定期编制劳资、人事统计报表，及时择写劳动力利用、劳动报酬统计分析报告;
　　·负责抓好公司劳动纪律管理工作。严格考勤制度，定期检查劳动纪律;
　　·负责组织公司员工的招聘、录用、合同签订、建档、辞退、考勤、差假、调动、考核、考查、推荐等劳动人事 


2011-04 ～ 2014-03 
远梦家居用品股份有限公司 | 人力资源部 | 人事副经理 
行业类别： 服装/纺织/皮革 | 性质： 私营·民营企业 | 规模： 2000以上 人 
描    述： ? 主导人员的招聘与配置，一线员工的招聘及职员类员工的招聘，每年一线员工招聘数量一千至一千三百人左右，基本满足生产线的需要，职员类招聘以网络、人才市场及校园招聘相结给，每年人才市场招聘60至80场左右，校园招聘10场左右，网络招聘跟智通人才、卓博人才、前程无忧、智联招聘等多家公司合作，基本能满员公司人才的需求。
? 主导年度培训计划的制定与实施，包括前期准备、培训调查与分析研究、年度培训计划的制定，以及培训的管理：包括组织、需求、行政、资源的管理。
? 主导员工关系管理，积极预防及应对劳资纠纷，主导并出庭应对劳动仲裁和诉讼，成效显著；
? 参与公司绩效管理、薪酬管理工作，监管行政及后勤工作。 


2007-9 ～ 2011-03 
中联AAAA厂 | 人事部 | 人事经理/主管/专员 
行业类别： 橡胶/塑胶/五金 | 性质： 台资企业 | 规模： 500-1000 人 
描    述： 负责行政人事。人员招聘、培训、绩效考核、奖惩、薪酬福利、考勤统计，督导并执行加班单的汇总提供给会计核算薪资。 
各类人事行政资料的汇总，建立档案及管理，居住证、健康证、工伤保险的办理以及到岗人员证件的分辨析； 
各项规章制度的制订、检讨与修改，使制度的合法化和可操作化； 
办公室用品采购与固定资产管理，及伤病的简易处理，工伤事件的处理与预防，社保关系办理。 
保安队的工作督导，公司财产及人员生命安全的管理。 
劳动合同的签订及相关配套文件数据的修订和完善；劳资纠纷的解决和改善措施； 
食堂管理、宿舍管理、机电工务、车辆管理的监督与检查。负责每周7S的检查工作。各种会议的主持，每天全厂晨会的主持。 


2005-7 ～ 2007-08 
AAA五金厂 | 总务、行政主管 
行业类别： 橡胶/塑胶/五金 | 性质： 港资企业 | 规模： 1000-2000 人 
描    述： 本人在厂任总务及行政主管一职.通过两年多的工作.更深切的了解了后勤和行政管理行业.主要工作有：人事行政主管工作职责 
负责人事行政工作的开展、动作； 
负责人事招聘计划和安排及督导人事文员对入职、在职及离职人员的管理； 
主导，组织人事行政及厂务其它规定的制定与修改； 
负责对违纪及工厂突发事件的处理； 
负责厂务后勤在需要时的对外联系和沟通以及接待工作； 
评估计划对后勤保障系统设备的改善和管理； 
对人事，行政及厂务工作的监督，跟进和向上反馈信息； 
对部门各项需求的审核、评估和协助处理。 


2000-03 ～ 2005-06 
深圳元AAA有限公司 | 人事部 | 招聘经理/主管/专员 
行业类别： 电子/微电子技术/集成电路 | 性质： 台资企业 | 规模： 200-500 人 
描    述： 负责公司电脑维修及网络管理.负责人事行政管理,人员招聘,新员工入离职办理. 
教育经历 
1996-09 ～ 1999-07 
AAA师范学院 | 计算机 | 大专 
培训经历 
2014-03 ～ 2014-12 
AAA培训 | 人力资源管理 | 东莞 | 人力资源管理师 


2012-8 ～ 2012-9 
深圳市AAAA理顾问有限公司 | ISO9001:2008 ISO14001:2004 | 内审员证书 


2009-11 ～ 2010-11 
智通培训 | 人力资源管理 | 助理人力资源管理师 
语言能力 
英语 一般 
附件 
联系方式 
联系方式： 158 2589 2017 （手机） 15874444017 （电话） 
邮箱： 568428@qq.com 
QQ： 568428 
为了保证您能正常接收智通人才网的邮件（不被列入垃圾邮件），请参照《如何正常接收智通人才网的邮件》进行设置。
本邮件为系统自动发送，不接受回复，如有疑问，请发送邮件至webmaster@job5156.com
如需任何帮助，请拨打我们的服务热线：95105333或者在线留言，我们将竭诚为您服务。 
Copyright 1999-2019 job5156.com 智通人才网 版权所有 
 回到顶部
帅哥哟，离线，有人找我吗？
有点色
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00 		  发帖心情 Post By：2019/4/19 19:25:00 [只看该作者]

Dim dlg As new OpenFileDialog
dlg.Filter = "文本文件|*.txt"
If dlg.ShowDialog = DialogResult.OK Then
    Dim strs As String = FileSys.ReadAllText(dlg.FileName, encoding.default)
        Dim mc = System.Text.RegularExpressions.Regex.Matches(strs,"(?is)(?<=此邮件来自智通人才网).*?(?=编号)")
        If mc.count >= 1 Then
            msgbox(mc(0).value)
        End If
End If

 回到顶部
帅哥哟，离线，有人找我吗？
benwong2013
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：486 积分：4098 威望：0 精华：0 注册：2015/12/16 8:22:00 		  发帖心情 Post By：2019/4/20 8:43:00 [只看该作者]

在实际情况上有可能在这个名字所在行的内容可能是变化的时候，只能那个以每行的行头空白及后面 字段“（编号：”来判定的话，应该如何表述

 回到顶部
帅哥，在线噢！
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111411 积分：567125 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2019/4/20 9:25:00 [只看该作者]

Dim dlg As new OpenFileDialog
dlg.Filter = "文本文件|*.txt"
If dlg.ShowDialog = DialogResult.OK Then
    Dim strs As String = FileSys.ReadAllText(dlg.FileName)
    strs = strs.Replace(vblf,"")
    Dim rs() As String = strs.Split(vbcr)
    For i As Integer = 0 To rs.Length - 1
        If rs(i).Contains("( 编号")
            msgbox(rs(i).Split("(")(0))
            Exit For
        End If
    Next
End If
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04297 秒, 4 次数据查询