LineSeparator
行のデリミタを設定/取得
文法
Streamオブジェクト.LineSeparator=Delimeter
パラメータ
Delimeter : デリミタの定数
機能説明
行を区切る文字を設定
デフォルトは「adCRLF(CR+LF)」
行区切り文字定数
| 定数 | 値 | 説明 |
|---|
| adCR | 13 | 復帰 |
| adCRLF | -1 | 復帰+改行(デフォルト) |
| adLF | 10 | 改行 |
使用例
<![CDATA[
<%
Dim objSt
Set objSt = Server.CreateObject("ADODB.Stream")
objSt.Open
objSt.LoadFromFile "D:\test\sample.html"
Select Case objSt.LineSeparator
Case adCR
Response.Write "区切り文字 : 復帰<br>" & vbCrLf
Case adCR
Response.Write "区切り文字 : 復帰+改行<br>" & vbCrLf
Case adCR
Response.Write "区切り文字 : 改行<br>" & vbCrLf
Case Else
Response.Write "区切り文字 : 不明<br>" & vbCrLf
End Select
'オブジェクトを閉じる
objSt.Close
Set objSt = Nothing
%>
]]>
Topへ