1

我正在尝试从数据库中创建一个 html 文件，但在转义这一行时遇到问题"<meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\" />"

完整代码：

Dim filer As Integer, paths As String
filer = FreeFile

paths = App.Path + "\DB"
Open paths + "\test.html" For Output As #filer
    '...
    Print #filer, "<meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\" />"
    '...
Close #filer

我不知道为什么它会显示为红色并且不要让我创建.exe它甚至运行它

4

1 回答 1

2

您的问题是您试图像在 perl 或 c++ 中一样转义双引号。

尝试使用疯狂的 MS 双双引号。
像这样：

Print #filer, "<meta http-equiv=""Content-Type"" content=""text/html; charset=UTF-8"" />"

或者

str1 = "<meta http-equiv=" & chr(34) & "Content-Type" & chr(34) ' etc
Print #filer, str1

编辑：更正报价。

  • 两个引号 = 字符串中的 1 个引号字符。当您的引号字符紧邻定义字符串的引号时，这可能会令人困惑。
    • "hello "" BOB"=Hello " Bob
    • """Hello "" BOB"""="Hello " BOB"
于 2012-06-25T20:25:26.067 回答