OStream.closeOutput() : oTextStream.closeOutput() 'close outputs OTextStream.writeString(s) 'write the string to the file OStream=oSFA.openFileWrite(sUrl) 'open for write If oSFA.exists(sFileName) then 'file exists so delete one OTextStream=CreateUnoService(".TextOutputStream") OSFA=CreateUnoService(".SimpleFileAccess") Sub saveStringToFile 'write the string to the fileĭim sEncoding$, sFileName$, sUrl$, oSFA as object, oStream as object, oTextStream as object, s$ And then write the string to the file by the TextStream. In Basic you can use the sheet function getDataArray() and create the string from the array in some loop (for…next, do…while etc.).
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |