用vbs实现向任何电子邮件发送邮件

2019-01-16 06:36:17刘景俊

                             s8=aletter(z8-1)&s7
                             for z9=1 to 36          
                                s9=aletter(z9-1)&s8   ''60
                                for z10=1 to 36 
                                   s10="@"&aletter(z10-1)&s9
                                   for z11=1 to 36
                                      s11=aletter(z11-1)&s10
                                      for z12=1 to 36
                                         s12=aletter(z12-1)&s11
                                         for z13=1 to 36    ''70
                                            s13=aletter(z13-1)&s12
                                            for z14=1 to 36