• 23-09-2012, 16:30:54
    #1
    merhaba ; ile yazdığım mail adreslerini tek tek nasıl alabilirim.
    örneğin;oktayman@gmail.com;ookkkh@mm.com;wwwww@ww. com gibi
    bir textten tek tek mailleri nasıl çekeceğim
  • 23-09-2012, 16:38:32
    #2
    Üyeliği durduruldu
    <%  
    mailler="mail1@mail.com;mail2@mail.com"   
    dizimail=Split(mailler,";" )  
    diziboyut=Ubound(dizimail)  
    For i=0 To diziboyut  
    If a="" Then a=CInt(dizimail(0))  
    Response.Write a   
    Next  
    %>
  • 23-09-2012, 16:59:01
    #3
    teşekkürler CInt komutuda hata verdi ama şu şekilde yapınca düzeldi
    mailler2="mail1@mail.com;mail2@mail.com"   
    dizimail=Split(mailler2,";" )  
    diziboyut=Ubound(dizimail)  
    
    For i=0 To diziboyut  
    If a="" Then a=dizimail(i)  
    Response.Write a
  • 23-09-2012, 18:55:57
    #4
    Birde bunu deneyin...

    Dim strMailler, splitMail, item
    strMailler = "mail1@domain.com; mail2@domain.net"   
    splitMail = Split(strMailler, ";")
    
    For Each item in splitMail
    	item = Trim(item)
    	Response.Write item & "<br /><br />"
    Next
  • 23-09-2012, 21:07:22
    #5
    teşekkürler zaten bende en son for each döngüsü ile aldım, ama işin sırrı Split komutu imiş ben bilmiyordum onu
  • 24-09-2012, 11:09:54
    #6
    Kimlik doğrulama veya yönetimden onay bekliyor.
    mailler="mail1@mail.com;mail2@mail.com"
    dizimail=Split(mailler,";" ) 'split belirtilen değerleri kesmeye yarar,
    diziboyut=Ubound(dizimail) 'Ubound kesilenlerin toplam değerini yansıtır
    For i=0 To diziboyut ' for ile toplam değere kadar yansıtırız
    Response.Write dizimail(i) 'mailleri tek tek yazdırıyoruz
    Next 'for döngüsünü kapattık
  • 24-09-2012, 12:01:51
    #7
    nicturkey adlı üyeden alıntı: mesajı görüntüle
    mailler="mail1@mail.com;mail2@mail.com"
    dizimail=Split(mailler,";" ) 'split belirtilen değerleri kesmeye yarar,
    diziboyut=Ubound(dizimail) 'Ubound kesilenlerin toplam değerini yansıtır
    For i=0 To diziboyut ' for ile toplam değere kadar yansıtırız
    Response.Write dizimail(i) 'mailleri tek tek yazdırıyoruz
    Next 'for döngüsünü kapattık
    Öğrediğimiz iyi oldu