Php İle Bot Yapmak

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    Ayro
    Ayro's avatar
    Kayıt Tarihi: 08/Ağustos/2005
    Erkek

    pesinin yardımıyla  dediğimi hallettim kodları verim

     

    do while not cek.eof
    anahtar=cek("anahtar")
    if instr(yazi,anahtar)>0 Then
    anahtarlar=anahtarlar&"-"&cek("id")
    end if
    cek.movenext
    loop
    Veri = anahtarlar
    Ayir = Split(Veri,"-")
    for i = 1 to Ubound(Ayir)
    Next
    randomize
    aydi = int((Rnd*Ubound(Ayir))+1 )
    set cek = bag.Execute("select * from lag where id="&Ayir(aydi)&"")
    response.write cek("cevap")

    ahanda bu şekil.

Toplam Hit: 4647 Toplam Mesaj: 42