पाठ फ़ाइल खोलें और नया पाठ जोड़ें?

Question

मेरे पास एक पाठ है जो मैं बनाता हूं और फिर बाद में पाठ को जोड़ना चाहता हूं। लेकिन मुझे एक त्रुटि मिल रही है: अमान्य प्रक्रिया कॉल या तर्क।

Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
Dim Fileout As Object
Dim filePath As String
filePath = "C:\myFile.txt"


If FileExists(filePath) = False Then
Set Fileout = fso.CreateTextFile(filePath, True, True)
Fileout.Write Msg
Fileout.Close
Else
Set Fileout = fso.OpenTextFile(filePath, ForAppending, TristateFalse) <<<<<== ERROR HERE
Fileout.Write Msg
Fileout.Close
End If

Function FileExists(strFullPath As String) As Boolean
'Check if a file or folder exists
If Not Dir(strFullPath, vbDirectory) = vbNullString Then FileExists = True
End Function

Comments

किस बिंदु पर त्रुटि डाली जा रही है? आपने समस्या को ठीक करने के लिए पहले से क्या प्रयास किया है?

— Ƭᴇcʜιᴇ007

आपने अपने प्रश्न को पूरी तरह से अन्य प्रश्न में बदल दिया है।

— Clijsters

उत्तर प्राप्त करने के बाद अपना प्रश्न बदलना अनुचित है, क्योंकि यह आपके द्वारा प्राप्त उत्तरों को अमान्य कर देता है। यह उन उत्तरों को गलत भी बना सकता है, और उन लोगों की प्रतिष्ठा को प्रतिकूल रूप से प्रभावित करता है जिन्होंने जवाब दिया। यदि आपके पास अब एक नया या अतिरिक्त प्रश्न है, तो एक नया पोस्ट बनाएं और वहां पूछें; यदि आप संदर्भ के लिए आवश्यक हैं तो इसे वापस लिंक कर सकते हैं।

— DavidPostill

"चीनी अक्षर" इस ​​कोड स्निपेट के आधार पर तय नहीं किए जा सकते हैं, क्योंकि हम नहीं जानते हैं कि क्या सामग्री है Msg और न ही इसका डेटा प्रकार है। हालाँकि क्योंकि यह "अनजाने में चीनी है," यह शायद एक यूनिकोड / UTF स्ट्रिंग प्रारूप समस्या है।

— Yorik

Answer 1

मुझे एक त्रुटि मिल रही है: अमान्य प्रक्रिया या तर्क।

Set Fileout = fso.OpenTextFile(filePath, ForAppending, TristateFalse)

आप गुजर रहे हैं TristateFalse as तर्क 3. यह तर्क 4 होना चाहिए।

कृपया दस्तावेज़ पढ़ें।

विवरण

एक निर्दिष्ट फ़ाइल खोलता है और एक TextStream ऑब्जेक्ट देता है जो हो सकता है   फ़ाइल से पढ़ने या जोड़ने के लिए उपयोग किया जाता है।

वाक्य - विन्यास

object.OpenTextFile(filename[, iomode[, create[, format]]])

OpenTextFile विधि में ये भाग हैं:

Part      Description
----      -----------
object    Required. Always the name of a FileSystemObject.
filename  Required. String expression that identifies the file to open.
iomode    Optional. Indicates input/output mode. Can be one of two constants, either ForReading or ForAppending.
create    Optional. Boolean value that indicates whether a new file can be created if the specified filename doesn't exist. The value is True if a new file is created; False if it isn't created. The default is False.
format    Optional. One of three Tristate values used to indicate the format of the opened file. If omitted, the file is opened as ASCII.

स्रोत OpenTextFile विधि

Comments

ठीक है, मेरी त्रुटि यह निर्दिष्ट नहीं कर रही थी कि मेरा "फॉरएप्डिंग" क्या था, जो 8 होना चाहिए, और ट्रिस्टेटफाल की आवश्यकता नहीं थी। लेकिन पाठ को सफलतापूर्वक लागू करने के बाद, पाठ चीनी अक्षरों में है? संपादित प्रश्न की जाँच करें।

— user590792

उत्तर प्राप्त करने के बाद अपना प्रश्न बदलना अनुचित है, क्योंकि यह आपके द्वारा प्राप्त उत्तरों को अमान्य कर देता है। यह उन उत्तरों को गलत भी बना सकता है, और उन लोगों की प्रतिष्ठा को प्रतिकूल रूप से प्रभावित करता है जिन्होंने जवाब दिया। यदि आपके पास अब एक नया या अतिरिक्त प्रश्न है, तो एक नया पोस्ट बनाएं और वहां पूछें; यदि आप संदर्भ के लिए आवश्यक हैं तो इसे वापस लिंक कर सकते हैं।

— DavidPostill