Anasayfa FORUMLAR Üye Girişi Dosyalar Dersler İpuçları Yardımcı Araçlar Hakkımızda
KİMLER BAĞLI
Toplam Üye: 32638
Aktif Üye: 0
Aktif Ziyaretçi: 1318
Üye Adı
Şifre
Beni Hatırla
          Yeni Üye KayıtYeni Üye Kayıt
          Şifremi UnuttumŞifremi Unuttum
FORUMLAR
 asp resim galerisi scrpti..
(5154 okuma, 0 yanıt)
 İki Ayrı Pc İki Ayrı Site..
(6016 okuma, 3 yanıt)
 Aquamp Player Dısında Pla..
(5738 okuma, 2 yanıt)
 Access ile calışan Asp ve..
(7839 okuma, 5 yanıt)
 reseller de domain e host..
(4595 okuma, 1 yanıt)
 http://www.akilli.tv..
(8016 okuma, 7 yanıt)
 Acilir kapanir sc..
(3731 okuma, 0 yanıt)
 aidsvebiz.com explorer si..
(6808 okuma, 2 yanıt)
 Excele Süzgeç Ekleyebilir..
(7329 okuma, 5 yanıt)
 ASP tabanlı bir domaine ..
(5064 okuma, 2 yanıt)
 asp hata..
(3932 okuma, 0 yanıt)
 Firma Tanıtım Sitesi Tasa..
(6408 okuma, 3 yanıt)
 çok güzel bir haber s&..
(8353 okuma, 5 yanıt)
 Haber ve Forumlar İçin En..
(6560 okuma, 3 yanıt)
 Arkadaslar Baka bilirmisi..
(7264 okuma, 5 yanıt)
 Veri Trafiği..
(6592 okuma, 4 yanıt)
 phpfox bilen varmı?..
(6321 okuma, 4 yanıt)
 linklere google reklamı e..
(5215 okuma, 2 yanıt)
 googla indexlenen alt say..
(6458 okuma, 3 yanıt)
 Okey s c ripti fiyatı hak..
(7619 okuma, 5 yanıt)
 Rss Gif Yapma ?..
(4260 okuma, 0 yanıt)
 Okey, Batak, Tavla..
(7616 okuma, 5 yanıt)
 flash resim gelerisi ariy..
(4376 okuma, 1 yanıt)
 JavaScript ile yada Html ..
(3998 okuma, 0 yanıt)
 Rss den anlayan varmı..
(8322 okuma, 5 yanıt)
 iframe ile onclick'i birl..
(5811 okuma, 2 yanıt)
 sql den veri çekip xml şe..
(5704 okuma, 2 yanıt)
 modül kodu html nasıl çev..
(8288 okuma, 6 yanıt)
 font stylerini değiştiren..
(4421 okuma, 0 yanıt)
 php sitem..
(6794 okuma, 4 yanıt)
 google da arayan arama mo..
(9384 okuma, 7 yanıt)
 Script..
(4419 okuma, 0 yanıt)
 Asp Scripti Linux Hosting..
(7545 okuma, 4 yanıt)
 Bu Portalı Bilen Varmı ?..
(6111 okuma, 3 yanıt)
 Dosya İndirmeye Nasıl Sın..
(4111 okuma, 0 yanıt)
 asp db yükleme..
(6259 okuma, 3 yanıt)
 sql admin sifresi..
(16650 okuma, 17 yanıt)
 İftara ne kadar var siste..
