,や"を無視して読み込むには？

Cp.Alpha2 2002-03-29 16:39:00 No: 75437

普通にOpen 〜で

Do until eof(1)

Input S_Read,#1
Text1.Text=Text1.Text + S_Read

loop

とやってHTMLを開こうとしたら「,」の部分で勝手に分けて読み込んでしまいます。
但し、"***","***"の時のみ。
完全にこれを無視して読み込むことは出来ないのでしょうか。
どなたか御教授お願いします。

マザー 2002-03-29 20:48:24 No: 75438

トークンを無視したいと言っているのですか？
それならばLine Inputで読み出すでは駄目ですか？
"***","***"を無視するのは読み出しながら
判定するしかないと思われます。

たかみちえ URL 2002-03-31 06:14:17 No: 75439

普通にテキストファイルを読むんだから…。
Dim FN as Integer,Data As String
FN = FreeFile
Open D:\ホームページ\homepage\Index.html For Binary As FN
Data = Space$(LOF(FN))
Get FN,,Data
Close FN
でいいんじゃないでしょうか…？
(Dataにファイル内容が入ってます)

GetやOpenの引数の順番が少し間違ってるかもしれませんけど、
マニュアルとかで確認してみてください。