テキストファイルのTABコードを”,”に置換するユーザライブラリを作成したい
テキストファイルのTABコードを”,”に置換するユーザライブラリを作成したいと考えています。途中までできたのですが、変数tempの内容をファイルに入れて保存するコードが分かりません。VBScript達人の方、教えてください!
---<ここから>--
Dim temp 'objFileの中身を取得する変数
Dim filename '入力テキストファイルの絶対ファイルパス
Set objFS = CreateObject("Scripting.FileSystemObject")
Call GetUMSVariable($変数名$, filename)
Set objFile = objFS.OpenTextFile(filename,8,False)
temp = objFile(0)
'tempにTABあれば、すべて","に置換する。
Do
If InStr(0,temp,vbtab) > 0 Then
temp = Replace(temp,vbtab,",")
Else
Exit Do
End If
Loop
'変数tempの内容をファイルに入れて保存するコードが分からない!
objFile.Close
---<ここまで>--
まめ太 回答した質問
回答とコメントは、会員登録(無料)で閲覧できるようになります。
新規登録