铆钉

@玲音 > strHeaders = _T("Referer:http://finance.sina.com.cn/";); > CHttpFile* pFile = (CHttpFile*)session.OpenURL((L...

@beron1688 > 请问楼主，我的改了后还是不行。请假解决办法。谢谢楼主！ > Sub 获取价格_Click() > Dim rowCount As Integer > Dim url As String >...

@唐唐1224 > 又被禁了。。。 > 我同样也打不开了 更新代码了 在 .send 前面加 .setRequestHeader "Referer", "http://finance.sina.com.cn/&qu...

@Skyzh1 > 好像新浪把这个方法也给禁止了 更新代码了 在 .send 前面加 .setRequestHeader "Referer", "http://finance.sina.com.cn/"

@黄JJ > 大哥，能不能详细点怎么改啊，最好直接贴改好的出来，完全不懂编程。 {{{ Set objXML = CreateObject("Microsoft.XMLHTTP") With objXML .Open "G...