請(qǐng)教VBA文件寫(xiě)入 [金字塔]
- 咨詢內(nèi)容：
Set fso = CreateObject("Scripting.FileSystemObject")
Set file = fso.createTextFile("d:\shit.txt")
Set file = Nothing
Set testFile = fso.OpenTextFile("d:\shit.txt")
testFile.Write("shit") '寫(xiě)入字符串testFile.close
請(qǐng)問(wèn)下 在寫(xiě)入文字的時(shí)候提示 多步OLE DB操作產(chǎn)生錯(cuò)誤 是什么問(wèn)題呢 謝謝
- 金字塔客服：
正在處理，請(qǐng)稍后
- 用戶回復(fù)：
Sub CreateFile()
Dim fso, tf
Set fso = CreateObject("Scripting.FileSystemObject")
Set tf = fso.CreateTextFile("c:\testfile.txt", True)
' 寫(xiě)一行，并帶有一個(gè)新行字符。
tf.WriteLine("Testing 1, 2, 3.")
' 向文件寫(xiě)三個(gè)新行字符。
tf.WriteBlankLines(3)
' 寫(xiě)一行。
tf.Write ("This is a test.")
tf.Close
End Sub - 網(wǎng)友回復(fù)：
Leon 首先非常感謝您的回答 目前已經(jīng)處理好了 可是有個(gè)疑問(wèn) 我提供的VBA 在excel中可以執(zhí)行 但為何在金字塔VBS中就不行呢？ 感謝
- 網(wǎng)友回復(fù)：
金字塔的VBS和office的vba不完全一樣，有些對(duì)象支持有些對(duì)象是不支持的，具體你在軟件幫助里可以查到。
比如，Order對(duì)象，在VBA中沒(méi)有，在金字塔下就是用于交易的對(duì)象
如果以上指標(biāo)公式不適用于您常用的行情軟件
或者您想改編成選股公式，以便快速選出某種形態(tài)個(gè)股的話，
可以聯(lián)系我們相關(guān)技術(shù)人員 QQ: 262069696 進(jìn)行 有償 改編！
- 上一篇：drawdsl函數(shù)異常
- 下一篇：求助guotx2010
相關(guān)文章
-
沒(méi)有相關(guān)內(nèi)容
會(huì)員登錄/注冊(cè)