selam arkadaşlar benim şoyle bir sorunum var. elimde bir tane program botu var ama calışmıyor.nedeni ise bağlanmak istediğim sitenin koordinatlarını bulamama. nasıl bulabilirim. bilen varsa lutfen cok acil yardım etsin
bu kodla ulaşamıyorum

Kod:
yer = Instr(1,SayfaKodu, "") sanalevim = Mid(SayfaKodu,yer+40,200000) yer2 = Instr(1,sanalevim, "class=""small""") sanalevim2 = Mid(sanalevim,yer2+14,200000) kategori = left(sanalevim2,instr(sanalevim2,"")-1) yer3 = Instr(1,sanalevim2, "class=""softtitle""") sanalevim3 = Mid(sanalevim2,yer3+18,200000) adi = left(sanalevim3,instr(sanalevim3,"")-1) yer4 = Instr(1,sanalevim3, "
") sanalevim4 = Mid(sanalevim3,yer4+18,200000) aciklama = left(sanalevim4,instr(sanalevim4,"")-1) yer5 = InStr(1,SayfaKodu,"Filesize:" ) sanalevim5 = Mid(SayfaKodu,yer5+19,12) boyut = left(sanalevim5,instr(sanalevim5,"")-1) yer6 = InStr(1,SayfaKodu,"Produced by:" ) sanalevim6 = Mid(SayfaKodu,yer6+22,25) telif = left(sanalevim6,instr(sanalevim6,"")-1) yer7 = InStr(1,URLKodu,"If your download does not start" ) sanalevim7 = Mid(URLKodu,yer7+48,510) downloadURL = left(sanalevim7,instr(sanalevim7,">here")-1)