我正在写一个VBSscript来上传普通" raw"文本到我的Mediawiki中,但我 无法在原始文本中添加换行符 。
例如,当我尝试使用VBS代码连接字符串中的新行时,如下所示:
S = S & "Some string" & Chr(10) & "some other string"
...并上传它(通过api EditPage),然后在Wiki上使用浏览器查看原始文本(在编辑模式下),然后文本如下:
"Some string%Asome other string"
Tha,没有真正的换行符,只有"%A"表示。
我也尝试过读取文本文件(来自磁盘)这样的行,但是这里没有插入换行符:
Function ReadEntireFile(aFile)
Const ForReading = 1
Dim S
Dim fso: Set fso = CreateObject("Scripting.FileSystemObject")
Dim theFile: Set theFile = fso.OpenTextFile(aFile, ForReading, False)
S = ""
Do While theFile.AtEndOfStream <> True
S = S & Chr(13) & Chr(10) & theFile.ReadLine
Loop
theFile.Close
ReadEntireFile = S
End Function
...但我得到了同样的结果,那就是:
"First string part%D%Asecond string part"
如您所知,如果您直接编辑mediawiki文章,那么输入新行没有问题(只需按&#34; ENTER&#34;像往常一样),但为什么我无法插入#13 (cr)和#10(lf)通过api上传的文本?我必须忽略一些事情。
请注意,我完全了解Html解析换行符(<br />
等)的语法,但这不是我在这里的内容,我想插入&# 34;生&#34; &#34; raw&#34; Mediawiki文章的源文本。
答案 0 :(得分:0)
我尝试在字符串上使用内置的VBScript函数Escape(sRawText)
来发送,然后 - 正如人们所期望的那样 - 任何(原始)字符串都可以通过API发送到Mediawiki。