ASP WHOİS Uyarlama

[aslanxxl]

elimdeki scripte pivo.whois bileşeni lazım onca aramam rağmen bulamıyorum birtane buldum yükledim oda çalışmadı bana bu konuda yardım edebilecek ustalara ihtiyacım var acaba bileşeni bulmama veya sorgulama yazılımını değiştirmeme yardımcı olabilecekm biri varmı


<%
SET AYARLAR = SERVER.CREATEOBJECT("ADODB.RECORDSET")
STRSQL = "SELECT * FROM AYARLAR"
SET AYARLAR= DB_BAGLANTISI.EXECUTE(STRSQL)

IF REQUEST.QUERYSTRING("DOMAIN")<>"" THEN
DOMAIN=REQUEST.QUERYSTRING("DOMAIN")
UZANTI=REQUEST.QUERYSTRING("UZANTI")
ELSE
DOMAIN=REQUEST.FORM("DOMAIN")
UZANTI=REQUEST.FORM("UZANTI")
END IF

DKSAYI = TRIM(LEN(DOMAIN)) + 1

%>
<%
Dim WhoisClient
Set oWhois = Server.CreateObject("Pivo.Whois")
%><%
SET TRKONTROL = SERVER.CREATEOBJECT("ADODB.RECORDSET")
STRSQL ="SELECT * FROM DOMAIN_UZANTILARI WHERE UZANTI='"& UZANTI &"'"
SET TRKONTROL= DB_BAGLANTISI.EXECUTE(STRSQL)
IF TRKONTROL("TIPI")=1 THEN
%>

 

[delidevran]

Bu Konuda Yardımcı Olabılecek Bırılerı Varsa Lutfen Yardımcı Olsunlar