(6492 okuma, 2 yanıt)
 Html Sitede Sayaç (A.S.P&..
(7420 okuma, 3 yanıt)
 Asp Nesneleri..
(5498 okuma, 1 yanıt)
 Adım adım Firma Rehberi Y..
(8189 okuma, 4 yanıt)
 Java (j2ee, j2me)..
(6032 okuma, 1 yanıt)
 Javascript if dön..
(5214 okuma, 1 yanıt)
 bu kod ile sayfayı aynı a..
(6481 okuma, 3 yanıt)
 Ajax menu Paylaşım..
(8150 okuma, 5 yanıt)
 ASP YARDIM..
(9891 okuma, 6 yanıt)
 ASP sitem VAR ve siteyi y..
(6777 okuma, 2 yanıt)
 Xajax!..
(4998 okuma, 0 yanıt)
 Javascript nedir?..
(8049 okuma, 4 yanıt)
 Aspde md5..
(6543 okuma, 2 yanıt)
Netopsiyon Online: Forums
Netopsiyon Online :: Başlık görüntüleniyor - Domain Sorgulama [ A.S.P ]
 AramaArama   RütbelerRütbeliler   ProfilProfil   GirişGiriş 

Domain Sorgulama [ A.S.P ]

 
Bu forum kilitlendi: mesaj gönderemez, cevap yazamaz ya da başlıkları değiştiremezsiniz   Bu başlık kilitlendi: mesajları değiştiremez ya da cevap yazamazsınız    Netopsiyon Online Forum Ana Sayfa -> Diğer Diller
Önceki başlık :: Sonraki başlık  
Yazar Mesaj
emrahkaya
Mesaj: 500+
Mesaj: 500+





Kayıt: Jan 27, 2006
Mesajlar: 704
Konum: Geldiğimi ßende ßilmiyom :D
MesajTarih: 2007-05-12, 09:18:01    Mesaj konusu: Domain Sorgulama [ A.S.P ] Alıntıyla Cevap Gönder
Kod:
 <Option> 
<% 
 



Response.Buffer = False 

Server.ScriptTimeout = 90 

Private Function whoisResult(whoisURL, strMethod, strCheckString) 

     
     Dim objXMLHTTP               
     Dim strWhoisResultString     

     
     Set objXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP" ) 
     
     

     
        objXMLHTTP.Open strMethod, whoisURL, False 
         
         
        objXMLHTTP.SEnd 
         
         
        strWhoisResultString = objXMLHTTP.ResponseText 
         
         
        If InStr(1,strWhoisResultString,strCheckString,vbTextCompare) Then 
             
             
             whoisResult = "Bo?ta"   
             
       
        ElseIf InStr(1, strWhoisResultString, "Error" , vbTextCompare) Then 
             
             
             whoisResult = "Hata!"   
             
         Else 
             
              whoisResult = "Dolu"   
        End If 
       
         Set objXMLHTTP = Nothing 
         
End Function 


Private Function characterStrip(strTextInput) 

     Dim intLoopCounter       
     
     For intLoopCounter = 0 To 44 
          strTextInput = Replace(strTextInput, Chr(intLoopCounter), "" , 1, -1, 0) 
     Next 
     
     For intLoopCounter = 46 To 47 
          strTextInput = Replace(strTextInput, Chr(intLoopCounter), "" , 1, -1, 0) 
     Next 
     
     For intLoopCounter = 58 To 96 
          strTextInput = Replace(strTextInput, Chr(intLoopCounter), "" , 1, -1, 0) 
     Next 
     
     For intLoopCounter = 123 To 255 
          strTextInput = Replace(strTextInput, Chr(intLoopCounter), "" , 1, -1, 0) 
     Next 
     
     characterStrip = strTextInput 
     
End Function 


Dim strDomainName       

strDomainName = Trim(Request.QueryString("domain" )) 

 
If strDomainName <Then> 
<html> 
<head> 
<title></title> 

 
</head> 
<body bgcolor="#FFFFFF" text="#000000" link="#0000CC" vlink="#0000CC" alink="#FF0000"> 
 
<form strmethod="get" name="frmDomainCheck" action="whois.asp"> 
<table> 
   
  <tr> 
   <td> 
    <input> 
    <input> 
   </td> 
  </tr> 
 
</table> 
</form> 
<center> 
<% 
If strDomainName <Then> 
<table> 
  <tr> 
   <td>Domain Ysmi</td> 
   <td>Durum</td> 
  </tr> 
</table> 

<table> 
  <tr> 
   <td><Response></td> 
<td><Response></td> 
  </tr> 
</table> 
<table> 
  <tr> 
   <td><Response></td> 
<td><Response></td> 
  </tr> 
</table> 
<table> 
  <tr> 
   <td><Response></td> 
<td><Response></td> 
  </tr> 
</table> 
<br><br> 
<End> 
 
</body> 
</html>


Not: Php Sitesi Olan Arkadaşlar İframe Olarak Kullanabilirler
Başa dön
Kullanıcının profilini görüntüle Özel mesaj gönder E-posta gönder
Bu Site Google Adsense ile Gelir Elde Ediyor
Tarih: 2024-11-21, 12:18:25    Mesaj konusu: Forum Arası Reklamlar

Başa dön
artistbaron
Mesaj: 1000+
Mesaj: 1000+





Kayıt: Dec 09, 2006
Mesajlar: 2993
MesajTarih: 2007-05-12, 09:19:58    Mesaj konusu: Alıntıyla Cevap Gönder
emrah kardes anlamadım yanı bu sıteye domain sorgulama koyma gıbı bıseymı
Başa dön
Kullanıcının profilini görüntüle Özel mesaj gönder
emrahkaya
Mesaj: 500+
Mesaj: 500+





Kayıt: Jan 27, 2006
Mesajlar: 704
Konum: Geldiğimi ßende ßilmiyom :D
MesajTarih: 2007-05-12, 09:28:01    Mesaj konusu: Alıntıyla Cevap Gönder
Eğer Bi Asp İle Yapılmış Siten Varsa bu kodları Alıp Atıyorum domain.asp diye bi dosya açıp içerisine kaydedersin. bunu sitende yayınlamak içinse Ftp ye attığın bu domain.asp yi
<!--- #include file="domain.asp" ---> kodunu kullanarak sitende istediğin yere monte edebilirsin.

Eğer Siten Php yada html İse domain.asp yi i f r a m e içerisine alıp sitende yayınlayabilirsin

Bu Konu altında Yavaş Yavaş Nasıl Bir Asp Site Yapıldığının Bilgilerini vercem.
Başa dön
Kullanıcının profilini görüntüle Özel mesaj gönder E-posta gönder
Önceki mesajları göster:   
Bu forum kilitlendi: mesaj gönderemez, cevap yazamaz ya da başlıkları değiştiremezsiniz   Bu başlık kilitlendi: mesajları değiştiremez ya da cevap yazamazsınız    Netopsiyon Online Forum Ana Sayfa -> Diğer Diller Tüm zamanlar GMT + 3 Saat
1. sayfa (Toplam 1 sayfa)

 
Geçiş Yap:  
Bu forumda yeni başlıklar açamazsınız
Bu forumdaki başlıklara cevap veremezsiniz
Bu forumdaki mesajlarınızı değiştiremezsiniz
Bu forumdaki mesajlarınızı silemezsiniz
Bu forumdaki anketlerde oy kullanamazsınız

Benzer Konular
Başlık Yazar Forum Cevaplar Tarih
Yeni mesaj yok Ip ve Domain Girişi adigecan Php Nuke Sorunlarınız 0 2010-07-02, 18:47:04 Son Mesajı Görüntüle
Yeni mesaj yok www suz başlıyan domain ??? imtiyaz Php Nuke Sorunlarınız 5 2010-05-16, 16:28:29 Son Mesajı Görüntüle
Yeni mesaj yok marmaray.info,ucretliogretmenlik.com,... djerdinc Domain Pazarı 0 2010-05-16, 11:52:59 Son Mesajı Görüntüle
Yeni mesaj yok host ve domain sürem bitmek üzere karaca25 Domain Pazarı 0 2010-05-05, 13:38:04 Son Mesajı Görüntüle
Yeni mesaj yok .Tr Domain Neden Yok ?[Tartışma] Lütf... qombat Öneri ve Görüşleriniz 15 2010-04-08, 13:37:28 Son Mesajı Görüntüle

Copyright © 2002-2024 Netopsiyon Bilişim Teknolojileri San. Tic. Ltd.Şti. - Bütün hakları saklıdır!
Bu site Netopsiyon.com.tr Sunucularında Barındırılmaktadır.
Netopsiyon Bilişim Teknolojileri San. Tic. Ltd.Şti. Netopsiyon Copyright