![](https://img-blog.csdnimg.cn/20201014180756918.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
vba
DeltaTime
奔跑的橙子
展开
-
vba dom方式 爬虫
Sub Main() Set oHttp = CreateObject("MSXML2.XMLHTTP") Set odom = CreateObject("htmlfile") url = "https://item.jd.com/12941518.html" '发送请求获取网页源码添加到dom With oHttp .Open "GET", url, False .send odom.body.i原创 2021-12-20 15:04:40 · 934 阅读 · 0 评论 -
vba 连接mysql 查询
Option Explicit Sub 连接本地Mysql() '1. 引用ADO类库:前期或者后期绑定 Dim conn As ADODB.Connection Set conn = New ADODB.Connection Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset '2. ADO建立对数据源的链接 conn.ConnectionString = "Driver={M原创 2021-12-20 15:02:10 · 908 阅读 · 0 评论