屏蔽地区ASP.NET写法

<%
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不懂。帮帮我感谢

解决方案 »

  1.   

    <%
    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");
    %>
      

  2.   

    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);
      

  3.   

    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()
      

  4.   

    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()
      

  5.   

    缺少using引用,添加引用到页面上
    或代码放cs文件中
      

  6.   

    using怎么引用。我对NET完全白菜级 。不懂帮帮我。我要怎么做。详细点。感谢
      

  7.   


    没有任何错误的，。是你使用方法不对<%@ 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>
      

  8.   

    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>