Visual Basic - txt作为电子邮件脚本的字符串

Question

我正在尝试修复一个mailscript。

我非常需要像

这样的东西

cmBody = "c:\body.txt"

这不是那么简单，但你明白了。

txt文件是电子邮件的内容。

我希望你们能帮助我。

Answer 1

你可以这样做：

    Dim fso As Object
    Dim contents As String

    Set fso = CreateObject("Scripting.FileSystemObject")
    contents = fso.OpenTextFile("c:\temp\test.txt", ForReading).ReadAll()

Answer 2

我明白了。

这是我最终使用的代码。 （如果你们中任何人都明白这个问题）

Open "C:\body.txt" For Input As #intFile
strFile = Input$(LOF(intFile), #intFile)
Close #intFile
cmBody = strFile