<%
strURL = "http://www.domain.com/sayfa.asp"
Dim tear
Set tear = Server.CreateObject("Softwing.AspTear")
strHTML = Tear.Retrieve(strURL,Request_Get, "","","")
%>
sonra sayfada çekeceğin veri bölgesinde sayfanın kaynağından bakarak sayfada başka tekrarlanmamış bir kod veya ifade bul ve
<%
baslangıc=ifade1
bitis=ifade2
dim section1(20)
dim section2(20)
section1=split(bilgi,baslangıc)
section2=split(section1(1),bitis)
arananbolum=section2(0)
%>