Scripting Runtime Library(TextStream)

TextStream 파일을 읽을 때 다음 줄을 건너뛴다.

인수/파라메터
object : (개체)

object는 항상 TextStream 개체의 이름이다.

파라메터

파라메터는 없다.

반환값

반환값은 없다.

설명

TextStream 파일을 읽을 때 다음 줄을 건너뛴다.

건너뛴 줄의 문자는 버린다.


SkipLine 메서드 예제

결과 표시창
JScript SkipLine 메서드 예제
<SCRIPT language=JScript>
function SkipLineTest(filePath){
  var fso,fileObj,str='';
  var ForReading=1,ForWriting=2;
  fso=new ActiveXObject('Scripting.FileSystemObject');
  if (fso.FileExists(filePath)) fso.DeleteFile(filePath);
  fileObj=fso.OpenTextFile(filePath,ForWriting,true);
  fileObj.WriteLine('예제를 위한 파일이다.');
  fileObj.WriteLine('1234567890\n987654321');
  fileObj.WriteLine('ABCDEFGHIJKLMNOPQRSTUVWXYZ');
  fileObj.Close();
  str+='예제를 위한  '+filePath+' 파일을 생성하였다.<BR><BR>';

  fileObj=fso.OpenTextFile(filePath,ForReading);
  str+='fileObj.ReadLine()='+fileObj.ReadLine()+'<BR>';
  str+='fileObj.ReadLine()='+fileObj.ReadLine()+'<BR>';
  str+='fileObj.ReadLine()='+fileObj.ReadLine()+'<BR>';
  str+='fileObj.ReadLine()='+fileObj.ReadLine()+'<BR><BR>';

  fileObj=fso.OpenTextFile(filePath,ForReading);
  str+='fileObj.Read(5)='+fileObj.Read(5)+'<BR>';
  str+='fileObj.Skip(5)<BR>';fileObj.Skip(5);
  str+='fileObj.Read(5)='+fileObj.Read(5)+'<BR>';
  str+='fileObj.SkipLine()<BR>';fileObj.SkipLIne();
  str+='fileObj.Skip(5)<BR>';fileObj.Skip(5);
  str+='fileObj.ReadLine()='+fileObj.ReadLine()+'<BR>';
  str+='fileObj.Read(5)='+fileObj.Read(5)+'<BR>';
  str+='fileObj.Skip(5)<BR>';fileObj.Skip(5);
  str+='fileObj.Read(5)='+fileObj.Read(5)+'<BR>';
  str+='fileObj.ReadAll()='+fileObj.ReadAll()+'<BR>';
  return(str);
}
</SCRIPT>

<DIV id=showjs class=show alt="결과">결과 표시창</DIV>
<DIV class=show onClick="id=showjs.innerHTML=SkipLineTest('C:\\JsTest\\CreateText.txt')">
  <SPAN class=ie>JScript</SPAN> <SPAN class=method>SkipLine</SPAN> 메서드 예제</DIV>
결과 표시창
VBScript SkipLine 메서드 예제
<SCRIPT language=VBScript>
Function SkipLineTestvb(filePath)
  Const ForReading=1,ForWriting=2,ForAppending=8
  Dim fso,fileObj,str
  Set fso=CreateObject("Scripting.FileSystemObject")
  If fso.FileExists(filePath) Then
    fso.DeleteFile(filePath)
  End If

  Set fileObj=fso.OpenTextFile(filePath,ForWriting,True)
  fileObj.WriteLine "예제를 위한 파일이다."
  fileObj.WriteLine "1234567890"
  fileObj.WriteLine "987654321"
  fileObj.WriteLine "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
  fileObj.Close
  str=str&"예제를 위한  "&filePath&" 파일을 생성하였다.<BR><BR>"

  Set fileObj=fso.OpenTextFile(filePath,ForReading)
  str=str&"fileObj.ReadLine="&fileObj.ReadLine&"<BR>"
  str=str&"fileObj.ReadLine="&fileObj.ReadLine&"<BR>"
  str=str&"fileObj.ReadLine="&fileObj.ReadLine&"<BR>"
  str=str&"fileObj.ReadLine="&fileObj.ReadLine&"<BR><BR>"

  Set fileObj=fso.OpenTextFile(filePath,ForReading)
  str=str&"fileObj.Read(5)="&fileObj.Read(5)&"<BR>"
  str=str&"fileObj.Skip(5)<BR>"
  fileObj.Skip(5)
  str=str&"fileObj.Read(5)="&fileObj.Read(5)&"<BR>"
  str=str&"fileObj.SkipLine()<BR>"
  fileObj.SkipLIne
  str=str&"fileObj.Skip(5)<BR>"
  fileObj.Skip(5)
  str=str&"fileObj.ReadLine()="&fileObj.ReadLine()&"<BR>"
  str=str&"fileObj.Read(5)="&fileObj.Read(5)&"<BR>"
  str=str&"fileObj.Skip(5)<BR>"
  fileObj.Skip(5)
  str=str&"fileObj.Read(5)="&fileObj.Read(5)&"<BR>"
  str=str&"fileObj.ReadAll="&fileObj.ReadAll&"<BR>"
  SkipLineTestvb=str
End Function
</SCRIPT>

<DIV id=showvb class=show alt="결과">결과 표시창</DIV>
<DIV class=show onClick="showvb.innerHTML=SkipLineTestvb('C:\\JsTest\\CreateText.txt')">
  <SPAN class=ie>VBScript</SPAN> <SPAN class=method>SkipLine</SPAN> 메서드 예제</DIV>