小编DaR*_*DaR的帖子

CURL CouchDB复制命令 - 无效的JSON

我在curl中运行以下行试图设置couchdb复制:

curl -X POST -d '{"source":"http://user:password@siteA.com:5984/main","target":"main"}' -H 'Content-Type: application/json' http://user:password@siteB.com/_replicate
Run Code Online (Sandbox Code Playgroud)

它不断返回以下错误:

{"error":"bad_request","reason":"invalid UTF-8 JSON"}
Run Code Online (Sandbox Code Playgroud)

据我所知,JSON似乎有效.有任何想法吗?

我也在使用Powershell.

powershell replication json curl couchdb

4
推荐指数
1
解决办法
2355
查看次数

VBA查找和替换

我正在使用Excel VBA从电子表格生成word文档.我想找到并用单个段落替换所有双段落作为最后一步的一部分.

基本代码:

Dim objWord
Dim objDoc
Dim objSelection

Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Add
Set objSelection = objWord.Selection

objSelection.TypeText "Test"
objSelection.TypeText (vbCr)
objSelection.TypeText (vbCr)
objWord.Visible = True
Run Code Online (Sandbox Code Playgroud)

查找和替换基本文本作品:

With objWord.ActiveDocument
    Set myRange = .Content
    With myRange.Find
        .Execute FindText:="test", ReplaceWith:="apple", Replace:=2
    End With
End With
Run Code Online (Sandbox Code Playgroud)

查找和替换段落不起作用:

With objWord.ActiveDocument
    Set myRange = .Content
    With myRange.Find
        .Execute FindText:="^^p", ReplaceWith:="^p", Replace:=2
    End With
End With
Run Code Online (Sandbox Code Playgroud)

excel vba ms-word excel-vba

2
推荐指数
1
解决办法
442
查看次数

标签 统计

couchdb ×1

curl ×1

excel ×1

excel-vba ×1

json ×1

ms-word ×1

powershell ×1

replication ×1

vba ×1