Arkadaslar asagidaki kodu siteme eklyorum fakat domain sorusturmasi yaptigimda sonuc hepsi musait cikiyor burdaki hata nedir?



Kod:
Klas Ticaret Hosting ve Domain Hizmetleri Domain Sorgulama Sonucları

0 then MESAJ1="Musait Değil" else MESAJ1="Musait" end if a2=InStr(1,txtURL2,"Domain Name:") if a2>0 then MESAJ2="Musait Değil" else MESAJ2="Musait" end if a3=InStr(1,txtURL3,"Domain Name:") if a3>0 then MESAJ3="Musait Değil" else MESAJ3="Musait" end if response.write " [TABLE]
" response.write " [TR]
" response.write " [TD] [/TD]
" response.write " [/TR]
" response.write " [TR]
" response.write " [TD]ALAN ADI[/TD]
" response.write " [TD]ALAN DURUMU[/TD]
" response.write " [TD]İŞLEM[/TD]
" response.write " [/TR]
" response.write " [TR]
" if MESAJ1="Musait Değil" then response.write " [TD]http://www."&domain&".com[/TD]
" else response.write " [TD]http://www."&domain&".com[/TD]
" end if response.write " [TD]"&MESAJ1&"[/TD]
" if MESAJ1="Musait" then response.write " [TD]Satın Al[/TD]
" else response.write " [TD]Detay[/TD]
" end if response.write " [/TR]
" response.write " [TR]
" if MESAJ2="Musait Değil" then response.write " [TD]http://www."&domain&".net[/TD]
" else response.write " [TD]http://www."&domain&".net[/TD]
" end if response.write " [TD]"&MESAJ2&"[/TD]
" if MESAJ2="Musait" then response.write " [TD]Satın Al[/TD]
" else response.write " [TD]Detay[/TD]
" end if response.write " [/TR]
" response.write " [TR]
" if MESAJ3="Musait Değil" then response.write " [TD]http://www."&domain&".org[/TD]
" else response.write " [TD]http://www."&domain&".org[/TD]
" end if response.write " [TD]"&MESAJ3&"[/TD]
" if MESAJ3="Musait" then response.write " [TD]Satın Al[/TD]
" else response.write " [TD]Detay[/TD]
" end if response.write " [/TR]
" response.write " [TR]
" if MESAJ3="Musait Değil" then response.write " [TD]http://www."&domain&".info[/TD]
" else response.write " [TD]http://www."&domain&".info[/TD]
" end if response.write " [TD]"&MESAJ3&"[/TD]
" if MESAJ3="Musait" then response.write " [TD]Satın Al[/TD]
" else response.write " [TD]Detay[/TD]
" end if response.write " [/TR]
" response.write " [TR]
" if MESAJ3="Musait Değil" then response.write " [TD]http://www."&domain&".name[/TD]
" else response.write " [TD]http://www."&domain&".name[/TD]
" end if response.write " [TD]"&MESAJ3&"[/TD]
" if MESAJ3="Musait" then response.write " [TD]Satın Al[/TD]
" else response.write " [TD]Detay[/TD]
" end if response.write " [/TR]
" response.write " [TR]
" if MESAJ3="Musait Değil" then response.write " [TD]http://www."&domain&".biz[/TD]
" else response.write " [TD]http://www."&domain&".biz[/TD]
" end if response.write " [TD]"&MESAJ3&"[/TD]
" if MESAJ3="Musait" then response.write " [TD]Satın Al[/TD]
" else response.write " [TD]Detay[/TD]
" end if response.write " [/TR]
" response.write " [TR]
" if MESAJ3="Musait Değil" then response.write " [TD]http://www."&domain&".us[/TD]
" else response.write " [TD]http://www."&domain&".us[/TD]
" end if response.write " [TD]"&MESAJ3&"[/TD]
" if MESAJ3="Musait" then response.write " [TD]Satın Al[/TD]
" else response.write " [TD]Detay[/TD]
" end if response.write " [/TR]
" response.write "[TR]
" response.write "[TD="colspan: 3"]

" with response .write "[TABLE]
" .write "[TR="bgcolor: efefef"]
" .write "[TD]" .write ".com.tr
" .write ".org.tr
" .write ".gov.tr
" .write ".bel.tr
" .write ".k12.tr" .write "[/TD]
" .write "[TD]" .write "30 $
" .write "20 $
" .write "20 $
" .write "20 $
" .write "20 $" .write "[/TD]
" .write "[/TR]
" .write "[TR]
" .write "[TD="colspan: 2, align: center"]
" .write "Ozel Kurumsal Paketlerinizin Siparişleri İcin Lutfen Bizimle İrtibata Geciniz.." .write "[/TD]
" .write "[/TR]
" .write "[/TABLE]
" end with response.write "[/TD]
" response.write "[/TR]
" response.write " [/TABLE]
" set obj = nothing %>