摘要: vba爬虫返回数据乱码处理 Function BytesToBstr(strBody, CodeBase) '使用Adodb.Stream对象提取字符串 Dim objStream On Error Resume Next Set objStream = CreateObject("Adodb.St 阅读全文
posted @ 2022-11-20 02:11 吃饱饱没烦恼 阅读(291) 评论(0) 推荐(0) 编辑
摘要: vba解析html页面 Sub test() 'vba解析html页面(字符串) Dim ohtml, ohttp, table, byid, byname, byclassname, selectorall, selector As Object, s As String Set ohtml = 阅读全文
posted @ 2022-11-20 02:01 吃饱饱没烦恼 阅读(662) 评论(0) 推荐(0) 编辑