weixin_40187983
2018-11-02 16:07
采纳率: 73.6%
浏览 652
已采纳

淘宝的网页字串转换(使用vb.net)

  • 写回答
  • 好问题 提建议
  • 关注问题
  • 收藏
  • 邀请回答

1条回答 默认 最新

  • threenewbee 2018-11-03 02:38
    已采纳
    Imports System.Net
    Imports System.Text.RegularExpressions
    
    Public Class Form1
    
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Dim http As HttpWebRequest = HttpWebRequest.Create(TextBox1.Text)
            http.Method = "GET"
            http.AllowAutoRedirect = False
            Dim re = http.GetResponse()
            Dim url = re.Headers("Location")
            MsgBox(Regex.Match(url, "(?<=id\=)\d+").Value)
        End Sub
    End Class
    
    

    图片说明

    问题如果解决,请点我回答左上角的采纳,谢谢

    已采纳该答案
    评论
    解决 无用
    打赏 举报

相关推荐 更多相似问题