yucatan Posted May 5, 2008 Share Posted May 5, 2008 hi i have a problem i want to make something a kind of loop i have 122 $vars like this $s_SmtpServer1 = ".." $s_SmtpServer2 = ".." and this want a look that a fuction eatch time that he runs get the next $ so that he do it the first time with $s_SmtpServer1 = ".." and he stops at $s_SmtpServer122 = ".." is this possebel i just dont know how to fix this.. Link to comment Share on other sites More sharing options...
PsaltyDS Posted May 5, 2008 Share Posted May 5, 2008 hi i have a problem i want to make something a kind of loop i have 122 $vars like this $s_SmtpServer1 = ".." $s_SmtpServer2 = ".." and this want a look that a fuction eatch time that he runs get the next $ so that he do it the first time with $s_SmtpServer1 = ".." and he stops at $s_SmtpServer122 = ".." is this possebel i just dont know how to fix this.. Use an array instead of many named variables: Global $avSmtpServers[122] For $n = 0 to 121 $avSmtpServers[$n] = ".." Next Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law Link to comment Share on other sites More sharing options...
weaponx Posted May 5, 2008 Share Posted May 5, 2008 You really should try posting in your native language. This is what arrays are meant for. Arrays are zero indexed so the first element is zero and the last element is array length minus one. Dim $array[122] $array[0] = "" $array[1] = "" $array[2] = "" ... $array[119] = "" $array[120] = "" $array[121] = "" Link to comment Share on other sites More sharing options...
AdmiralAlkex Posted May 5, 2008 Share Posted May 5, 2008 You want to use an array instead of all those variables. Then use a For...Next loop .Some of my scripts: ShiftER, Codec-Control, Resolution switcher for HTC ShiftSome of my UDFs: SDL UDF, SetDefaultDllDirectories, Converting GDI+ Bitmap/Image to SDL Surface Link to comment Share on other sites More sharing options...
Richard Robertson Posted May 5, 2008 Share Posted May 5, 2008 (edited) For i = 1 To 122 Eval("s_SmtpServer" & i) = ".." NextOught to work. An array is a much better solution though.Edit: everyone else posted while I was reading another page. Edited May 5, 2008 by Richard Robertson Link to comment Share on other sites More sharing options...
Developers Jos Posted May 5, 2008 Developers Share Posted May 5, 2008 Still don't like the intend of this script as I mentioned in the other thread. SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
martin Posted May 5, 2008 Share Posted May 5, 2008 For i = 1 To 122 Eval("s_SmtpServer" & i) = ".." Next Ought to work. An array is a much better solution though. Edit: everyone else posted while I was reading another page. I wonder what it was you were reading! Obviously it was very distracting. I think you meant more like this For $i = 1 To 122 Assign("s_SmtpServer" & $i,"something",2) next But yes, I think arrays would be better too. Serial port communications UDF Includes functions for binary transmission and reception.printing UDF Useful for graphs, forms, labels, reports etc.Add User Call Tips to SciTE for functions in UDFs not included with AutoIt and for your own scripts.Functions with parameters in OnEvent mode and for Hot Keys One function replaces GuiSetOnEvent, GuiCtrlSetOnEvent and HotKeySet.UDF IsConnected2 for notification of status of connected state of many urls or IPs, without slowing the script. Link to comment Share on other sites More sharing options...
yucatan Posted May 5, 2008 Author Share Posted May 5, 2008 (edited) i shall show the code now maby u guys can explane it bether to me then.. this is my code now #include <INet.au3> #NoTrayIcon $teller = "1" $s_SmtpServer = "$s_SmtpServer" $s_SmtpServer1 = "mail.amaze.net.au" $s_SmtpServer2 = "mailhost.col.ameritech.net" $s_SmtpServer3 = "aol.com" $s_SmtpServer4 = "za.mx.aol.com" $s_SmtpServer5 = "zb.mx.aol.com" $s_SmtpServer6 = "zc.mx.aol.com" $s_SmtpServer7 = "smtp1.attglobal.net" $s_SmtpServer8 = "mailhost.worldnet.att.net" $s_SmtpServer9 = "mailhost.att.net" $s_SmtpServer10 = "mailhost.worldnet.att.net" $s_SmtpServer11 = "mail.australink.net" $s_SmtpServer12 = "smtpout.bellatlantic.net" $s_SmtpServer13 = "smtp.mail.yahoo.com" $s_SmtpServer14 = "smtp.blueyonder.co.uk" $s_SmtpServer15 = "mail1.oznet.net.au" $s_SmtpServer16 = "mailhost.breathemail.net" $s_SmtpServer17 = "mail.bright.net" $s_SmtpServer18 = "mail.btclick.com" $s_SmtpServer19 = "smtp.btconnect.com" $s_SmtpServer20 = "mail.btinternet.com" $s_SmtpServer21 = "mail.btopenworld.com" $s_SmtpServer22 = "smtp.businessserve.co.uk" $s_SmtpServer23 = "smtp.blueyonder.co.uk" $s_SmtpServer24 = "relay.clara.net" $s_SmtpServer25 = "smtp.comcast.net" $s_SmtpServer26 = "smtp.cs.com" $s_SmtpServer27 = "mail.compuserve.com" $s_SmtpServer28 = "smtp.east.cox.net" $s_SmtpServer29 = "smtp.west.cox.net" $s_SmtpServer30 = "smtp.ntlworld.com" $s_SmtpServer31 = "postoffice.dca.net" $s_SmtpServer32 = "post.demon.co.uk" $s_SmtpServer33 = "smtp.earthlink.net" $s_SmtpServer34 = "smtp.easynet.co.uk" $s_SmtpServer35 = "mail.ee.net" $s_SmtpServer36 = "mail.ma.freei.net" $s_SmtpServer37 = "smtp.freeserve.co.uk" $s_SmtpServer38 = "smtp.freeserve.net" $s_SmtpServer39 = "relay.free-online.co.uk" $s_SmtpServer40 = "smtp.gateway.net" $s_SmtpServer41 = "mail.genie.co.uk" $s_SmtpServer42 = "mail.greenbank.net.au" $s_SmtpServer43 = "mail.hotkey.net.au" $s_SmtpServer44 = "smtp1.ibm.net" $s_SmtpServer45 = "smtp.ic24.net" $s_SmtpServer46 = "mailout.icdc.com" $s_SmtpServer47 = "mail.nfolink.com" $s_SmtpServer48 = "mail.your-net.com" $s_SmtpServer49 = "post.inweb.co.uk" $s_SmtpServer50 = "mail.iron.net" $s_SmtpServer51 = "smtp.iwaynet.net" $s_SmtpServer52 = "mail.jadeinc.com" $s_SmtpServer53 = "smtp.lineone.net" $s_SmtpServer54 = "mail.loa.com" $s_SmtpServer55 = "mail.logicworld.com.au" $s_SmtpServer56 = "smtp.lycos.co.uk" $s_SmtpServer57 = "smtp.madasafish.com" $s_SmtpServer58 = "smtp.meganet.net" $s_SmtpServer59 = "smtp.email.msn.com" $s_SmtpServer60 = "mail.midohio.net" $s_SmtpServer61 = "smtp.mindspring.com" $s_SmtpServer62 = "mail.mindspring.com" $s_SmtpServer63 = "smtp.mistral.co.uk" $s_SmtpServer64 = "smtp.email.msn.com" $s_SmtpServer65 = "secure.smtp.email.msn.com" $s_SmtpServer66 = "smtp.namestoday.ws" $s_SmtpServer67 = "smtp.ix.netcom.com" $s_SmtpServer68 = "smtp.netreach.net" $s_SmtpServer69 = "mailhost.netscapeonline.co.uk" $s_SmtpServer70 = "mail.netset.com" $s_SmtpServer71 = "mail.netwalk.com" $s_SmtpServer72 = "smtp.netzero.net" $s_SmtpServer73 = "mail.nextek.net" $s_SmtpServer74 = "smtp.nildram.co.uk" $s_SmtpServer75 = "nni.com" $s_SmtpServer76 = "mail.nn.net" $s_SmtpServer77 = "smtp.ntlworld.com" $s_SmtpServer78 = "mail.onetel.net.uk" $s_SmtpServer79 = "mail.onetel.com" $s_SmtpServer80 = "mail.marion.net" $s_SmtpServer81 = "smtp.ozemail.com.au" $s_SmtpServer82 = "mail.peoplepc.com" $s_SmtpServer83 = "smtp-1.opaltelecom.net" $s_SmtpServer84 = "smtp.dial.pipex.com" $s_SmtpServer85 = "relay.plus.net" $s_SmtpServer86 = "smtp.prodigy.net" $s_SmtpServer87 = "smtp.purplenet.co.uk" $s_SmtpServer88 = "smtp.rcn.com" $s_SmtpServer89 = "mail.redbird.net" $s_SmtpServer90 = "mail.richnet.net" $s_SmtpServer91 = "mail.richnet.netsmtp-server.insight.rr.com" $s_SmtpServer92 = "mail.richnet.netsmtp-server.columbus.rr.com" $s_SmtpServer93 = "mail.richnet.netsmtp-server.nc.rr.com" $s_SmtpServer94 = "mail.richnet.netsmtp.tiscali.co.uk" $s_SmtpServer95 = "mail.richnet.netmail.spire.com" $s_SmtpServer96 = "mail.richnet.netsmtp.supanet.com" $s_SmtpServer97 = "mail.richnet.netsmtp.blueyonder.co.uk" $s_SmtpServer98 = "mail.richnet.netmail.telocity.com" $s_SmtpServer99 = "mail.richnet.netsmtp.tesco.net" $s_SmtpServer100 = "mail.richnet.netmail.tesco.net" $s_SmtpServer101 = "smtp.tiscali.co.uk" $s_SmtpServer102 = "mail.totalise.co.uk" $s_SmtpServer103 = "mail.tpg.com.au" $s_SmtpServer104 = "mail.ttlc.net" $s_SmtpServer105 = "smtp.ukgateway.net" $s_SmtpServer106 = "uu.net" $s_SmtpServer107 = "smtp.v21.co.uk" $s_SmtpServer108 = "smtp.verizon.net" $s_SmtpServer109 = "smtp.virgin.net" $s_SmtpServer110 = "mail.vispa.com" $s_SmtpServer111 = "mail.voicenet.com" $s_SmtpServer112 = "smtpmail.waitrose.com" $s_SmtpServer113 = "smtp.wanadoo.fr" $s_SmtpServer114 = "smtp.webcom.com" $s_SmtpServer115 = "mail.which.net" $s_SmtpServer116 = "smtp.mail.wowway.com" $s_SmtpServer117 = "smtp.mail.wideopenwest.com" $s_SmtpServer118 = "smtp.tiscali.co.uk" $s_SmtpServer119 = "smtp.mail.yahoo.com" $s_SmtpServer120 = "smtp.sbcglobal.yahoo.com" $s_SmtpServer121 = "mail.hotpop.com" $s_SmtpServer122 = "smarthost.direct-adsl.nl" ;------------------------------------------------------------------------------------------- $s_FromName = "mail-script" $s_FromAddress = "removed email address" $s_ToAddress = "removed email address" $s_Subject = "My Test UDF" Dim $as_Body[2] $as_Body[0] = "Testing the new email udf" $as_Body[1] = "Second Line" $err = @ek rror $s_SmtpServer1 +=1 do $Teller += 1 $Response = _INetSmtpMail ($s_SmtpServeradres, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body) Until $Response = 1 the script needs to try send the mail on all smtp servers to the adress he needs to stay tying until he found one that works.. p.s. is anyone know a smtp server that i can use b.v. gmail that i can use in eatch network that is olso good i want that when i run it it mails some text to me but the script needs to work on eatch computer so not only on mine so olso below other ISP's Edited May 5, 2008 by Jos removed email address Link to comment Share on other sites More sharing options...
Developers Jos Posted May 5, 2008 Developers Share Posted May 5, 2008 (edited) i shall show the code now maby u guys can explane it bether to me then..this is my code nowthe script needs to try send the mail on all smtp servers to the adress he needs to stay tying until he found one that works..p.s. is anyone know a smtp server that i can use b.v. gmail that i can use in eatch network that is olso goodi want that when i run it it mails some text to me but the script needs to work on eatch computer so not only on mine so olso below other ISP'sWTF: Are to totally deaf or something ? I hope I am getting through to you this time because the next time you will be banned!!!Stop posting about this script because you are trying to EMail unwanted stuff trying to find the users ISP SMTP server.As you have failed to give me legitimate purpose (Even Dutch was too difficult for you), I am not going to allow any more posts from you on this subject.*click* Edited May 5, 2008 by Jos SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
Recommended Posts