我正在尝试使用vba来发布到web api。问题是该参数在web api中为空。web api是用asp编写的。我从c#调用了api,它可以工作,但是我不能让它在vba中工作。 下面是对api的vba调用: Sub Test()
Dim http As New MSXML2.XMLHTTP60
http.Open "POST", "http://10.5.72.172:108/api/vbaemail", True
http.SetRequestHeader "Content-type", "appl
如何在Laravel控制器中捕获来自VBA-Excel的HTTP Post,以便更新模型?我在Homestead上运行我的laravel应用程序。下面是我到目前为止没有成功的尝试的演示。
VBA-EXCEL
Sub httpPost()
Dim XMLHTTP As Object
Dim result As String
Dim argumentString As String
argumentString = "screen_name=ET"
Set XMLHTTP = CreateObject("MSXML2.ServerXMLHTTP.6.0")
XMLH
我已经在vba中编写了一个脚本,以获取站点地图链接中不同节点中的所有链接,但无法成功。
我如何获取这些链接?
这是我已经尝试过的:
Sub TestXML()
Dim Http As New XMLHTTP60, Xmldoc As Object
Dim post As Object, R&
With Http
.Open "GET", "https://www.klerenmakendebaby.nl/product-sitemap.xml", False
.setRequestHeader &
为了好玩,我用vba刮了一些网站,我用VBA作为工具。我使用XMLHTTP和HTMLDocument (因为它比internetExplorer.Application更快)。
Public Sub XMLhtmlDocumentHTMLSourceScraper()
Dim XMLHTTPReq As Object
Dim htmlDoc As HTMLDocument
Dim postURL As String
postURL = "http://foodffs.tumblr.com/archive/2015/11"
我已经用vba编写了一些脚本来解析从torrent站点指向下一个页面的链接。我的脚本能够抓取它们。然而,我面临的问题是在结果中出现了几个重复的链接。我的问题是,是否有什么技术可以让我只解析唯一的链接?
Sub TorrentData()
Dim http As New XMLHTTP60, html As New HTMLDocument, post As Object
With http
.Open "GET", "https://yts.ag/browse-movies", False
.send
我正在构建一个VBA应用程序来创建和修改Wordpress网站页面,使用从网络上刮来的资源。Wordpress API返回一个JSON文件,但是在VBA中不支持解析JSON,所以我从GitHub中导入了VBA。下面是子程序:
Sub Wordpress()
'
' Wordpress API Test
'
Dim wpResp As Variant
Dim sourceSheet As String
Dim resourceURL As String
sourceSheet = "Resources
我正在尝试从MS Access VBA发送POST URL消息。当我尝试运行代码时,它告诉我无法编译以下语句。有没有人知道我的语法哪里错了?提前感谢您的帮助。
objHTTP.Open "POST", "http://kt1.com/apiv2/Configuration.asmx", False
完整的代码是:
Private Sub newKT_WebService_Click()
Dim objHTTP As String
Dim replyTXT As String
Dim AuthCode As String
objH
有没有一种方法可以为表提取html代码,并使用VBA在word文档中打印出相同的表(VBA应该能够解析表的html代码块)?
可以将表的内容复制到Word中创建的新表中,但是是否可以使用html代码和vba重新创建表?
对于这其中的任何一个,我们从哪里开始研究?
编辑:多亏了R3uK:下面是VBA脚本的第一部分,它从文件中读取一行html代码,并使用R3uK的代码将其打印到excel工作表中:
Private Sub button1_Click()
Dim the_string As String
the_string = Trim(ImportTextFile("p
我有一个VBA脚本,我一直试图让它给我一个点击按钮的距离
工作表名称是inputwks,我已经定义了名为C_post、D_post和Miles的单元格。我尝试将VBA脚本中的C01设置为C_post的值,将C02设置为D_post的值,将距离设置为Miles
子GetDistance()
Dim inputWks As Worksheet
Dim c01 As Range
Dim c02 As Range
Dim Miles As Range
Dim distance As Range
'Set distance = inputWks.Range("Miles")
我编写了一个代码,通过google使用vba解析来自多个站点的数据。它可以刮除标记元素"h3“和"a”,而不管搜索是什么。但是,如果可能的话,我想解析任何搜索的名称或电话号码。提前谢谢你的帮助。
Sub GoogleSearch()
Dim http As New MSXML2.XMLHTTP60, html As New HTMLDocument, hmm As New HTMLDocument
Dim topics As Object, post As Object, link As Object, posts As Object
Dim url As String, z
我需要一些帮助与VBA的帖子,以松弛使用标记。我做了一个发送文本到我的Slack频道的宏,但是我找不到正确的方法来制作我的文本,这样slack的输出将以一种格式化的方式发布,显示超链接文本而不是整个文本字符串,或者发布一个图像而不是图像url。 下面是我的工作代码。 Sub BOT_SLACK_POST()
Dim HTTP As Object, Htmldoc As New HTMLDocument
Set HTTP = CreateObject("WinHttp.WinHttpRequest.5.1")
Dim send_text As String
send_text
我有一个Excel VBA宏,它执行以下HTTP POST的等价物,并成功工作:
Set WebClient = CreateObject("WinHttp.WinHttpRequest.5.1")
' ... Configure WebClient for a POST request
RequestBody = "<request>"
WebClient.send RequestBody
之前,我显式地将RequestBody的类型设置为字符串,如下所示:
Set WebClient = CreateObject("WinHttp
基本上,我想使用php作为中间件与MYSQL服务器通信。
由于需要安装驱动程序,我无法直接连接到数据库,并且我们的IT部门不允许在我们公司的计算机上安装驱动程序。
我知道如何使用vba ->php->mysql插入数据,但我不知道如何将数据从mysql转换为excel。vba->php->mysql->php->vba。
我想做一个查询,并将结果发送到vba excel。
下面是可以工作的VBA代码,但它也会返回多个空格。我不确定这是否是正确的方法。
Private Sub ExtractPHP()
Dim item As String
我的脚本能够从使用vba和selenium加密的javascript的网页中获取表的全部内容。该表有一个下拉选项,可以通过点击"all“来选择完整的内容。该表有300行数据,分布着7列。大约有七个步骤要遍历才能到达目标页面。解析它们需要一段时间。只要运行它,坐下来,放松,直到浏览器关闭。它工作得很完美。我无法使用显式等待创建脚本,因为我怀疑vba中是否有任何选项。这是工作代码。
Sub Table_Data()
Dim driver As New WebDriver
Dim posts As Object, post As Object, t_data As Object
With
在Google API中使用以下VBA代码将有效的授权令牌交换为访问令牌时,我收到一个"400 Bad Request“错误。有没有人能解释一下为什么,我已经为这个问题挣扎了一个多星期。
Dim http As MSXML2.XMLHTTP
Dim sUrl As String
Dim sUrlHeader As String
Dim svarbody As String
Set http = New MSXML2.XMLHTTP
sUrl = "https://accounts.google.com/o/oauth2/token? HTTP/1.1"
http.
我一直试图在Microsoft中使用VBA将文件上传到Azure存储,但到目前为止没有成功。
我已经进行了很好的搜索,并找到了一些看起来很有前途的代码,但我无法让它工作。似乎许多其他人都在寻找类似的解决方案或帮助使用VBA的Azure。
这是密码;
Private Function pvPostFile(sUrl As String, sFileName As String, Optional ByVal bAsync As Boolean) As String
Const STR_BOUNDARY As String = "3fbd04f5-b1ed-4060-99b9-fca7f
我正在尝试在VBA中发出一个HTTP post请求,但得到一个空响应。下面是我的代码:
Sub User()
On Error Resume Next
Dim HTTPreq As WinHttpRequest
Set HTTPreq = New WinHttpRequest
URL = "https://www.transfermarkt.com/site/DropDownWettbewerbe"
HTTPreq.Open "POST", URL, False
HTTPreq.setRequestHeader &