ファイルが1行づつ読み込めない

解決済

質問者：SAY_MAN
質問日時：2008/07/08 00:43
回答数：3件

おせわになります
よろしくお願いします
VB6.0
OS：XP
を使用しています

VBからHTMLファイルを読み込んでいるのですが
1行づつ読み込めたりよみこめなかったりします
ファイルの中は
----------------------------

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=shift_jis" />
<title></title>
</head>
<body>

<table width="560" border="0" cellspacing="15" cellpadding="0" summary="メニュー構成の為のテーブル">
<tr>
<td class="space" valign="top"><img src="img/photo01.jpg" width="150" height="100" alt="" /></td>
<td valign="top">
<table width="375" border="0" cellspacing="0" cellpadding="0" summary="メニュー構成の為のテーブル">
<tr>
<td class="s_title"><span class="s_title01">○○</span></td>
</tr>
<tr>
<td class="txt02">○○○</td>
</tr>
</table>
</td>
</tr>
</table>

</body>
</html>

-------------------------------
です。
ファイルの中が
-----------
1
2
3
-----------
とかなら正常に動作します

ソースは
Dim intFileNo As Integer
Open strNowPage For Input As #intFileNo
Do While (Not FileSystem.EOF(intFileNo))
Dim stBuffer As String
Line Input #intFileNo, stBuffer
debug.print stbuffer
Loop

Close #intFileNo
です

何か間違っているところがあればご指摘お願いします

以上よろしくお願いします。

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (3件)

No.3

回答者： redfox63
回答日時：2008/07/08 15:52

補足の内容からすると #2氏も回答しているように改行コードの問題のような気がします

メモ帳で開いた際にそのHTMLファイルが上矢印みたいな物が各行末に表示されるなら改行コードがLFのみに成っているのでしょう

コマンドプロンプトで Type ファイル名[enter]でHTMLファイルを表示した際に各行が斜めに段違いになるなら改行コードがCRだけなのでしょう
メモ帳で改行コードがCRになっているファイルは高さが半分の黒い四角で表示されると思います

- 0
- 件

通報する

この回答へのお礼

ありがとうございます。
無事解決できました。
やはり改行コードだったようです。

通報する

お礼日時：2008/07/11 20:53

No.2

回答者： K-Sogacchi
回答日時：2008/07/08 08:49

あくまで推測ですが、

もしかして読もうとしてるHTMLファイルがUNIX系で作られてて
改行コードが違う、なんて事はありませんか？
Windows(DOS)系はCrLf、UNIX系は確かLfのみのはず。

- 0
- 件

通報する

この回答へのお礼

ありがとうございます。
HTMLファイル自体はWindowsPCで作成したものです。
文字コードはShift_jisで書かれています。

IE上で問題なく表示はできます。
ですが、念のためテキストエディターで読み直ししてみたら
直りました。

結局のところ改行コードの違いだったみたいなのですが
なぜこんなことになったのかは不明です

ですが、解決しましたので良しとしようと思います。

ありがとうございました。

通報する

お礼日時：2008/07/11 20:52