excel vba添加了一个按钮事件click,click事件做一个简单http get请求收发数据的功能,每次打开excel后第一次点击按钮都能正常发送响应http请求,收发数据也都正确。但是之后再点击按钮http请求web服务端就没有再收到请求了,但是还能正常收到数据,而且收到现实的数据和状态与第一点击按钮的完全一样。即使我把web服务关了,点击按钮还是能正常收到200的状态码和数据,如果我把URL修改了那么就可以再次正常收发http请求,但是再之后就又不行了。click里面的http对象有缓存的原因吗?求帮忙看下解决下,不胜感激
Private Sub CommandButton1_Click()
Dim http
Ua = "北京设计院05&employeename=霍去病&employeeaccount=98313370&appname=光伏二期&hardwareinfo=123456"
U1 = Application.WorksheetFunction.EncodeURL(Cells(2, 1))
U2 = Application.WorksheetFunction.EncodeURL(Cells(3, 1))
U3 = Application.WorksheetFunction.EncodeURL(Cells(4, 1))
U4 = Application.WorksheetFunction.EncodeURL(Cells(5, 1))
U5 = Application.WorksheetFunction.EncodeURL(Cells(6, 1))
Url = "http://127.0.0.1:8000/appauthorget/?companyname=" + U1 + "&employeename=" + U2 + "&employeeaccount=" + U3 + "&appname=" + U4 + "&hardwareinfo=" + U5
Set http = CreateObject("Microsoft.XMLHTTP")
http.Open "GET", Url, False
http.send
MsgBox http.Status
Str aaa
aaa = http.responseText
Cells(1, 1) = aaa
End Sub
就是在xactive按钮click事件里面简单的给一个url发送一个get请求,只有打开excel第一次点击按钮正常,之后就一直重复的收到的都是和第一次一样的历史数据,即使我把web服务关了还是会正常收到和第一次一样的历史状态和数据
web服务关闭后,检查一下端口是否还占用。
为了每次请求不同,可以在url后面加上一个时间戳。