24小时热门版块排行榜    

查看: 2143  |  回复: 19

pangshaofeng06

金虫 (小有名气)


[交流] 【求助】不知哪位大侠可以帮我把邮箱@以及其后缀名去掉,这些邮箱存在txt文本中。悬赏

不知哪位大侠可以帮我把邮箱@以及其后缀名去掉,这些邮箱存在txt文本中,不知有何办法。悬赏25个金币,谢谢
maurilio.alberone@incubadora.uff.br
fisiovalle@gmail.com
clarissabrandaoalves@gmail.com
luiz@npd.uff.br
cgpe@capes.gov.br
apeerj@gmail.com

去掉后为
maurilio.alberone
fisiovalle
luiz
cgpe
apeerj
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

» 抢金币啦!回帖就可以得到:

查看全部散金贴

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

sjh717142

新虫 (初入文坛)



pangshaofeng06(金币+1):谢谢参与
VB6实现:

Private Sub Command1_Click()
MsgBox SplitEmail("maurilio.alberone@incubadora.uff.br"
End Sub

Public Function SplitEmail(InputStr As String) As String
If InputStr = "" Then SplitEmail = "": Exit Function
SplitEmail = Left(InputStr, InStr(InputStr, "@" - 1)
End Function

具体用一个循环逐行读取文件每行再处理即可。
2楼2011-04-06 14:29:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dedream

木虫 (正式写手)



微尘、梦想(金币+1): 谢谢回贴交流…… 2011-04-08 13:19:40
搞密代破解的一般有现成工具,自己写一个也很容易
3楼2011-04-06 18:09:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

vvxvv

银虫 (初入文坛)


C++的代码
CODE:
#include
#include
#include

using namespace std;

int main(int argc, char *argv[])
{
        if (argc != 3) {
                cerr << "请输入源文件名和目标文件名";
                return -1;
        }
        ifstream ifs(argv[1]);
        if (!ifs) {
                cerr << "源文件打开失败";
                return -1;
        }
        ofstream ofs(argv[2]);
        if (!ofs) {
                cerr << "目标文件打开失败";
                return -1;
        }
        string str;
        while (ifs) {
                getline(ifs, str);
                size_t pos = str.find('@');
                ofs << str.substr(0, pos) << endl;
        }
        return 0;
}

4楼2011-04-06 20:33:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pangshaofeng06

金虫 (小有名气)


给我个软件吧,我计算机不大懂的,呵呵

给我个软件吧,我计算机不大懂的,呵呵
5楼2011-04-06 22:29:45
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

微尘、梦想(金币+1): 谢谢回贴交流…… 2011-04-08 13:20:24
vim 打开,然后

:%s/@.*$//gc
6楼2011-04-06 22:53:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pangshaofeng06

金虫 (小有名气)


引用回帖:
Originally posted by dedream at 2011-04-06 18:09:19:
搞密代破解的一般有现成工具,自己写一个也很容易

呵呵。我是搞破解的,你有这个软件吗
7楼2011-04-07 00:16:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pangshaofeng06

金虫 (小有名气)


引用回帖:
Originally posted by dedream at 2011-04-06 18:09:19:
搞密代破解的一般有现成工具,自己写一个也很容易

呵呵。我是搞破解的,你有这个软件吗
8楼2011-04-07 00:16:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

信彼南山

木虫 (著名写手)


教你一个不用任何程序的方法
9楼2011-04-07 00:39:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

信彼南山

木虫 (著名写手)


★ ★
微尘、梦想(金币+2): 谢谢回贴交流…… 2011-04-08 13:20:48
第一步,把内容复制到记事本中
CODE:
maurilio.alberone@incubadora.uff.br
fisiovalle@gmail.com
clarissabrandaoalves@gmail.com
luiz@npd.uff.br
cgpe@capes.gov.br
apeerj@gmail.com

第二步,利用替换功能把“@”替换成“        @”(长空格,按tab键,就是caps lock上面那个)
CODE:
maurilio.alberone        @incubadora.uff.br
fisiovalle        @gmail.com
clarissabrandaoalves        @gmail.com
luiz        @npd.uff.br
cgpe        @capes.gov.br
apeerj        @gmail.com

第三步,记事本内,全选、复制,然后打开excel,粘贴

....................
选择第一列,复制回记事本
The end
10楼2011-04-07 00:43:03
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

holmescn

金虫 (正式写手)


★ ★
微尘、梦想(金币+2): 谢谢回复…… 2011-04-09 13:51:53
在win下,可以用Notepad++,EditPlus之类的支持正则表达式替换的编辑器将  @.*$ 替换为空值,就可以了。
11楼2011-04-07 07:51:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pangshaofeng06

金虫 (小有名气)


引用回帖:
Originally posted by 信彼南山 at 2011-04-07 00:43:03:
第一步,把内容复制到记事本中
CODE:
maurilio.alberone@incubadora.uff.br
fisiovalle@gmail.com
clarissabrandaoalves@gmail.com
luiz@npd.uff.br
cgpe@capes.gov.br
apeerj@gmail.com

第二步 ...

那个最后一步放回excel中
好像不能单复制第一列啊,请高人明示。谢谢
12楼2011-04-07 10:05:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

信彼南山

木虫 (著名写手)


pangshaofeng06(金币+10): 2011-04-07 23:40:28
在excel中,tab键的作用等于是跳到右侧单元格
也就是把
maurilio.alberone
fisiovalle
luiz
cgpe
apeerj
这些放在A列中;
@以后的那些放在B列中
选择A列就行了
13楼2011-04-07 22:42:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
引用回帖:
Originally posted by pangshaofeng06 at 2011-04-07 00:16:06:
呵呵。我是搞破解的,你有这个软件吗

搞破解的,这点儿小事都做不成能搞啥子破解??
14楼2011-04-08 14:27:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

dedream

木虫 (正式写手)


引用回帖:
Originally posted by snoopyzhao at 2011-04-08 14:27:48:
搞破解的,这点儿小事都做不成能搞啥子破解??

他是想破解密码代理或者ez
这种破解需要的技术含量相对较低。

无需编程,用别人写好的就行
15楼2011-04-09 16:13:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
pangshaofeng06(金币+15): 2011-04-09 23:53:15
引用回帖:
Originally posted by snoopyzhao at 2011-04-08 14:27:48:
搞破解的,这点儿小事都做不成能搞啥子破解??

深有同感!

附上程序,将待处理的邮箱贴入程序即可。

[ Last edited by jjdg on 2011-4-10 at 20:58 ]
16楼2011-04-09 18:15:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pangshaofeng06

金虫 (小有名气)


引用回帖:
Originally posted by jjdg at 2011-04-09 18:15:55:
深有同感!

附上程序,将待处理的邮箱保存到txt文件中,一个邮箱存一行,运行此程序打开即可在同一路径下得到一名为“结果”的文本文件,处理完的内容保存于其中。

[ Last edited by jjdg on 2011-4-9 ...

呵呵,你好,你给的程序用不了啊,打不开
。就显示错误
17楼2011-04-09 23:56:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

小木虫(金币+0.5):给个红包,谢谢回帖交流
引用回帖:
Originally posted by pangshaofeng06 at 2011-04-09 23:56:57:
呵呵,你好,你给的程序用不了啊,打不开
。就显示错误

重新下载附件!



[ Last edited by jjdg on 2011-4-10 at 21:08 ]
18楼2011-04-10 04:53:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
★ ★ ★
小木虫(金币+0.5):给个红包,谢谢回帖交流
微尘、梦想(金币+2): 谢谢回复…… 2011-04-10 15:02:02
楼主你下个python,很方便的,安装完了,直接把这个代码保存为.py文件
然后把你要处理的保存为test.txt,放在同一个文件夹下运行就行了
结果保存在result.txt
CODE:
#! usr/bin/env python

def main():
    iNum = 0
    fout = open('result.txt','w')
    for strLine in open('test.txt').read().splitlines():
        curPt = strLine.strip().split('@')[0]
        fout.write(curPt+'\n')
        iNum += 1
    fout.close()
    print 'Done!'
        

if __name__=='__main__': main()

原文
CODE:
maurilio.alberone@incubadora.uff.br
fisiovalle@gmail.com
clarissabrandaoalves@gmail.com
luiz@npd.uff.br
cgpe@capes.gov.br
apeerj@gmail.com

处理结果
CODE:
maurilio.alberone
fisiovalle
clarissabrandaoalves
luiz
cgpe
apeerj

[ Last edited by libralibra on 2011-4-10 at 15:44 ]
19楼2011-04-10 05:08:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pangshaofeng06

金虫 (小有名气)


引用回帖:
Originally posted by jjdg at 2011-04-10 04:53:10:
没有问题啊!
具体操作见附件!

你的那个软件就根本打不开。一打就显示出错。请指教
20楼2011-04-10 15:23:39
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 pangshaofeng06 的主题更新
普通表情 高级回复 (可上传附件)
信息提示
请填处理意见