folder Tahribat.com Forumları
linefolder Asp - Php - Cgi - Perl
linefolder Asp | Değişkendeki Aynı Harfleri Silme,Yok Sayma,Ayıklama :/ ?



Asp | Değişkendeki Aynı Harfleri Silme,Yok Sayma,Ayıklama :/ ?

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    pesimistzombie
    pesimistzombie's avatar
    Kayıt Tarihi: 14/Haziran/2006
    Erkek

    mesela bi değişkenim var ve o şöyle

    yazi="ttttteeeeeesssSSsssstttttttt"

    benim bunu bi fonksiyonla direk "test" olarak çıktısını almam lazım :/ yalnız sayıları hesaba katmamalı sadece harf üzerine olmalı.. hazır bişeysi var mıdır bunun?  regex i biraz araştırdım ama onla yapamadım :/


    :|
  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    camarade
    ontedi
    ontedi's avatar
    Kayıt Tarihi: 04/Eylül/2005
    Erkek
    Pesi,  verdiğin şey   tssttteeestttttt gibi birşey olursa işler iyice karışır. Regular Exprision ile yapılabilir. Yarın bakarım artık.

    Matematikçi ve Yazılımcı. http://www.ontedi.com ve http://www.cizgi.site Siteme beklerim herkesi.
  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    pesimistzombie
    pesimistzombie's avatar
    Kayıt Tarihi: 14/Haziran/2006
    Erkek
    arka arkaya gelirse sildirme yapsın o zaman ona göre bişiler yazmak lazım :/ araştırıyorum ama daha bi sonuç elde edemedim kafadan yapıcam artık sanırım sabaha kadar kasıcaz yine :/

    :|
  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    pesimistzombie
    pesimistzombie's avatar
    Kayıt Tarihi: 14/Haziran/2006
    Erkek

    yaptım basitmiş yav :/

    <%
    pirinc="ttttteeeeeesssSSsssstttttttt"
    pirinc=lcase(pirinc)


    for tane = 1 to Len(pirinc)
    ayiklapirinci = Mid(pirinc,tane,1)
    if isnumeric(ayiklapirinci) = false then
    baldo=tane+1
    if baldo="0" then
    baldo=1
    else
    baldo=baldo
    end if
    if Mid(pirinc,baldo,1)<>ayiklapirinci then
    pilavlikpirinc=pilavlikpirinc&ayiklapirinci
    end if
    end if
    next

    response.write pilavlikpirinc
    %>


    öncelikle değişkeni küçük harfe çevirdimki büyük küçük harf sorunu çıkmasın
    sonra bu değişkendeki tüm harfleri bi ayırttım mid sayesinde
    sonra ben bunda sayıları yok saymasını istediydim eğer harf sayı değilse işlem yap dedirttim
    daha sonra aynı harfleri 1. harften sonrasını aldımki harf ayıklarken 1. harfide ayıklıyodu çünkü +1 yaptım.
    sonra eğer bir sonraki harfle önceki harfi aynı değilse yazdır harfi dedimki eğer aynıysa yazmıcak
    sonra işte döngüledim ve en sonunda pilavlık temiz taşsız kelimemi yazdırdım ve mutluyum mesudum süperim kralı gelsin huleen


    :|
Toplam Hit: 1118 Toplam Mesaj: 4