网上批量查询发票

opiona

蓝天大师的杰作，支持，学习一下！

蓝天630902

已更新

大卫124578

为人类造福。伟人啊

蓝天630902

大卫124578 发表于 2013-2-24 12:14
为人类造福。伟人啊

重新安装一个Excel2007看看

cumulonimbus

蓝天630902 发表于 2013-2-24 12:33
重新安装一个Excel2007看看

蓝天大师，可有办法下载这个农业银行的银行卡历史交易数据么？
https://easyabc.95599.cn/commbank/netBank/zh_CN/CommLogin.aspx?ClientIP=

kangatang

cumulonimbus 发表于 2013-2-25 23:07
蓝天大师，可有办法下载这个农业银行的银行卡历史交易数据么？
https://easyabc.95599.cn/commbank/netB ...

如果你只是为了练习的话，还是换个网址吧。银行、移动等都是会涉及到个人隐私和一些机密的东西。

cumulonimbus

kangatang 发表于 2013-2-26 12:37
如果你只是为了练习的话，还是换个网址吧。银行、移动等都是会涉及到个人隐私和一些机密的东西。

大师，请问这个问题应如何解决？
            Set p = ActiveSheet.Pictures.Insert("c:\2.bmp")
            Set rng = Cells(nn, 1)
            With p
                .Top = rng.Top
                .Left = rng.Left
                .Height = rng.Height
                .Width = rng.Width
            End With
我用这个代码插入从网站下载的验证码，即c:\2.bmp，但是经常会出现这种情况，c:\2.bmp图片变了，但是插入的还是前一个插入的图片，这要如何解决？谢谢

cumulonimbus

蓝天630902 发表于 2013-2-24 12:33
重新安装一个Excel2007看看

.Open "GET", "http://swcx.hb-n-tax.gov.cn/hbgs/invoice/front/invoice_query.jsp", False
            .setRequestHeader "Referer", "http://swcx.hb-n-tax.gov.cn/hbgs/invoice/"
            .setRequestHeader "Connection", "Keep-Alive"
            .send
            .getallResponseHeaders
            cookies1 = Split(Split(.getallResponseHeaders(), "Set-Cookie: "), ";")(0)

            .Open "POST", "http://swcx.hb-n-tax.gov.cn/hbgs2/invoice/front/invoice_opr.jsp", False
            .setRequestHeader "Referer", "http://swcx.hb-n-tax.gov.cn/hbgs2/invoice/front/invoice_query.jsp"
            .setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
            .setRequestHeader "Cookie", cookies1
            .send "fp_code=" & Cells(m, 1) & "&fp_number=" & Cells(m, 2) & "&verify_code=" & yzm & "&x=34&y=17"

有许多个get，不知道要找哪个数据，大师能否给个图。

独孤小浪子

蓝大大

像这种的验证码该如何解决呀？

http://www.sdcrj.com/wwwroot/sdsgatcrjzwfww/services/ApplyProcessQuery.jsp

弄了一天了，也没找到做这种验证码的办法。

cumulonimbus

独孤小浪子 发表于 2013-2-27 16:59
蓝大大

像这种的验证码该如何解决呀？

你这验证码也奇怪，放在工作表上会斜的