[文本处理] 批处理可以实现在gmail邮箱地址中随机加点吗？

pengyou86

随机加点，不知道批处理可以实现吗？
GMAIL.com邮箱地址可以任意加点。我想通过批处理[email=pengyou86@gmail.com]pengyou86@gmail.com[/email]这个邮箱可以分成多少给子地址。

比如 ：[email=p.engyou86@gmail.com]p.engyou86@gmail.com[/email]
            [email=pe.ngyou86@gmail.com]pe.ngyou86@gmail.com[/email]
            [email=pen.gyou86@gmail.com]pen.gyou86@gmail.com[/email]
            [email=peng.you86@gmail.com]peng.you86@gmail.com[/email]
            [email=peng.you86@gmail.com]peng.you86@gmail.com[/email]
            [email=p.e.n.g.y.o.u.8.6@gmail.com]p.e.n.g.y.o.u.8.6@gmail.com[/email]
            [email=p.engyou8.6@gmail.com]p.engyou8.6@gmail.com[/email]
可以在pengyou86之间任意加点都是子地址。那位朋友帮忙写一下希望列出的子地址不会重复  谢谢！

[ 本帖最后由 pengyou86 于 2009-3-6 00:04 编辑 ]

pusofalse

@echo Off
set /a n=%random% %% 9 + 1
set "str=pengyou86@gmail.com"
call echo %%str:~,%n%%%.%%str:~%n%%%
pause>nul
复制代码

defanive

8+7+6+5+4+3+2+1=36种组合方式，枚举也不多吧。。。
而且最麻烦的问题，就是可以有多个点。。。
我就不说什么了，反正都是力气活。。。
还有，楼上的代码，可能会有[email]pengyou86.@gmail.com[/email]的情况，那个9改成8就可以了。。。

pengyou86

谢谢楼上两位。 新年好啊！

pengyou86

这个代码只能列出一个子地址，而且只能加一个点   
有什么方法全部列出或者导入指定
txt文本里面也行的

[ 本帖最后由 pengyou86 于 2009-1-26 00:08 编辑 ]

pengyou86

继续求助，麻烦了

itrui

C81+C82+C83+C84+C85+C86+C87+C88=8+28+56+70+70+56+28+8=324种组合

wxcute

@echo off
setlocal enableDelayedExpansion
set name=pengyou86
:lp
set/a nl+=1
if not "!name:~%nl%!"=="" goto :lp
set/a ml=nl-1
call :showN name %ml%
echo 名字%name%长度为%nl%，共有%num%个子地址。
pause
goto :eof
:showN
for /l %%a in (1 1 %2) do (
　if not "!%1:~%%a,1!"=="." (
　　echo !%1:~,%%a!.!%1:~%%a!@gmail.com&set/anum+=1
　　set %11=!%1:~,%%a!.!%1:~%%a!
　　call :showN %11 %%a
　)
)
复制代码

[ 本帖最后由 wxcute 于 2009-1-27 14:18 编辑 ]

defanive

捏哦，那就是我算错了。。。

好像不是用P哦，是C捏。。。

pengyou86

谢谢！测试蛮好用的

pengyou86

怎么可以把计算出来的结果保存到123.txt里面呢？

hxinhu12315

echo !%1:~,%%a!.!%1:~%%a!@gmail.com&set/anum+=1
改成echo !%1:~,%%a!.!%1:~%%a!@gmail.com>>123.txt&set/anum+=1不就完了

pengyou86

谢谢 这个批处理太棒了

pengyou86

原帖由 wxcute 于 2009-1-27 14:16 发表
@echo off
setlocal enableDelayedExpansion
set name=pengyou86
:lp
set/a nl+=1
if not "!name:~%nl%!"=="" goto :lp
set/a ml=nl-1
call :showN name %ml%
echo 名字%name%长度为%nl%，共有%num%个子地址 ...

这样批处理弄出来的子地址有好多重复。汗！那位高手修改一下。让批处理别出现重复子地址

wxcute

名字存在 sub_name.txt 文件中。

@echo off>nul 3>sub_name.txt
setlocal enableDelayedExpansion
set name=pengyou86
:lp
set/a nl+=1
if not "!name:~%nl%!"=="" goto :lp
set/a ml=nl-1
call :showN name %ml%
echo 名字%name%长度为%nl%，共有%num%个子地址。
goto :eof
:showN
for /l %%a in (1 1 %2) do (
　if not "!%1:~%%a,1!"=="." (
　　echo !%1:~,%%a!.!%1:~%%a!@gmail.com&set/anum+=1
　　set %11=!%1:~,%%a!.!%1:~%%a!
　　call :showN %11 %%a
　)
)
复制代码