[技术讨论] 如果要用VBS把一段代码写到另一VBS中 怎样写换行符？

unhack

必须用chr13chr10吗？

czjt1234

s1 = "Set objFSO = CreateObject(""Scripting.FileSystemObject"")" & vbCrLf & _
     "Set objTextStream = objFSO.OpenTextFile(""D:\ok.txt"", 8, True)" & vbCrLf & vbCrLf & _
     "Set objIE = CreateObject(""InternetExplorer.Application"")" & vbCrLf & _
     "objIE.Navigate ""d:\下载\index.htm""" & vbCrLf & _
     "Do" & vbCrLf & _
     "    Wscript.Sleep 200" & vbCrLf & _
     "Loop While objIE.Busy Or objIE.ReadyState <> 4" & vbCrLf & vbCrLf

unhack

s1 = "Set objFSO = CreateObject(""Scripting.FileSystemObject"")" & vbCrLf & _
     "Set objTextStre ...
czjt1234 发表于 2014-1-1 09:21

    非常感谢，原来你就是给我中文WMI手册的那个人啊  呵呵  请问为什么有的地方是一个VBCRLF 为什么有的地方是两个呢？

czjt1234

2个vbCrLf是为了看起来清楚