asp 如何禁止国内的IP访问我的网站   
我的网站是英文的 不想让国内的访问  有什么好办法

<%
Function leleToStr(str)

 Dim stream

 Set stream=Server.CreateObject("ADODB.Stream")

 With stream
   .Type=1
   .Mode=3
   .Open
   .Write str
   .Position = 0
   .Type = 2
   .Charset = "gb2312"
   leleToStr = .ReadText
   .Close

 End With

 Set stream=Nothing
End Function


'获取IP所在地区
Function getIPAddress()
on error resume next

 dim xmlhttp,url

 url = "http://ip."

 set xmlhttp = server.CreateObject("Msxml2.XMLHTTP")

 xmlhttp.open "get",url,false

 xmlhttp.send


 '开始截取字符       
 dim StartStr,EndStr,html

 html = leleToStr(xmlhttp.responseBody)

 StartStr = Instr(html,"所在地为：")       

 EndStr = Instr(html,"如果该IP")       

 html = mid(html,StartStr,EndStr-StartStr)


 '再次获取
 StartStr = Instr(html,"<span>")

 StartStr = StartStr + 6

 EndStr = Instr(html,"</span>")

 html = mid(html,StartStr,EndStr-StartStr)


 getIPAddress = html

 if err then err.clear:html = ""

 set xmlhttp = nothing
End Function

if Instr(getIPAddress(),"中国")>0 then response.end
%>

用程序的方法获取IP查是否含中国（国内）试一下。。
会影响网站打开速度。。。
http://ip.

要是真用这个方法限制。。可以尝试判断是中国后，保存是否的值在一个变量里通过保存为Cookies或session里。。最好cookie。设置有效时间，再直接判断cookie...session来限制。。只有第一次打开才会到http://ip.检测。。这样做应该不影响以后的打开速度了。

看看又不会吃亏！

我建议你移民到火星去

楼主这个想法比较奇怪，建议楼主不要让地球上的互联网用户访问你的网站。。。

呃，看来要楼主自己来才能解释这个需求之意了。。

呵呵。
刚开始，我也感觉好奇怪。不过，后来，做外贸的客户经常有提起这个问题，问他们也没有说明原因，大多数只是说老板的要求。有部份表示为了防止同行朋友的攻击。。还有一些程序上的朋友也讨论怎么实现这个功能。在想：我不需要这个功能，这。。。不代表别人不需要。。
我认为，客户既然找程序员做网站，这样一般是不太懂网站相关更不会懂程序。网站建设好以后。。发布文章。。有些企业网站管理员。直接复制同行朋友网站上的文章，文章包含的图片呢？直接在编辑器里发布调用。。同行朋友调用了自己网站的图片。。占用了iis连接数。。。调用得多了，可能会影响网站性能。。

.......

楼上说的好啊呵呵

客户就是不想让同行看到   他用的是国内同行的图片   

有什么好办法没

你可以试一下二楼发的那个代码应该是可以实现的。。借腾讯的IP分享返回国籍判断中国。。首次访问才需要检测，其实网站速度影响不大。。
http://www.
之前也有朋友问过我。。要不你参考一下这篇文章。。

[ 本帖最后由 lele2007 于 2011-1-10 13:46 编辑 ]

关键的问题是，如何判断是国内用户还是国外用户，就目前看来，唯一可行的就是IP，知道了这点，其实实现起来并不难。