arkadaşlar aspden anlayanlar bi bakabilir mi?

iyi geceler öncelikle

asp domain sorgulama kodları var fakat bu kodlarda uzantı açılır kutu ile tek bir tane seçiliyor.

benim istediğim ise checkbox ile birden fazla seçilmesi yani checkbox ile olması.

aşağıda kodları paylaşıyorum yardımcı olacak arkadaşlardan ALLAH razı olsun.

domain.asp

com
net
org
biz

domainsorgu.asp


DOMAIN SORGULAMA


 
<%
if left(request.form("domain"),4)="www." then
harfsayi=len(request.form("domain"))
harfsayi2=harfsayi-4
asildomain=right(request.form("domain"),harfsayi2) & request.form("uzanti")
GotothisURL = "http://www." & right(request.form("domain"),harfsayi2) & request.form("uzanti")
else
GotothisURL = "http://www." & request.form("domain") & request.form("uzanti")
asildomain=request.form("domain") & request.form("uzanti")
end if


Set GetConnection = CreateObject("Microsoft.XMLHTTP")



GetConnection.Open "get", GotothisURL, False

on error resume next

GetConnection.Send



ResponsePage = GetConnection.getResponseHeader("Date")



if ResponsePage="" then

durum="alinmamis"

else

durum="alinmis"

end if



Set GetConnection = Nothing
%>
<% if durum="alinmis" then %>
<% ="Almak istediğiniz alan adı kullanılmaktadır.
" %>

<% =asildomain %>
   -    &strSuffix=
<% =Trim(request.form("uzanti")) %>">KİM ALMIŞ
<% end if %>


<% if durum="alinmamis" then %>
<% ="Almak istediğiniz alan adı boştadır.
" %>

<% =asildomain %>
   -    <% =Trim(request.form("uzanti")) %>">SATIN AL
<% end if %>


Ek Olarak: yardımlarınızı bekliyorum..

Ek Olarak: bu forumda aspden anlayan yok mu şimdi :)


.com

.net

.org



Şeklindeki formu


<%
Ucom = request.form("com")

If Ucom = "on" Then : Response.write(DomainAdi & ".com") : End If
%>


Sayfasında işleyebilirsin. Yapman gereken For-Next döngüsüyle seçilen uzantıları sorgulatmakdır.