防盗链基础知识学习——Session，Cookie，jsessionid，Url重写

akendy

很深奥，马克一下，以后慢慢学习吧

无姓人

谢谢引子玄老师的辛苦总结，谢谢！！做个记号！！

№▁▃风筝﹋

引子玄 发表于 2012-12-3 13:05
多谢，是啊，碰到解决不了的“防盗链”，就要想到用IE，突破防盗链的障碍，不然就很头疼。

碰到那种有浏览器ui要求的的网站怎么办？比如有的网站IE浏览器访问不了，要求谷歌内核的浏览器才能访问。在网上找过一个更改IE浏览器的useragent的代码，但是运行了也没有效果，抓包软件得到的还是IE的useragent，网站也还是访问不了

1. 标准模块中：
   
2. Public Declare Function UrlMkSetSessionOption Lib "urlmon.dll" _
   
3.                 (dwOption As Long, pBuffer As String, dwBufferLength As Integer, dwReserved As Integer) As Long
   
4. 
   
5. Public Const URLMON_OPTION_USERAGENT = &H10000001
   
6. 
   
7. Public Function ChangeUserAgent(Agent As String) As Integer
   
8.      UrlMkSetSessionOption URLMON_OPTION_USERAGENT, Agent, Len(Agent), 0
   
9. End Function
   
10. 
    
11. 调用：
    
12. Private Sub WebBrowser1_BeforeNavigate2(ByVal pDisp As Object, URL As Variant, Flags As Variant, TargetFrameName As Variant, PostData As Variant, Headers As Variant, Cancel As Boolean)
    
13.     Agentstr = "User-Agent:Mozilla/5.0 (Windows NT 5.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/49.0.2623.112 Safari/537.36"
    
14. '    Agentstr = "Mozilla/5.0 (Windows NT 5.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/49.0.2623.112 Safari/537.36"
    
15.     ChangeUserAgent Agentstr
    
16. End Sub

复制代码