屏蔽地区ASP.NET写法

jaybin0312 2010-10-30 12:05:35
<%
userip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip="" Then userip=Request.ServerVariables("REMOTE_ADDR")
Dim objXMLHTTP,xml
Set xml=Server.CreateObject("Microsoft.XMLHTTP")
xml.Open "GET"," http://www.baidu.com/s?wd="&userip,False
xml.Send
if InStr(xml.responseText,"广州") then
Response.Redirect http://www.baidu.com end if
%>


请教,这是asp的写法。请问用net.asp可不可以写,怎么写。详细点,我对NET不懂。帮帮我感谢。。。
...全文
196 12 打赏 收藏 转发到动态 举报
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
kkbac 2010-10-30
  • 打赏
  • 举报
回复
[Quote=引用 7 楼 jaybin0312 的回复:]

4楼
你的代码有错误呀。。
帮忙看一下。非常感谢
[/Quote]
缺少using引用,添加引用到页面上
或代码放cs文件中
wuyq11 2010-10-30
  • 打赏
  • 举报
回复
Dim userip As [String] = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If [String].IsNullOrEmpty(userip) Then
userip = Request.ServerVariables("REMOTE_ADDR")
End If
Dim req As System.Net.HttpWebRequest = TryCast(System.Net.HttpWebRequest.Create(""), System.Net.HttpWebRequest)
Dim res As System.Net.HttpWebResponse = TryCast(req.GetResponse(), System.Net.HttpWebResponse)
Dim reader As New System.IO.StreamReader(res.GetResponseStream(), System.Text.Encoding.GetEncoding("GB2312"))
Dim result As [String] = reader.ReadToEnd()
If result.Contains("广州") Then
Response.Redirect("")
End If
reader.Close()
res.Close()
jaybin0312 2010-10-30
  • 打赏
  • 举报
回复
4楼
你的代码有错误呀。。
帮忙看一下。非常感谢
whb147 2010-10-30
  • 打赏
  • 举报
回复
你没有好的IP库,你很难判断的
孟子E章 2010-10-30
  • 打赏
  • 举报
回复
VB.NET写法
        Dim userip As [String] = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If [String].IsNullOrEmpty(userip) Then
userip = Request.ServerVariables("REMOTE_ADDR")
End If

Dim req As System.Net.HttpWebRequest = TryCast(System.Net.HttpWebRequest.Create("http://www.baidu.com/s?wd=" & userip), System.Net.HttpWebRequest)
Dim res As System.Net.HttpWebResponse = TryCast(req.GetResponse(), System.Net.HttpWebResponse)
Dim reader As New System.IO.StreamReader(res.GetResponseStream(), System.Text.Encoding.GetEncoding("GB2312"))
Dim result As [String] = reader.ReadToEnd()
If result.IndexOf("广州") > -1 Then
Response.Redirect("http://www.baidu.com")
End If
reader.Close()
res.Close()
孟子E章 2010-10-30
  • 打赏
  • 举报
回复
C#

    String userip = Request.ServerVariables["HTTP_X_FORWARDED_FOR"];
if (String.IsNullOrEmpty(userip))
{
userip = Request.ServerVariables["REMOTE_ADDR"];
}

System.Net.HttpWebRequest req = System.Net.HttpWebRequest.Create("http://www.baidu.com/s?wd=" + userip) as System.Net.HttpWebRequest;
System.Net.HttpWebResponse res = req.GetResponse() as System.Net.HttpWebResponse;
System.IO.StreamReader reader = new System.IO.StreamReader(res.GetResponseStream(), System.Text.Encoding.GetEncoding("GB2312"));
String result = reader.ReadToEnd();
if (result.IndexOf("广州") > -1)
{
Response.Redirect("http://www.baidu.com");
}
reader.Close();
res.Close();
//Response.Write(result);
threenewbee 2010-10-30
  • 打赏
  • 举报
回复
可以是可以。不过最好在防火墙里面屏蔽。
孟子E章 2010-10-30
  • 打赏
  • 举报
回复
C#页面
<%@ Page Language="C#" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<script runat="server">

protected void Page_Load(object sender, EventArgs e)
{
String userip = Request.ServerVariables["HTTP_X_FORWARDED_FOR"];
if (String.IsNullOrEmpty(userip))
{
userip = Request.ServerVariables["REMOTE_ADDR"];
}

System.Net.HttpWebRequest req = System.Net.HttpWebRequest.Create("http://www.baidu.com/s?wd=" + userip) as System.Net.HttpWebRequest;
System.Net.HttpWebResponse res = req.GetResponse() as System.Net.HttpWebResponse;
System.IO.StreamReader reader = new System.IO.StreamReader(res.GetResponseStream(), System.Text.Encoding.GetEncoding("GB2312"));
String result = reader.ReadToEnd();
if (result.IndexOf("广州") > -1)
{
Response.Redirect("http://www.baidu.com");
}
reader.Close();
res.Close();

}
</script>

<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title></title>
</head>
<body>
<form id="form1" runat="server">
<div>

</div>
</form>
</body>
</html>
孟子E章 2010-10-30
  • 打赏
  • 举报
回复
[Quote=引用 7 楼 jaybin0312 的回复:]
4楼
你的代码有错误呀。。
帮忙看一下。非常感谢
[/Quote]

没有任何错误的,。是你使用方法不对

<%@ Page Language="VB" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<script runat="server">

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
Dim userip As [String] = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If [String].IsNullOrEmpty(userip) Then
userip = Request.ServerVariables("REMOTE_ADDR")
End If

Dim req As System.Net.HttpWebRequest = TryCast(System.Net.HttpWebRequest.Create("http://www.baidu.com/s?wd=" & userip), System.Net.HttpWebRequest)
Dim res As System.Net.HttpWebResponse = TryCast(req.GetResponse(), System.Net.HttpWebResponse)
Dim reader As New System.IO.StreamReader(res.GetResponseStream(), System.Text.Encoding.GetEncoding("GB2312"))
Dim result As [String] = reader.ReadToEnd()
If result.IndexOf("广州") > -1 Then
Response.Redirect("http://www.baidu.com")
End If
reader.Close()
res.Close()
End Sub
</script>

<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title></title>
</head>
<body>
<form id="form1" runat="server">
<div>

</div>
</form>
</body>
</html>
jshi123 2010-10-30
  • 打赏
  • 举报
回复
<%
string userip = Request.UserHostAddress;
string resp = new System.Net.WebClient().DownloadString("http://www.baidu.com/s?wd=" + userip);
if (resp.IndexOf("广州") != -1)
Response.Redirect("http://www.baidu.com");
%>
jaybin0312 2010-10-30
  • 打赏
  • 举报
回复
using怎么引用。我对NET完全白菜级 。不懂。。。帮帮我。我要怎么做。详细点。感谢

62,272

社区成员

发帖
与我相关
我的任务
社区描述
.NET技术交流专区
javascript云原生 企业社区
社区管理员
  • ASP.NET
  • .Net开发者社区
  • R小R
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

.NET 社区是一个围绕开源 .NET 的开放、热情、创新、包容的技术社区。社区致力于为广大 .NET 爱好者提供一个良好的知识共享、协同互助的 .NET 技术交流环境。我们尊重不同意见,支持健康理性的辩论和互动,反对歧视和攻击。

希望和大家一起共同营造一个活跃、友好的社区氛围。

试试用AI创作助手写篇文章吧