OSDN Git Service

Version 5.91
[vbslib/main.git] / _src / _vbslib manual.files / vbs_memo.files / vbs_memo_06.html
1 <?xml version="1.0" encoding="Shift_JIS"?>\r
2 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"\r
3  "http://www.w3.org/TR/html4/strict.dtd">\r
4 <!-- saved from url=(0014)about:internet --> <!-- for too much local security warning -->\r
5 <HTML lang="ja" xmlns:v="urn:schemas-microsoft-com:vml"> \r
6 <HEAD>\r
7 \r
8 <META http-equiv="Content-Type" content="text/html; charset=shift_jis"/>\r
9 <TITLE>VBS\83\81\83\82</TITLE>\r
10 \r
11 <STYLE type="text/css">\r
12 v\:line, v\:rect, v\:fill, v\:image, v\:stroke, v\:roundrect, v\:oval, v\:shape, v\:path, v\:textpath\r
13   { behavior: url(#default#VML); }\r
14 A { text-decoration:none; }\r
15 A.to_tree { color:#CCDDCC; position:absolute; margin-left:0px; font-size:8pt; }\r
16 A.to_next_page { position:absolute; margin-left:40px; font-size:8pt; }\r
17 A.to_prev_page { position:absolute; margin-left:58px; font-size:8pt; }\r
18 A:visited { color:blue }\r
19 <!-- start of insert [PATCH_OF:urlrep_tooltip] -->\r
20 DIV.tooltip { color:blue; }\r
21 DIV.tooltip textarea { display:none; margin-top:-5px; overflow:hidden; }\r
22 <!-- end of [PATCH_OF:urlrep_tooltip] -->\r
23 </STYLE>\r
24 \r
25 <SCRIPT type="text/javascript">\r
26 //<![CDATA[\r
27 \r
28 function  onLoad()\r
29 {\r
30   var  divs, i\r
31 \r
32   if ( !document.getElementsByTagName )  return;\r
33 \r
34   divs = document.getElementsByTagName( "A" );\r
35   for ( i = 0; i < divs.length; i++ ) {\r
36     if ( divs[i].className == "to_tree" ) {\r
37       divs[i].style.color = "blue";\r
38       divs[i].style.cursor = "hand";\r
39     }\r
40   }\r
41 }\r
42 \r
43 function  selectTreeElem( num )\r
44 {\r
45   var tree_url, i1, i2, fname, fname2\r
46 \r
47   if ( parent.frames.length == 0 ) {\r
48     location.href = "../vbs_memo.html?f1=vbs_memo.files/vbs_memo_tree.html&sub1=svgcats_index_p" + num +\r
49      "&f2=vbs_memo.files/vbs_memo_06.html&sub2=svgcats_vml_p" + num;\r
50   }\r
51   else {\r
52     tree_url = parent.tree.location.href;\r
53     i1 = tree_url.lastIndexOf( "/" );\r
54     i2 = tree_url.lastIndexOf( "\\" );\r
55     if ( i2 > i1 )  i1 = i2;\r
56     fname = tree_url.substring( i1 + 1 );\r
57     i1 = fname.lastIndexOf( "#" );\r
58     if ( i1 >= 0 )  fname = fname.substring( 0, i1 );\r
59     fname2 = "vbs_memo.files/vbs_memo_tree.html";\r
60     i1 = fname2.lastIndexOf( "/" );\r
61     i2 = fname2.lastIndexOf( "\\" );\r
62     if ( i2 > i1 )  i1 = i2;\r
63     fname2 = fname2.substring( i1 + 1 );\r
64     if ( fname == fname2 )\r
65       parent.tree.selectTreeElem( "svgcats_index_p" + num );\r
66     else\r
67       location.href = "../vbs_memo.html?f1=vbs_memo.files/vbs_memo_tree.html&sub1=svgcats_index_p" + num +\r
68        "&f2=vbs_memo.files/vbs_memo_06.html&sub2=svgcats_vml_p" + num;\r
69   }\r
70 }\r
71 \r
72 <!-- start of insert [PATCH_OF:urlrep_tooltip] -->\r
73 function  over( text, value, cols ){ text.style.display = "inline";\r
74   text.cols=cols; text.rows=1; text.value=value; text.focus(); text.select(); }\r
75 function  out( text ){ text.style.display = "none"; }\r
76 <!-- end of [PATCH_OF:urlrep_tooltip] -->\r
77 \r
78 //]]>\r
79 </SCRIPT>\r
80 \r
81 </HEAD>\r
82 <BODY bgcolor="#CCDDCC" onLoad="onLoad();">\r
83 \r
84 <DIV style="position:absolute; margin-left:0px; margin-top:8px; color:red; font-size:8pt;">\r
85 (for Internet Explorer)</DIV>\r
86 <v:rect style="position:absolute; margin-left:0px; margin-top:8px; width:130px; height:16px;" fillcolor="white" strokecolor="white"/>\r
87 \r
88 <PAGESET>\r
89  \r
90 <!-- page 90 --> \r
91 <PAGE>\r
92 <A id="svgcats_vml_p90" class="to_tree" style="margin-top:-11px;" onClick="selectTreeElem( '90' );">\81©</A>\r
93 <A href="#svgcats_vml_p91" class="to_next_page" style="margin-top:-11px;">\81¥</A>\r
94 <A href="vbs_memo_05.html#svgcats_vml_p89" class="to_prev_page" style="margin-top:-11px;">\81£</A>\r
95 <DIV style="position:absolute; margin-left:20px; margin-top:-16px;">\r
96 <A id="page_group_top" href="vbs_memo_05.html#page_group_bottom" style="text-decoration:none;">\81ª</A></DIV>\r
97 <v:rect style="position:absolute; margin-left:0px; margin-top:0px; width:524px; height:525px;" fillcolor="white"/>\r
98 <DIV id="text90_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:17px; line-height:15px; white-space:nowrap">\r
99 <A name="TextStream_SkipLine">\r
100 SkipLine (TextStream)</A></DIV>\r
101 <v:rect style="position:absolute; margin-left:26px; margin-top:46px; width:178px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
102 <DIV id="text90_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:34px; margin-top:53px; line-height:13px; white-space:nowrap">\r
103 Sub&nbsp; TextStream::SkipLine()</DIV>\r
104 <DIV id="text90_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:81px; line-height:15px; white-space:nowrap">\r
105 \83e\83L\83X\83g\83X\83g\83\8a\81[\83\80\82ð\82P\8ds\83X\83L\83b\83v\82µ\82Ü\82·\81B</DIV>\r
106 <DIV id="text90_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:186px; margin-top:17px; line-height:15px; white-space:nowrap">\r
107 <A href="http://msdn.microsoft.com/ja-jp/library/cc428058.aspx" target="_blank">\r
108 (Web)</A></DIV>\r
109 <DIV id="text90_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:129px; line-height:15px; white-space:nowrap">\r
110 <A name="skiplines">\r
111 \8ew\92è\82µ\82½\8ds\82Ö\88Ú\93®\82·\82é\83T\83\93\83v\83\8b\81F</A></DIV>\r
112 <v:rect style="position:absolute; margin-left:35px; margin-top:151px; width:406px; height:325px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
113 <DIV id="text90_6" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:43px; margin-top:157px; line-height:15px; white-space:nowrap">\r
114 &nbsp; path = "a.txt"<BR/>\r
115 &nbsp; Set g_fs = WScript.CreateObject( "Scripting.FileSystemObject" )<BR/>\r
116 &nbsp; Set f = g_fs.OpenTextFile( path )<BR/>\r
117 <BR/>\r
118 &nbsp; Do Until f.AtEndOfStream<BR/>\r
119 &nbsp; &nbsp; line = f.ReadLine()<BR/>\r
120 &nbsp; &nbsp; If line = "point" Then<BR/>\r
121 &nbsp; &nbsp; &nbsp; i_line = f.Line - 1&nbsp; '// \8ds\94Ô\8d\86\82ð\8eæ\93¾\81B(*1)<BR/>\r
122 &nbsp; &nbsp; &nbsp; Exit Do<BR/>\r
123 &nbsp; &nbsp; End If<BR/>\r
124 &nbsp; Loop<BR/>\r
125 <BR/>\r
126 &nbsp; WScript.Echo&nbsp; "i_line = " &amp; i_line <BR/>\r
127 <BR/>\r
128 &nbsp; Set f = g_fs.OpenTextFile( path )<BR/>\r
129 &nbsp; For i=1 To&nbsp; i_line - 1 : f.SkipLine : Next&nbsp; '// \8ds\82Ö\83W\83\83\83\93\83v<BR/>\r
130 <BR/>\r
131 &nbsp; WScript.Echo&nbsp; f.ReadLine()&nbsp; '// "point" \82ª\8f\91\82¢\82Ä\82 \82é\8ds<BR/>\r
132 <BR/>\r
133 &nbsp; f = Empty<BR/>\r
134 &nbsp; g_fs = Empty</DIV>\r
135 <DIV id="text90_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:43px; margin-top:486px; line-height:15px; white-space:nowrap">\r
136 (*1) ReadLine \82µ\82½\8cã\82È\82Ì\82Å\81Aline \82Ì\8ds\94Ô\8d\86\82Í f.Line \8ds\96Ú\82Å\82Í\82È\82­ f.Line-1 \8ds\96Ú</DIV>\r
137 \r
138 <v:line from="0,0" to="524,0"/>\r
139 <v:line from="524,0" to="524,525"/>\r
140 <v:line from="524,525" to="0,525"/>\r
141 <v:line from="0,525" to="0,0"/>\r
142 \r
143 </PAGE>\r
144  \r
145 <!-- page 91 --> \r
146 <PAGE>\r
147 <A id="svgcats_vml_p91" class="to_tree" style="margin-top:530px;" onClick="selectTreeElem( '91' );">\81©</A>\r
148 <A href="#svgcats_vml_p92" class="to_next_page" style="margin-top:530px;">\81¥</A>\r
149 <A href="#svgcats_vml_p90" class="to_prev_page" style="margin-top:530px;">\81£</A>\r
150 <v:rect style="position:absolute; margin-left:0px; margin-top:541px; width:378px; height:249px;" fillcolor="white"/>\r
151 <DIV id="text91_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:558px; line-height:15px; white-space:nowrap">\r
152 <A name="TextStream_Line">\r
153 Line (TextStream)</A></DIV>\r
154 <v:rect style="position:absolute; margin-left:26px; margin-top:587px; width:274px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
155 <DIV id="text91_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:34px; margin-top:594px; line-height:13px; white-space:nowrap">\r
156 Property Get&nbsp; TextStream::Line() as integer</DIV>\r
157 <DIV id="text91_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:622px; line-height:15px; white-space:nowrap">\r
158 \83e\83L\83X\83g\83X\83g\83\8a\81[\83\80\82Ì\8c»\8dÝ\82Ì\8ds\94Ô\8d\86\81B\81i\82P\81`\81j<BR/>\r
159 \8e\9f\82É\83A\83N\83Z\83X\82·\82é\8ds\94Ô\8d\86\81B</DIV>\r
160 <DIV id="text91_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:175px; margin-top:558px; line-height:15px; white-space:nowrap">\r
161 <A href="http://msdn.microsoft.com/ja-jp/library/cc428134.aspx" target="_blank">\r
162 (Web)</A></DIV>\r
163 <DIV id="text91_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:677px; line-height:15px; white-space:nowrap">\r
164 \82P\8ds\96Ú\82ð\83\8a\81[\83h/\83\89\83C\83g\82µ\82½\82ç\81ALine = 2 \82É\82È\82è\82Ü\82·\81B</DIV>\r
165 <DIV id="text91_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:701px; line-height:15px; white-space:nowrap">\r
166 \83t\83@\83C\83\8b\82Ì\8dÅ\8cã\82Ì\8ds\82ð\83\8a\81[\83h\82µ\82½\82Æ\82«\82Í\81A\81{\82P\82³\82ê\82Ü\82¹\82ñ\81B</DIV>\r
167 <DIV id="text91_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:742px; line-height:15px; white-space:nowrap">\r
168 \8aÖ\98A</DIV>\r
169 <DIV id="text91_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:69px; margin-top:742px; line-height:15px; white-space:nowrap">\r
170 <A href="..\vbslib.files\vbslib_30.html#GetLineCount">\r
171 \81¨ GetLineCount</A></DIV>\r
172 \r
173 <v:line from="0,541" to="378,541"/>\r
174 <v:line from="378,541" to="378,790"/>\r
175 <v:line from="378,790" to="0,790"/>\r
176 <v:line from="0,790" to="0,541"/>\r
177 \r
178 </PAGE>\r
179  \r
180 <!-- page 92 --> \r
181 <PAGE>\r
182 <A id="svgcats_vml_p92" class="to_tree" style="margin-top:795px;" onClick="selectTreeElem( '92' );">\81©</A>\r
183 <A href="#svgcats_vml_p93" class="to_next_page" style="margin-top:795px;">\81¥</A>\r
184 <A href="#svgcats_vml_p91" class="to_prev_page" style="margin-top:795px;">\81£</A>\r
185 <v:rect style="position:absolute; margin-left:0px; margin-top:806px; width:532px; height:628px;" fillcolor="white"/>\r
186 <DIV id="text92_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:823px; line-height:15px; white-space:nowrap">\r
187 <A name="TextStream_AtEndOfStream">\r
188 AtEndOfStream (TextStream)</A></DIV>\r
189 <v:rect style="position:absolute; margin-left:26px; margin-top:852px; width:268px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
190 <DIV id="text92_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:34px; margin-top:859px; line-height:13px; white-space:nowrap">\r
191 Dim&nbsp; TextStream::AtEndOfStream&nbsp; as boolean</DIV>\r
192 <DIV id="text92_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:34px; margin-top:892px; line-height:15px; white-space:nowrap">\r
193 \83X\83g\83\8a\81[\83\80\82Ì\8dÅ\8cã\82È\82ç True</DIV>\r
194 <DIV id="text92_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:256px; margin-top:823px; line-height:15px; white-space:nowrap">\r
195 <A href="http://msdn.microsoft.com/ja-jp/library/cc428128.aspx" target="_blank">\r
196 (Web)</A></DIV>\r
197 <DIV id="text92_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:34px; margin-top:1310px; line-height:15px; white-space:nowrap">\r
198 Shell:Exec \82Å\8bN\93®\82µ\82½\83v\83\8d\83O\83\89\83\80\82©\82ç\8fo\97Í\82³\82ê\82é\95W\8f\80\8fo\97Í\83X\83g\83\8a\81[\83\80\82É<BR/>\r
199 \83o\83b\83t\83@\83\8a\83\93\83O\82³\82ê\82½\95\8e\9a\82ª\82È\82¢\82Æ\82«\82Í\81AFalse \82ð\95Ô\82µ\82Ü\82·\81B<BR/>\r
200 <BR/>\r
201 \95W\8f\80\93ü\97Í\83X\83g\83\8a\81[\83\80\82É\83o\83b\83t\83@\83\8a\83\93\83O\82³\82ê\82½\95\8e\9a\82ª\82È\82¢\82Æ\82«\82Í\81A\91Ò\82¿\8fó\91Ô\82É<BR/>\r
202 \93ü\82è\82Ü\82·\81B\89ü\8ds\95\8e\9a\82ª\83o\83b\83t\83@\83\8a\83\93\83O\82³\82ê\81A\89ü\8ds\95\8e\9a\82Ì\91O\82É\95\8e\9a\82ª\93ü\97Í\82³\82ê\82Ä<BR/>\r
203 \82¢\82È\82©\82Á\82½\82ç True\81A\95\8e\9a\82ª\93ü\97Í\82³\82ê\82Ä\82¢\82½\82ç False \82ð\95Ô\82µ\82Ü\82·\81B</DIV>\r
204 <DIV id="text92_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:34px; margin-top:930px; line-height:15px; white-space:nowrap">\r
205 \83t\83@\83C\83\8b\82Ì\8dÅ\8cã\82ª\89ü\8ds\95\8e\9a\82Ì\82Æ\82«\81A\82»\82Ì\89ü\8ds\95\8e\9a\82ð\83\8a\81[\83h\82µ\82½\82ç\81AAtEndOfStream<BR/>\r
206 = True \82É\82È\82è\82Ü\82·\81B</DIV>\r
207 <v:rect style="position:absolute; margin-left:71px; margin-top:1216px; width:88px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
208 <DIV id="text92_7" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:79px; margin-top:1223px; line-height:13px; white-space:nowrap">\r
209 end (Return)</DIV>\r
210 <v:rect style="position:absolute; margin-left:197px; margin-top:1216px; width:154px; height:55px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
211 <DIV id="text92_8" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:205px; margin-top:1222px; line-height:15px; white-space:nowrap">\r
212 f.AtEndOfStream = False<BR/>\r
213 ReadLine = "end"<BR/>\r
214 f.AtEndOfStream = True</DIV>\r
215 <DIV id="text92_9" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:61px; margin-top:1198px; line-height:15px; white-space:nowrap">\r
216 \83t\83@\83C\83\8b</DIV>\r
217 <DIV id="text92_10" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:191px; margin-top:1198px; line-height:15px; white-space:nowrap">\r
218 \83\81\83\\83b\83h\82Ì\8c\8b\89Ê</DIV>\r
219 <DIV id="text92_11" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:34px; margin-top:1128px; line-height:15px; white-space:nowrap">\r
220 \83\8a\81[\83h\82µ\82½\93à\97e\82ª\93ü\82Á\82Ä\82¢\82é\95Ï\90\94\82ª\96³\8cø\82©\82Ç\82¤\82©\82Å\82Í\82È\82­\81A\8dÅ\8cã\82Ì\8ds\82©\82Ç\82¤\82©\82Å\82·\81B<BR/>\r
221 \95Ï\90\94 = Null \82É\82µ\82Ä\82¨\82¯\82Î\81A\8bó\8ds\82Å\82 \82é "" \82Æ\88ê\92v\82µ\82Ü\82¹\82ñ\81B<BR/>\r
222 \95Ï\90\94 = Empty \82É\82µ\82Ä\82¨\82¯\82Î\81A\8bó\8ds\82Å\82 \82é "" \82Æ\88ê\92v\82µ\82Ü\82·\81B</DIV>\r
223 <v:rect style="position:absolute; margin-left:50px; margin-top:1017px; width:184px; height:55px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
224 <DIV id="text92_12" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:58px; margin-top:1023px; line-height:15px; white-space:nowrap">\r
225 Do Until&nbsp; file.AtEndOfStream<BR/>\r
226 &nbsp; &nbsp; line = file.ReadLine()<BR/>\r
227 Loop</DIV>\r
228 <DIV id="text92_13" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:991px; line-height:15px; white-space:nowrap">\r
229 \83T\83\93\83v\83\8b</DIV>\r
230 <DIV id="text92_14" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:1103px; line-height:15px; white-space:nowrap">\r
231 \95â\91«</DIV>\r
232 \r
233 <v:line from="0,806" to="532,806"/>\r
234 <v:line from="532,806" to="532,1434"/>\r
235 <v:line from="532,1434" to="0,1434"/>\r
236 <v:line from="0,1434" to="0,806"/>\r
237 \r
238 </PAGE>\r
239  \r
240 <!-- page 93 --> \r
241 <PAGE>\r
242 <A id="svgcats_vml_p93" class="to_tree" style="margin-top:1439px;" onClick="selectTreeElem( '93' );">\81©</A>\r
243 <A href="#svgcats_vml_p94" class="to_next_page" style="margin-top:1439px;">\81¥</A>\r
244 <A href="#svgcats_vml_p92" class="to_prev_page" style="margin-top:1439px;">\81£</A>\r
245 <v:rect style="position:absolute; margin-left:0px; margin-top:1450px; width:314px; height:129px;" fillcolor="white"/>\r
246 <DIV id="text93_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:1467px; line-height:15px; white-space:nowrap">\r
247 <A name="TextStream_Write">\r
248 Write (TextStream)</A></DIV>\r
249 <v:rect style="position:absolute; margin-left:26px; margin-top:1496px; width:256px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
250 <DIV id="text93_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:34px; margin-top:1503px; line-height:13px; white-space:nowrap">\r
251 Sub&nbsp; TextStream::Write( Text as string )</DIV>\r
252 <DIV id="text93_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:1531px; line-height:15px; white-space:nowrap">\r
253 \83e\83L\83X\83g\83X\83g\83\8a\81[\83\80\82É\8fo\97Í\82µ\82Ü\82·\81B</DIV>\r
254 <DIV id="text93_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:189px; margin-top:1467px; line-height:15px; white-space:nowrap">\r
255 <A href="http://msdn.microsoft.com/ja-jp/library/cc428091.aspx" target="_blank">\r
256 (Web)</A></DIV>\r
257 \r
258 <v:line from="0,1450" to="314,1450"/>\r
259 <v:line from="314,1450" to="314,1579"/>\r
260 <v:line from="314,1579" to="0,1579"/>\r
261 <v:line from="0,1579" to="0,1450"/>\r
262 \r
263 </PAGE>\r
264  \r
265 <!-- page 94 --> \r
266 <PAGE>\r
267 <A id="svgcats_vml_p94" class="to_tree" style="margin-top:1584px;" onClick="selectTreeElem( '94' );">\81©</A>\r
268 <A href="#svgcats_vml_p95" class="to_next_page" style="margin-top:1584px;">\81¥</A>\r
269 <A href="#svgcats_vml_p93" class="to_prev_page" style="margin-top:1584px;">\81£</A>\r
270 <v:rect style="position:absolute; margin-left:0px; margin-top:1595px; width:342px; height:129px;" fillcolor="white"/>\r
271 <DIV id="text94_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:1612px; line-height:15px; white-space:nowrap">\r
272 <A name="TextStream_WriteLine">\r
273 WriteLine (TextStream)</A></DIV>\r
274 <v:rect style="position:absolute; margin-left:26px; margin-top:1641px; width:280px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
275 <DIV id="text94_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:34px; margin-top:1648px; line-height:13px; white-space:nowrap">\r
276 Sub&nbsp; TextStream::WriteLine( Text as string )</DIV>\r
277 <DIV id="text94_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:1676px; line-height:15px; white-space:nowrap">\r
278 \83e\83L\83X\83g\83X\83g\83\8a\81[\83\80\82É\83e\83L\83X\83g\82Æ\89ü\8ds\82ð\8fo\97Í\82µ\82Ü\82·\81B</DIV>\r
279 \r
280 <v:line from="0,1595" to="342,1595"/>\r
281 <v:line from="342,1595" to="342,1724"/>\r
282 <v:line from="342,1724" to="0,1724"/>\r
283 <v:line from="0,1724" to="0,1595"/>\r
284 \r
285 </PAGE>\r
286  \r
287 <!-- page 95 --> \r
288 <PAGE>\r
289 <A id="svgcats_vml_p95" class="to_tree" style="margin-top:1729px;" onClick="selectTreeElem( '95' );">\81©</A>\r
290 <A href="#svgcats_vml_p96" class="to_next_page" style="margin-top:1729px;">\81¥</A>\r
291 <A href="#svgcats_vml_p94" class="to_prev_page" style="margin-top:1729px;">\81£</A>\r
292 <v:rect style="position:absolute; margin-left:0px; margin-top:1740px; width:428px; height:129px;" fillcolor="white"/>\r
293 <DIV id="text95_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:1757px; line-height:15px; white-space:nowrap">\r
294 <A name="TextStream_WriteBlankLines">\r
295 WriteBlankLines (TextStream)</A></DIV>\r
296 <DIV id="text95_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:249px; margin-top:1757px; line-height:15px; white-space:nowrap">\r
297 <A href="http://msdn.microsoft.com/ja-jp/library/cc428062.aspx" target="_blank">\r
298 (Web)</A></DIV>\r
299 <v:rect style="position:absolute; margin-left:26px; margin-top:1786px; width:370px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
300 <DIV id="text95_3" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:34px; margin-top:1793px; line-height:13px; white-space:nowrap">\r
301 Sub&nbsp; TextStream::WriteBlankLines( LengthOfLine as integer )</DIV>\r
302 <DIV id="text95_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:1821px; line-height:15px; white-space:nowrap">\r
303 \83e\83L\83X\83g\83X\83g\83\8a\81[\83\80\82É\95¡\90\94\82Ì\89ü\8ds\82ð\8fo\97Í\82µ\82Ü\82·\81B</DIV>\r
304 \r
305 <v:line from="0,1740" to="428,1740"/>\r
306 <v:line from="428,1740" to="428,1869"/>\r
307 <v:line from="428,1869" to="0,1869"/>\r
308 <v:line from="0,1869" to="0,1740"/>\r
309 \r
310 </PAGE>\r
311  \r
312 <!-- page 96 --> \r
313 <PAGE>\r
314 <A id="svgcats_vml_p96" class="to_tree" style="margin-top:1874px;" onClick="selectTreeElem( '96' );">\81©</A>\r
315 <A href="#svgcats_vml_p97" class="to_next_page" style="margin-top:1874px;">\81¥</A>\r
316 <A href="#svgcats_vml_p95" class="to_prev_page" style="margin-top:1874px;">\81£</A>\r
317 <v:rect style="position:absolute; margin-left:0px; margin-top:1885px; width:562px; height:607px;" fillcolor="white"/>\r
318 <DIV id="text96_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:1902px; line-height:15px; white-space:nowrap">\r
319 <A name="TextStream_exec">\r
320 Shell::Exec \82Å\8eÀ\8ds\82·\82é\82Æ\81Apause \82ª\82Å\82«\82È\82¢</A></DIV>\r
321 <v:rect style="position:absolute; margin-left:24px; margin-top:2104px; width:502px; height:325px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
322 <DIV id="text96_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:32px; margin-top:2110px; line-height:15px; white-space:nowrap">\r
323 '********************************************************************************<BR/>\r
324 '&nbsp; &lt;&lt;&lt; [EchoStream] echo supported No vbCRLF &gt;&gt;&gt;<BR/>\r
325 '********************************************************************************<BR/>\r
326 Dim&nbsp; g_EchoStreamBuf<BR/>\r
327 Sub&nbsp; EchoStream( StreamIn, StreamOut )<BR/>\r
328 &nbsp; Dim&nbsp; s, c<BR/>\r
329 <BR/>\r
330 &nbsp; Do Until StreamIn.AtEndOfStream<BR/>\r
331 &nbsp; &nbsp; c = StreamIn.Read(1)<BR/>\r
332 If g_EchoStreamBuf="\91±\8ds\82·\82é\82É\82Í\89½\82©\83L\81[\82ð\89\9f\82µ\82Ä\82­\82¾\82³\82¢ . . ." Then<BR/>\r
333 &nbsp;Stop<BR/>\r
334 End If<BR/>\r
335 &nbsp; &nbsp; If c &lt;&gt; vbCR and c &lt;&gt; vbLF Then _<BR/>\r
336 &nbsp; &nbsp; &nbsp; g_EchoStreamBuf = g_EchoStreamBuf + c<BR/>\r
337 &nbsp; &nbsp; If c = vbLF Then<BR/>\r
338 &nbsp; &nbsp; &nbsp; WScript.Echo&nbsp; vbCR + g_EchoStreamBuf : g_EchoStreamBuf = ""<BR/>\r
339 &nbsp; &nbsp; Else<BR/>\r
340 &nbsp; &nbsp; &nbsp; StreamOut.Write&nbsp; c<BR/>\r
341 &nbsp; &nbsp; End If<BR/>\r
342 &nbsp; Loop<BR/>\r
343 End Sub</DIV>\r
344 <DIV id="text96_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:24px; margin-top:1940px; line-height:15px; white-space:nowrap">\r
345 <A href="vbs_memo_02.html#WScript_Shell_Exec">\r
346 Shell::Exec</A></DIV>\r
347 <DIV id="text96_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:93px; margin-top:1940px; line-height:15px; white-space:nowrap">\r
348 \82Å\8bN\93®\82µ\82½\83R\83}\83\93\83h\83\89\83C\83\93\81E\83v\83\8d\83O\83\89\83\80\82Å\82Í\81A\83o\83b\83`\83t\83@\83C\83\8b\82Ì pause \82ª\90³\82µ\82­</DIV>\r
349 <DIV id="text96_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:1957px; line-height:15px; white-space:nowrap">\r
350 \93®\82«\82Ü\82¹\82ñ\81B</DIV>\r
351 <DIV id="text96_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:1986px; line-height:15px; white-space:nowrap">\r
352 WshScriptExec::StdIn.ReadLine \82ð\8cÄ\82Ô\82Æ\81A\89ü\8ds\83R\81[\83h\82ª\93ü\97Í\82³\82ê\82é\82Ü\82Å\96ß\82Á\82Ä\82«\82Ü\82¹\82ñ\81B<BR/>\r
353 WshScriptExec::StdIn.AtEndOfStream \82â\81ARead\81AReadAll \82à\82È\82º\82©\96ß\82Á\82Ä\82«\82Ü\82¹\82ñ\81B<BR/>\r
354 \82±\82Ì\82½\82ß\81Apause \82Å\95\\8e¦\82³\82ê\82é\81u\91±\82«\82ð\8eÀ\8ds\82·\82é\82Æ\82«\81c\81v\82Ì\83\81\83b\83Z\81[\83W\82Í\95\\8e¦\82³\82ê\82Ü\82¹\82ñ\81B<BR/>\r
355 \82P\95\8e\9a\82¸\82Â\95\\8e¦\82µ\82Ä\82à\81A\95\8e\9a\82Ì\8fI\97¹\82ª AtEndOfStream \82Å\94»\92è\82µ\82æ\82¤\82Æ\82·\82é\82Æ\96ß\82Á\82Ä\82±\82È\82­<BR/>\r
356 \82È\82é\82Ì\82Å\81A\8eg\82¦\82Ü\82¹\82ñ\81B</DIV>\r
357 <DIV id="text96_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:2081px; line-height:15px; white-space:nowrap">\r
358 \82P\95\8e\9a\82¸\82Â\95\\8e¦\82·\82é echo \82¾\82ª\81AAtEndOfStream \82Å\8e~\82Ü\82é\82±\82Æ\82Ì\8eÀ\8fØ\83R\81[\83h\81F</DIV>\r
359 <DIV id="text96_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:2445px; line-height:15px; white-space:nowrap">\r
360 2&amp;&gt;1 \82Å\95W\8f\80\83G\83\89\81[\8fo\97Í\82ð\95W\8f\80\8fo\97Í\82É\83\8a\83_\83C\83\8c\83N\83g\82·\82é\82Æ\81A\8e~\82Ü\82ç\82È\82¢\82±\82Æ\82ª\82 \82è\82Ü\82·\81B</DIV>\r
361 \r
362 <v:line from="0,1885" to="562,1885"/>\r
363 <v:line from="562,1885" to="562,2492"/>\r
364 <v:line from="562,2492" to="0,2492"/>\r
365 <v:line from="0,2492" to="0,1885"/>\r
366 \r
367 </PAGE>\r
368  \r
369 <!-- page 97 --> \r
370 <PAGE>\r
371 <A id="svgcats_vml_p97" class="to_tree" style="margin-top:2497px;" onClick="selectTreeElem( '97' );">\81©</A>\r
372 <A href="#svgcats_vml_p98" class="to_next_page" style="margin-top:2497px;">\81¥</A>\r
373 <A href="#svgcats_vml_p96" class="to_prev_page" style="margin-top:2497px;">\81£</A>\r
374 <v:rect style="position:absolute; margin-left:0px; margin-top:2508px; width:609px; height:805px;" fillcolor="white"/>\r
375 <DIV id="text97_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:2525px; line-height:15px; white-space:nowrap">\r
376 <A name="copy_arg">\r
377 \83t\83@\83C\83\8b\83R\83s\81[\82Ì\88ø\90\94</A></DIV>\r
378 <DIV id="text97_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:37px; margin-top:2564px; line-height:15px; white-space:nowrap">\r
379 <A href="vbs_memo_04.html#FileSystemObject_CopyFile">\r
380 CopyFile</A></DIV>\r
381 <DIV id="text97_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:99px; margin-top:2564px; line-height:15px; white-space:nowrap">\r
382 <A href="vbs_memo_05.html#FileSystemObject_CopyFolder">\r
383 CopyFolder</A></DIV>\r
384 <DIV id="text97_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:176px; margin-top:2564px; line-height:15px; white-space:nowrap">\r
385 <A href="vbs_memo_05.html#FileSystemObject_MoveFile">\r
386 MoveFile</A></DIV>\r
387 <DIV id="text97_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:239px; margin-top:2564px; line-height:15px; white-space:nowrap">\r
388 <A href="vbs_memo_05.html#FileSystemObject_MoveFolder">\r
389 MoveFolder</A></DIV>\r
390 <DIV id="text97_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:15px; margin-top:2667px; line-height:15px; white-space:nowrap">\r
391 CopyFile\81AMoveFile</DIV>\r
392 <DIV id="text97_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:2731px; line-height:15px; white-space:nowrap">\r
393 dst \88ø\90\94</DIV>\r
394 <DIV id="text97_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:44px; margin-top:2731px; line-height:15px; white-space:nowrap">\r
395 src \88ø\90\94</DIV>\r
396 <DIV id="text97_9" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:44px; margin-top:2759px; line-height:15px; white-space:nowrap">\r
397 \83t\83@\83C\83\8b a.txt</DIV>\r
398 <DIV id="text97_10" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:44px; margin-top:2698px; line-height:15px; white-space:nowrap">\r
399 \83R\83s\81[\90æ\83t\83H\83\8b\83_&nbsp; C:\dst_folder \82ª\91\8dÝ\82·\82é\82Æ\82«</DIV>\r
400 <DIV id="text97_11" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:301px; margin-top:2731px; line-height:15px; white-space:nowrap">\r
401 \93®\8dì</DIV>\r
402 <DIV id="text97_12" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:2759px; line-height:15px; white-space:nowrap">\r
403 C:\dst_folder</DIV>\r
404 <DIV id="text97_13" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:298px; margin-top:2759px; line-height:15px; white-space:nowrap">\r
405 \83G\83\89\81[ 800A0046 \8f\91\82«\8d\9e\82Ý\82Å\82«\82Ü\82¹\82ñ</DIV>\r
406 <DIV id="text97_14" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:2782px; line-height:15px; white-space:nowrap">\r
407 C:\dst_folder\a.txt</DIV>\r
408 <DIV id="text97_15" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:298px; margin-top:2782px; line-height:15px; white-space:nowrap">\r
409 dst_folder \82É a.txt \82ð\83R\83s\81[\82µ\82Ü\82·</DIV>\r
410 <DIV id="text97_16" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:2805px; line-height:15px; white-space:nowrap">\r
411 C:\dst_folder\b.txt</DIV>\r
412 <DIV id="text97_17" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:298px; margin-top:2805px; line-height:15px; white-space:nowrap">\r
413 \83t\83@\83C\83\8b\96¼\82ð b.txt \82É\95Ï\82¦\82Ä\83R\83s\81[\82µ\82Ü\82·</DIV>\r
414 <v:line style="position:absolute;" from="29,2752" to="557,2752" strokecolor="#000000" strokeweight="1pt"/>\r
415 <DIV id="text97_19" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:15px; margin-top:3019px; line-height:15px; white-space:nowrap">\r
416 CopyFolder\81AMoveFolder</DIV>\r
417 <v:line style="position:absolute;" from="29,3110" to="568,3110" strokecolor="#000000" strokeweight="1pt"/>\r
418 <DIV id="text97_21" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:298px; margin-top:3186px; line-height:15px; white-space:nowrap">\r
419 \83G\83\89\81[ 800A004C \83p\83X\82ª\8c©\82Â\82©\82è\82Ü\82¹\82ñ</DIV>\r
420 <DIV id="text97_22" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:3186px; line-height:15px; white-space:nowrap">\r
421 C:\dst_folder\bb\cc</DIV>\r
422 <DIV id="text97_23" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:298px; margin-top:3140px; line-height:15px; white-space:nowrap">\r
423 \83t\83H\83\8b\83_ aa \82ð dst_folder \82Ì\92\86\82É\83R\83s\81[\82µ\82Ü\82·</DIV>\r
424 <DIV id="text97_24" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:3140px; line-height:15px; white-space:nowrap">\r
425 C:\dst_folder\aa</DIV>\r
426 <DIV id="text97_25" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:298px; margin-top:3117px; line-height:15px; white-space:nowrap">\r
427 \83t\83H\83\8b\83_ aa \82Ì\93à\97e\82ð dst_folder \82É\83R\83s\81[\82µ\82Ü\82·</DIV>\r
428 <DIV id="text97_26" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:3117px; line-height:15px; white-space:nowrap">\r
429 C:\dst_folder</DIV>\r
430 <DIV id="text97_27" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:301px; margin-top:3089px; line-height:15px; white-space:nowrap">\r
431 \93®\8dì</DIV>\r
432 <DIV id="text97_28" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:44px; margin-top:3117px; line-height:15px; white-space:nowrap">\r
433 \83t\83H\83\8b\83_ aa</DIV>\r
434 <DIV id="text97_29" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:44px; margin-top:3089px; line-height:15px; white-space:nowrap">\r
435 src \88ø\90\94</DIV>\r
436 <DIV id="text97_30" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:3089px; line-height:15px; white-space:nowrap">\r
437 dst \88ø\90\94</DIV>\r
438 <DIV id="text97_31" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:44px; margin-top:3056px; line-height:15px; white-space:nowrap">\r
439 \83R\83s\81[\90æ\83t\83H\83\8b\83_&nbsp; C:\dst_folder \82ª\91\8dÝ\82·\82é\82Æ\82«</DIV>\r
440 <DIV id="text97_32" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:318px; margin-top:2564px; line-height:15px; white-space:nowrap">\r
441 \82É\8ew\92è\82·\82é\83p\83X\82ª\82Ç\82¤\82È\82Á\82Ä\82¢\82é\82©\82Ç\82¤\82©\82Å\81A</DIV>\r
442 <DIV id="text97_33" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:37px; margin-top:2579px; line-height:15px; white-space:nowrap">\r
443 \82Ç\82Ì\82æ\82¤\82È\93®\82«\82ð\82·\82é\82©\82ð\82Ü\82Æ\82ß\82Ä\82¢\82Ü\82·\81B</DIV>\r
444 <DIV id="text97_34" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:2828px; line-height:15px; white-space:nowrap">\r
445 C:\dst_folder\c\d.txt</DIV>\r
446 <DIV id="text97_35" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:298px; margin-top:2828px; line-height:15px; white-space:nowrap">\r
447 \83G\83\89\81[ 800A004C \83p\83X\82ª\8c©\82Â\82©\82è\82Ü\82¹\82ñ</DIV>\r
448 <DIV id="text97_36" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:298px; margin-top:3163px; line-height:15px; white-space:nowrap">\r
449 \83t\83H\83\8b\83_\96¼\82ð bb \82É\95Ï\82¦\82Ä\83R\83s\81[\82µ\82Ü\82·</DIV>\r
450 <DIV id="text97_37" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:3163px; line-height:15px; white-space:nowrap">\r
451 C:\dst_folder\bb</DIV>\r
452 <DIV id="text97_38" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:44px; margin-top:3249px; line-height:15px; white-space:nowrap">\r
453 \83\8f\83C\83\8b\83h\83J\81[\83h\82Í\81A\83R\83s\81[\90æ\82É\83}\83b\83`\82µ\82È\82¢\82Æ\82«\82É\8cÀ\82è\8eg\82¦\82Ü\82·\81B<BR/>\r
454 \83t\83H\83\8b\83_\96¼\82ð\95Ï\82¦\82é\82±\82Æ\82Í\82Å\82«\82Ü\82¹\82ñ\81B</DIV>\r
455 <DIV id="text97_39" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:44px; margin-top:2899px; line-height:15px; white-space:nowrap">\r
456 \83\8f\83C\83\8b\83h\83J\81[\83h</DIV>\r
457 <DIV id="text97_40" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:2899px; line-height:15px; white-space:nowrap">\r
458 C:\dst_folder</DIV>\r
459 <DIV id="text97_41" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:298px; margin-top:2899px; line-height:15px; white-space:nowrap">\r
460 dst_folder \82É\83t\83@\83C\83\8b\82ð\83R\83s\81[\82µ\82Ü\82·<BR/>\r
461 \83t\83H\83\8b\83_\82Í\83R\83s\81[\82µ\82Ü\82¹\82ñ</DIV>\r
462 <DIV id="text97_42" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:2935px; line-height:15px; white-space:nowrap">\r
463 C:\dst_folder\c</DIV>\r
464 <DIV id="text97_43" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:298px; margin-top:2935px; line-height:15px; white-space:nowrap">\r
465 \83G\83\89\81[ 800A004C \83p\83X\82ª\8c©\82Â\82©\82è\82Ü\82¹\82ñ</DIV>\r
466 <DIV id="text97_44" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:44px; margin-top:3209px; line-height:15px; white-space:nowrap">\r
467 \83\8f\83C\83\8b\83h\83J\81[\83h</DIV>\r
468 <DIV id="text97_45" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:161px; margin-top:3209px; line-height:15px; white-space:nowrap">\r
469 C:\dst_folder</DIV>\r
470 <DIV id="text97_46" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:298px; margin-top:3209px; line-height:15px; white-space:nowrap">\r
471 \83t\83H\83\8b\83_\82ð dst_folder \82Ì\92\86\82É\83R\83s\81[\82µ\82Ü\82·</DIV>\r
472 <DIV id="text97_47" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:125px; margin-top:2604px; line-height:15px; white-space:nowrap">\r
473 <A href="..\vbslib.files\vbslib_23.html#copy">\r
474 copy</A></DIV>\r
475 <DIV id="text97_48" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:37px; margin-top:2604px; line-height:15px; white-space:nowrap">\r
476 \82È\82¨\81Avbslib \82Ì<BR/>\r
477 \82 \82è\82Ü\82¹\82ñ\81B</DIV>\r
478 <DIV id="text97_49" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:156px; margin-top:2604px; line-height:15px; white-space:nowrap">\r
479 \82Í\81A\8ew\92è\82µ\82½\83p\83X\82ª\82Ç\82¤\82È\82Á\82Ä\82¢\82é\82©\82Ç\82¤\82©\82É\82æ\82Á\82Ä\93®\82«\82ª\95Ï\82í\82é\82±\82Æ\82Í</DIV>\r
480 <DIV id="text97_50" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#000000; margin-left:227px; margin-top:2971px; line-height:12px; white-space:nowrap">\r
481 src \82É\83\8f\83C\83\8b\83h\83J\81[\83h\82ª\82 \82é\82Æ\82«\82Í\81Adst \82Í\83t\83H\83\8b\83_\81[\82Æ\82µ\82Ä\8f\88\97\9d\82µ\82Ü\82·\81B</DIV>\r
482 <DIV id="text97_51" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#000000; margin-left:214px; margin-top:2854px; line-height:13px; white-space:nowrap">\r
483 dst \82ª\83t\83H\83\8b\83_\81[\82Æ\82µ\82Ä\91\8dÝ\82·\82é\82Æ\82«\82Í\81A\82»\82Ì\83t\83H\83\8b\83_\81[\82Ì\92\86\82É\83R\83s\81[\82µ\82Ü\82·\81B<BR/>\r
484 \82»\82¤\82Å\82È\82¢\82Æ\82«\82Í\81Adst \82ª\83t\83@\83C\83\8b\82Æ\82µ\82Ä\8f\88\97\9d\82µ\82Ü\82·\81B</DIV>\r
485 \r
486 <v:line from="0,2508" to="609,2508"/>\r
487 <v:line from="609,2508" to="609,3313"/>\r
488 <v:line from="609,3313" to="0,3313"/>\r
489 <v:line from="0,3313" to="0,2508"/>\r
490 \r
491 </PAGE>\r
492  \r
493 <!-- page 98 --> \r
494 <PAGE>\r
495 <A id="svgcats_vml_p98" class="to_tree" style="margin-top:3318px;" onClick="selectTreeElem( '98' );">\81©</A>\r
496 <A href="#svgcats_vml_p99" class="to_next_page" style="margin-top:3318px;">\81¥</A>\r
497 <A href="#svgcats_vml_p97" class="to_prev_page" style="margin-top:3318px;">\81£</A>\r
498 <v:rect style="position:absolute; margin-left:0px; margin-top:3329px; width:735px; height:1331px;" fillcolor="white"/>\r
499 <v:rect style="position:absolute; margin-left:33px; margin-top:3396px; width:322px; height:55px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
500 <DIV id="text98_1" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:41px; margin-top:3402px; line-height:15px; white-space:nowrap">\r
501 Set fs = CreateObject("Scripting.FileSystemObject")<BR/>\r
502 fs.CopyFolder "public", "dst\public", True<BR/>\r
503 Set fs = Nothing</DIV>\r
504 <DIV id="text98_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:20px; margin-top:3369px; line-height:15px; white-space:nowrap">\r
505 <A name="folder_copy">\r
506 \83t\83H\83\8b\83_\82ð\83R\83s\81[\82·\82é</A></DIV>\r
507 <v:line style="position:absolute;" from="204,3434" to="309,3481" strokecolor="#008040" strokeweight="2pt"/>\r
508 <v:oval style="position:absolute; margin-left:200px; margin-top:3430px; width:7px; height:7px;" fillcolor="#008040" strokecolor="#008040" strokeweight="2pt"/>\r
509 <v:rect style="position:absolute; margin-left:190px; margin-top:3465px; width:237px; height:31px;" fillcolor="#FFFFFF" strokecolor="#FFFFFF" strokeweight="1pt"/>\r
510 <DIV id="text98_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:194px; margin-top:3467px; line-height:14px; white-space:nowrap">\r
511 \90V\82µ\82­\82Å\82«\82é\83t\83H\83\8b\83_\96¼<BR/>\r
512 \82Ü\82½\82Í\81A\8fã\8f\91\82«\82·\82é\83t\83H\83\8b\83_\96¼\82Ü\82Å\8aÜ\82ß\82é</DIV>\r
513 <v:rect style="position:absolute; margin-left:33px; margin-top:4107px; width:712px; height:370px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
514 <DIV id="text98_5" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:41px; margin-top:4113px; line-height:15px; white-space:nowrap">\r
515 WinCE = "C:\WINCE420"<BR/>\r
516 <BR/>\r
517 If MsgBox( "coredll\82ð\83C\83\93\83X\83g\81[\83\8b\82µ\82Ü\82·\81B"+Chr(13)+WinCE+"\platform\SG2_VR5500\drivers\ipLib\ipLibCom\ipLib-com.h" _<BR/>\r
518 &nbsp; &nbsp; &nbsp;+Chr(13)+WinCE+"\private\WINCEOS\COREOS\CORE\DLL"+Chr(13)+_<BR/>\r
519 &nbsp; &nbsp; &nbsp;WinCE+"\public\common\cesysgen\Makefile"+Chr(13)+_<BR/>\r
520 &nbsp; &nbsp; &nbsp;"\82ð\8fã\8f\91\82«\82µ\81A"+Chr(13)+_<BR/>\r
521 &nbsp; &nbsp; &nbsp;WinCE+"\PLATFORM\SG2_VR5500\INC\ipLibCom.h \82È\82Ç\82ð\8dì\90¬\82µ\82Ü\82·\81B"+Chr(13)+_<BR/>\r
522 &nbsp; &nbsp; &nbsp;"\82æ\82ë\82µ\82¢\82Å\82·\82©\81\81i\83h\83\89\83C\83u\82Í\8d\87\82Á\82Ä\82¢\82Ü\82·\82©\81H\81j"+Chr(13)+_<BR/>\r
523 &nbsp; &nbsp; &nbsp;"\81i\83\8a\83r\83\8b\83h\82·\82é\82Æ\82«\82â\91¼\82Ì\8aÂ\8b«\82Å\8eg\82¤\82Æ\82«\82Í\81A\83A\83\93\83C\83\93\83X\83g\81[\83\8b\82µ\82Ä\82­\82¾\82³\82¢\81B\81j" ,_<BR/>\r
524 &nbsp; &nbsp;vbYesNo + vbExclamation, "\8fã\8f\91\82«\8am\94F" ) = vbYes Then<BR/>\r
525 <BR/>\r
526 Set fs = CreateObject("Scripting.FileSystemObject")<BR/>\r
527 fs.CopyFolder "platform", WinCE+"\platform", TRUE<BR/>\r
528 fs.CopyFolder "private", WinCE+"\private", TRUE<BR/>\r
529 fs.CopyFolder "public", WinCE+"\public", TRUE<BR/>\r
530 Set fs = Nothing<BR/>\r
531 <BR/>\r
532 Set sh = WScript.CreateObject("WScript.Shell")<BR/>\r
533 sh.Run WinCE+"\PLATFORM\SG2_VR5500\DRIVERS\ipLib\ipLib-Headers-maker.vbs",1,True<BR/>\r
534 Set sh = Nothing<BR/>\r
535 <BR/>\r
536 MsgBox "\83C\83\93\83X\83g\81[\83\8b\82ª\8a®\97¹\82µ\82Ü\82µ\82½\81B"<BR/>\r
537 <BR/>\r
538 End If</DIV>\r
539 <v:rect style="position:absolute; margin-left:33px; margin-top:3549px; width:586px; height:505px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
540 <DIV id="text98_6" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:41px; margin-top:3555px; line-height:15px; white-space:nowrap">\r
541 Sub main()<BR/>\r
542 <BR/>\r
543 &nbsp; Set args = WScript.Arguments<BR/>\r
544 &nbsp; If args.Count &lt;&gt; 2 Then MsgBox "This is update files copy script" _<BR/>\r
545 &nbsp; &nbsp; +vbCR+"ex) WScript.exe xcopy_pb.vbs c:\folder1 c:\folder2", vbOKOnly, "xcopy_pb" : Exit Sub<BR/>\r
546 <BR/>\r
547 &nbsp; Set fs = CreateObject( "Scripting.FileSystemObject" )<BR/>\r
548 &nbsp; Set folder1 = fs.GetFolder( args(0) )<BR/>\r
549 &nbsp; Set folder2 = fs.GetFolder( args(1) )<BR/>\r
550 <BR/>\r
551 &nbsp; For Each file In folder1.Files<BR/>\r
552 <BR/>\r
553 &nbsp; &nbsp; fname1 = args(0) + "\" + file.Name<BR/>\r
554 &nbsp; &nbsp; fname2 = args(1) + "\" + file.Name<BR/>\r
555 <BR/>\r
556 &nbsp; &nbsp; Set file1 = fs.GetFile( fname1 )<BR/>\r
557 <BR/>\r
558 &nbsp; &nbsp; On Error Resume Next<BR/>\r
559 &nbsp; &nbsp; Set file2 = fs.GetFile( fname2 )<BR/>\r
560 &nbsp; &nbsp; On Error Goto 0<BR/>\r
561 <BR/>\r
562 &nbsp; &nbsp; If IsEmpty( file2 ) Then<BR/>\r
563 &nbsp; &nbsp; &nbsp; fs.CopyFile fname1, fname2<BR/>\r
564 &nbsp; &nbsp; ElseIf&nbsp; file1.DateLastModified &gt; file2.DateLastModified Then<BR/>\r
565 &nbsp; &nbsp; &nbsp; fs.CopyFile fname1, fname2<BR/>\r
566 &nbsp; &nbsp; End If<BR/>\r
567 <BR/>\r
568 &nbsp; Next<BR/>\r
569 <BR/>\r
570 End Sub<BR/>\r
571 <BR/>\r
572 <BR/>\r
573 main</DIV>\r
574 <DIV id="text98_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:21px; margin-top:3522px; line-height:15px; white-space:nowrap">\r
575 <A name="copy_new">\r
576 \90V\82µ\82¢\83t\83@\83C\83\8b\82Ì\82Ý\83R\83s\81[\82·\82é</A></DIV>\r
577 <v:rect style="position:absolute; margin-left:347px; margin-top:3528px; width:188px; height:17px;" fillcolor="#FFFFFF" strokecolor="#FFFFFF" strokeweight="1pt"/>\r
578 <DIV id="text98_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:351px; margin-top:3530px; line-height:15px; white-space:nowrap">\r
579 \81i\83T\83u\83t\83H\83\8b\83_\82Í\83R\83s\81[\82µ\82Ü\82¹\82ñ\81j</DIV>\r
580 \r
581 <v:line from="0,3329" to="735,3329"/>\r
582 <v:line from="735,3329" to="735,4660"/>\r
583 <v:line from="735,4660" to="0,4660"/>\r
584 <v:line from="0,4660" to="0,3329"/>\r
585 \r
586 </PAGE>\r
587  \r
588 <!-- page 99 --> \r
589 <PAGE>\r
590 <A id="svgcats_vml_p99" class="to_tree" style="margin-top:4665px;" onClick="selectTreeElem( '99' );">\81©</A>\r
591 <A href="#svgcats_vml_p100" class="to_next_page" style="margin-top:4665px;">\81¥</A>\r
592 <A href="#svgcats_vml_p98" class="to_prev_page" style="margin-top:4665px;">\81£</A>\r
593 <v:rect style="position:absolute; margin-left:0px; margin-top:4676px; width:498px; height:1241px;" fillcolor="white"/>\r
594 <DIV id="text99_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:5098px; line-height:15px; white-space:nowrap">\r
595 <A name="file_list">\r
596 \83t\83@\83C\83\8b\88ê\97\97</A></DIV>\r
597 <v:rect style="position:absolute; margin-left:48px; margin-top:5164px; width:394px; height:130px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
598 <DIV id="text99_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:5170px; line-height:15px; white-space:nowrap">\r
599 Dim g_fs, folder, file<BR/>\r
600 Set g_fs = WScript.CreateObject( "Scripting.FileSystemObject" )<BR/>\r
601 Set folder = g_fs.GetFolder( "C:\folder" )<BR/>\r
602 For Each&nbsp; file&nbsp; In&nbsp; folder.Files<BR/>\r
603 &nbsp; &nbsp; file.Name,&nbsp; file.Path&nbsp; '// \82±\82±\82É\8f\88\97\9d\82ð\8f\91\82­<BR/>\r
604 Next<BR/>\r
605 folder = Empty<BR/>\r
606 g_fs = Empty</DIV>\r
607 <v:rect style="position:absolute; margin-left:47px; margin-top:5389px; width:394px; height:130px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
608 <DIV id="text99_3" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:55px; margin-top:5395px; line-height:15px; white-space:nowrap">\r
609 Dim g_fs, folder, sub_folder<BR/>\r
610 Set g_fs = WScript.CreateObject( "Scripting.FileSystemObject" )<BR/>\r
611 Set folder = g_fs.GetFolder( "C:\folder" )<BR/>\r
612 For Each&nbsp; sub_folder&nbsp; In&nbsp; folder.SubFolders<BR/>\r
613 &nbsp; &nbsp; sub_folder.Name,&nbsp; sub_folder.Path&nbsp; '// \82±\82±\82É\8f\88\97\9d\82ð\8f\91\82­<BR/>\r
614 Next<BR/>\r
615 folder = Empty<BR/>\r
616 g_fs = Empty</DIV>\r
617 <DIV id="text99_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:34px; margin-top:5324px; line-height:15px; white-space:nowrap">\r
618 <A name="folder_list">\r
619 \83T\83u\83t\83H\83\8b\83_\88ê\97\97 \81i\82P\92i\89º\82Ì\82Ý\81j</A></DIV>\r
620 <v:rect style="position:absolute; margin-left:47px; margin-top:5567px; width:334px; height:205px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
621 <DIV id="text99_5" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:55px; margin-top:5573px; line-height:15px; white-space:nowrap">\r
622 Dim g_fs<BR/>\r
623 Set g_fs = CreateObject("Scripting.FileSystemObject")<BR/>\r
624 EnumSubFolders_&nbsp; g_fs.GetFolder( "C:\folder" )<BR/>\r
625 <BR/>\r
626 Sub&nbsp; EnumSubFolders_( folder )<BR/>\r
627 &nbsp; &nbsp; Dim file, sub_folder<BR/>\r
628 &nbsp; &nbsp; For Each&nbsp; file&nbsp; In&nbsp; folder.Files<BR/>\r
629 &nbsp; &nbsp; &nbsp; &nbsp; echo&nbsp; file.Path&nbsp; '// \82±\82±\82É\8f\88\97\9d\82ð\8f\91\82­<BR/>\r
630 &nbsp; &nbsp; Next<BR/>\r
631 &nbsp; &nbsp; For Each&nbsp; sub_folder&nbsp; In&nbsp; folder.SubFolders <BR/>\r
632 &nbsp; &nbsp; &nbsp; &nbsp; EnumSubFolders_&nbsp; sub_folder<BR/>\r
633 &nbsp; &nbsp; Next<BR/>\r
634 End Sub</DIV>\r
635 <DIV id="text99_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:34px; margin-top:5542px; line-height:15px; white-space:nowrap">\r
636 <A name="files_list">\r
637 \83T\83u\83t\83H\83\8b\83_\82É\82 \82é\83t\83@\83C\83\8b\88ê\97\97 \81i\8dÄ\8bA\81A\83l\83X\83g\81j</A></DIV>\r
638 <DIV id="text99_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:47px; margin-top:5797px; line-height:15px; white-space:nowrap">\r
639 \83T\83\93\83v\83\8b\81F</DIV>\r
640 <v:rect style="position:absolute; margin-left:112px; margin-top:5795px; width:117px; height:18px;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
641 <DIV id="text99_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:120px; margin-top:5797px; line-height:15px; white-space:nowrap">\r
642 SubFolders.vbs.lzh</DIV>\r
643 <DIV id="text99_9" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:63px; margin-top:5818px; line-height:15px; white-space:nowrap">\r
644 \83T\83u\83t\83H\83\8b\83_\82Ì\82·\82×\82Ä\82Ì\83t\83@\83C\83\8b\82É\83R\83}\83\93\83h\82ð\8eÀ\8ds\82µ\81A<BR/>\r
645 \95W\8f\80\8fo\97Í\82ð\83t\83@\83C\83\8b\82É\8fo\97Í\82µ\82Ü\82·\81B</DIV>\r
646 <DIV id="text99_10" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:4734px; line-height:15px; white-space:nowrap">\r
647 <A name="file_exist">\r
648 \83t\83@\83C\83\8b\82Ì\91\8dÝ</A></DIV>\r
649 <DIV id="text99_11" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:48px; margin-top:5122px; line-height:15px; white-space:nowrap">\r
650 \83t\83H\83\8b\83_\82Ì\92\86\82É\82 \82é\83t\83@\83C\83\8b\82Ì\88ê\97\97\82Å\82·\81B<BR/>\r
651 \83t\83H\83\8b\83_\82Ì\92\86\82Ì\83t\83H\83\8b\83_\82É\82Â\82¢\82Ä\82Í\81A</DIV>\r
652 <DIV id="text99_12" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:262px; margin-top:5137px; line-height:15px; white-space:nowrap">\r
653 <A href="#folder_list">\r
654 \81¨ \83T\83u\83t\83H\83\8b\83_\88ê\97\97 \81i\82P\92i\89º\82Ì\82Ý\81j</A></DIV>\r
655 <DIV id="text99_13" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:55px; margin-top:5350px; line-height:15px; white-space:nowrap">\r
656 \83t\83H\83\8b\83_\82Ì\92\86\82É\82 \82é\83t\83H\83\8b\83_\82Ì\88ê\97\97\82Å\82·\81B<BR/>\r
657 \83t\83H\83\8b\83_\82Ì\92\86\82Ì\83t\83@\83C\83\8b\82É\82Â\82¢\82Ä\82Í\81A</DIV>\r
658 <DIV id="text99_14" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:270px; margin-top:5365px; line-height:15px; white-space:nowrap">\r
659 <A href="#file_list">\r
660 \81¨ \83t\83@\83C\83\8b\88ê\97\97</A></DIV>\r
661 <DIV id="text99_15" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:30px; margin-top:4694px; line-height:15px; white-space:nowrap">\r
662 <A name="file_list">\r
663 \83t\83@\83C\83\8b\88ê\97\97\81A\91\8dÝ</A></DIV>\r
664 <DIV id="text99_16" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:48px; margin-top:4768px; line-height:15px; white-space:nowrap">\r
665 <A href="vbs_memo_05.html#FileSystemObject_FileExists">\r
666 \81¨ FileSystemObject::FileExists</A></DIV>\r
667 <DIV id="text99_17" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:48px; margin-top:4789px; line-height:15px; white-space:nowrap">\r
668 <A href="vbs_memo_05.html#FileSystemObject_FolderExists">\r
669 \81¨ FileSystemObject::FolderExists</A></DIV>\r
670 <DIV id="text99_18" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:4843px; line-height:15px; white-space:nowrap">\r
671 <A name="open_not_exist">\r
672 \91\8dÝ\82µ\82È\82¢\83t\83@\83C\83\8b\82ð\8aJ\82­</A></DIV>\r
673 <v:rect style="position:absolute; margin-left:48px; margin-top:4867px; width:418px; height:190px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
674 <DIV id="text99_19" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:4873px; line-height:15px; white-space:nowrap">\r
675 &nbsp; Dim i<BR/>\r
676 &nbsp; For i = 1 To 9999<BR/>\r
677 &nbsp; &nbsp; If i&lt;9999 Then On Error Resume Next&nbsp; 'try<BR/>\r
678 &nbsp; &nbsp; &nbsp; If i=1 Then : Test_LogFName = "test_log.txt"<BR/>\r
679 &nbsp; &nbsp; &nbsp; Else : Test_LogFName = "test_log" &amp; i &amp; ".txt" : End If<BR/>\r
680 &nbsp; &nbsp; &nbsp; Set g_log = g_fs.CreateTextFile( Test_LogFName, True, False )<BR/>\r
681 &nbsp; &nbsp; e.Copy( Err ) : On Error GoTo 0 : If e.num &lt;&gt; 0 Then&nbsp; 'catch<BR/>\r
682 &nbsp; &nbsp; &nbsp; If e.num &lt;&gt; 70 Then&nbsp; e.Raise<BR/>\r
683 &nbsp; &nbsp; Else<BR/>\r
684 &nbsp; &nbsp; &nbsp; Exit For<BR/>\r
685 &nbsp; &nbsp; End If<BR/>\r
686 &nbsp; Next</DIV>\r
687 <DIV id="text99_20" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:313px; margin-top:5200px; line-height:15px; white-space:nowrap">\r
688 <A href="vbs_memo_05.html#folder_obj">\r
689 \81¨ Folder \83I\83u\83W\83F\83N\83g</A></DIV>\r
690 <DIV id="text99_21" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:312px; margin-top:5425px; line-height:15px; white-space:nowrap">\r
691 <A href="vbs_memo_05.html#folder_obj">\r
692 \81¨ Folder \83I\83u\83W\83F\83N\83g</A></DIV>\r
693 <DIV id="text99_22" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:88px; margin-top:5869px; line-height:15px; white-space:nowrap">\r
694 \81¨ \83t\83@\83C\83\8b\88ê\97\97</DIV>\r
695 <DIV id="text99_23" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:47px; margin-top:5869px; line-height:15px; white-space:nowrap">\r
696 \8aÖ\98A</DIV>\r
697 \r
698 <v:line from="0,4676" to="498,4676"/>\r
699 <v:line from="498,4676" to="498,5917"/>\r
700 <v:line from="498,5917" to="0,5917"/>\r
701 <v:line from="0,5917" to="0,4676"/>\r
702 \r
703 </PAGE>\r
704  \r
705 <!-- page 100 --> \r
706 <PAGE>\r
707 <A id="svgcats_vml_p100" class="to_tree" style="margin-top:5922px;" onClick="selectTreeElem( '100' );">\81©</A>\r
708 <A href="#svgcats_vml_p101" class="to_next_page" style="margin-top:5922px;">\81¥</A>\r
709 <A href="#svgcats_vml_p99" class="to_prev_page" style="margin-top:5922px;">\81£</A>\r
710 <v:rect style="position:absolute; margin-left:0px; margin-top:5933px; width:524px; height:1794px;" fillcolor="white"/>\r
711 <DIV id="text100_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:20px; margin-top:5951px; line-height:15px; white-space:nowrap">\r
712 <A name="fileaxs">\r
713 \83t\83@\83C\83\8b\93à\83A\83N\83Z\83X\81i\83e\83L\83X\83g\81j</A></DIV>\r
714 <v:rect style="position:absolute; margin-left:44px; margin-top:6283px; width:448px; height:160px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
715 <DIV id="text100_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:52px; margin-top:6289px; line-height:15px; white-space:nowrap">\r
716 &nbsp; &nbsp; Set g_fs = WScript.CreateObject( "Scripting.FileSystemObject" )<BR/>\r
717 &nbsp; &nbsp; Set file = g_fs.CreateTextFile( path ******, True, False )<BR/>\r
718 <BR/>\r
719 &nbsp; &nbsp; file.Write&nbsp; "\89ü\8ds\82È\82µ\81B"<BR/>\r
720 &nbsp; &nbsp; file.WriteLine "\83t\83@\83C\83\8b= " &amp; path&nbsp; '// \8dÅ\8cã\82É 0x0D, 0x0A \82ð\8fo\82µ\82Ü\82·<BR/>\r
721 &nbsp; &nbsp; file.WriteBlankLines 1&nbsp; '// \83u\83\89\83\93\83N\8ds\82ð1\8ds\8f\91\82«\8d\9e\82Þ<BR/>\r
722 <BR/>\r
723 &nbsp; &nbsp; file.Close&nbsp; '// \95K\97v<BR/>\r
724 &nbsp; &nbsp; file = Empty<BR/>\r
725 &nbsp; &nbsp; g_fs = Empty</DIV>\r
726 <DIV id="text100_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:6260px; line-height:15px; white-space:nowrap">\r
727 <A name="txt_write">\r
728 \83e\83L\83X\83g\83t\83@\83C\83\8b\82ð\8dì\90¬\82·\82é (Write)</A></DIV>\r
729 <v:rect style="position:absolute; margin-left:44px; margin-top:6519px; width:418px; height:160px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
730 <DIV id="text100_4" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:52px; margin-top:6525px; line-height:15px; white-space:nowrap">\r
731 &nbsp; &nbsp; Set g_fs = WScript.CreateObject( "Scripting.FileSystemObject" )<BR/>\r
732 &nbsp; &nbsp; Set f = g_fs.OpenTextFile( path ******,,,-2 )<BR/>\r
733 <BR/>\r
734 &nbsp; &nbsp; Do Until f.AtEndOfStream<BR/>\r
735 &nbsp; &nbsp; &nbsp; &nbsp; line = f.ReadLine()&nbsp; '// \89ü\8ds(vbCR+vbLF)\82Í\8aÜ\82Ü\82È\82¢<BR/>\r
736 &nbsp; &nbsp; Loop<BR/>\r
737 <BR/>\r
738 &nbsp; &nbsp; f.Close&nbsp; '// \95K\97v<BR/>\r
739 &nbsp; &nbsp; f = Empty<BR/>\r
740 &nbsp; &nbsp; g_fs = Empty</DIV>\r
741 <DIV id="text100_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:6494px; line-height:15px; white-space:nowrap">\r
742 <A name="txt_read">\r
743 \83e\83L\83X\83g\83t\83@\83C\83\8b\82Ì\93à\97e\82ð\93Ç\82Þ (Read)</A></DIV>\r
744 <v:rect style="position:absolute; margin-left:340px; margin-top:6322px; width:130px; height:18px;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
745 <DIV id="text100_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:346px; margin-top:6324px; line-height:15px; white-space:nowrap">\r
746 \81ª\8fã\8f\91\82«\81A\94ñUnicode</DIV>\r
747 <v:rect style="position:absolute; margin-left:45px; margin-top:7132px; width:442px; height:205px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
748 <DIV id="text100_7" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:53px; margin-top:7138px; line-height:15px; white-space:nowrap">\r
749 &nbsp; &nbsp; Set&nbsp; g_fs = CreateObject( "Scripting.FileSystemObject" )<BR/>\r
750 <BR/>\r
751 &nbsp; &nbsp; Set f = g_fs.OpenTextFile( read_path1 ****** )<BR/>\r
752 &nbsp; &nbsp; t = f.ReadAll<BR/>\r
753 &nbsp; &nbsp; f = Empty&nbsp; '// \96³\82­\82Ä\82à\82æ\82¢\81i\83K\83x\81[\83W\83R\83\8c\83N\83^\82Å\83N\83\8d\81[\83Y\82³\82ê\82é\82½\82ß\81j<BR/>\r
754 <BR/>\r
755 &nbsp; &nbsp; Set f = g_fs.OpenTextFile( read_path2 ****** )<BR/>\r
756 &nbsp; &nbsp; t = t + f.ReadAll<BR/>\r
757 &nbsp; &nbsp; f = Empty<BR/>\r
758 <BR/>\r
759 &nbsp; &nbsp; Set f = g_fs.CreateTextFile( write_path ******, True )<BR/>\r
760 &nbsp; &nbsp; f.Write&nbsp; t<BR/>\r
761 &nbsp; &nbsp; f = Empty</DIV>\r
762 <DIV id="text100_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:7112px; line-height:15px; white-space:nowrap">\r
763 <A name="txt_join">\r
764 \83e\83L\83X\83g\83t\83@\83C\83\8b\82ð\8c\8b\8d\87\82·\82é</A></DIV>\r
765 <DIV id="text100_9" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:52px; margin-top:5991px; line-height:15px; white-space:nowrap">\r
766 <A href="#txt_write">\r
767 \81¨ \83e\83L\83X\83g\83t\83@\83C\83\8b\82ð\8dì\90¬\82·\82é (Write)</A></DIV>\r
768 <DIV id="text100_10" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:52px; margin-top:6010px; line-height:15px; white-space:nowrap">\r
769 <A href="#txt_read">\r
770 \81¨ \83e\83L\83X\83g\83t\83@\83C\83\8b\82Ì\93à\97e\82ð\93Ç\82Þ (Read)</A></DIV>\r
771 <v:rect style="position:absolute; margin-left:257px; margin-top:6126px; width:127px; height:18px;" fillcolor="#F8FFB0" strokecolor="#000000" strokeweight="1pt"/>\r
772 <DIV id="text100_11" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:265px; margin-top:6128px; line-height:15px; white-space:nowrap">\r
773 \81¨ base64.zip (VBS)</DIV>\r
774 <DIV id="text100_12" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:52px; margin-top:6106px; line-height:15px; white-space:nowrap">\r
775 \83o\83C\83i\83\8a\83t\83@\83C\83\8b\82Í\88µ\82¦\82È\82¢\82æ\82¤\82Å\82·\81B</DIV>\r
776 <DIV id="text100_13" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:52px; margin-top:6165px; line-height:15px; white-space:nowrap">\r
777 CreateTextFile \82Ì\95Ô\82è\92l\82Í\81ATextStream\83I\83u\83W\83F\83N\83g\82Å\82·\81B</DIV>\r
778 <DIV id="text100_14" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#000000; margin-left:82px; margin-top:6129px; line-height:12px; white-space:nowrap">\r
779 ADO\82ÌStream\82ð\8eg\82¦\82Î\82Å\82«\82é\82ç\82µ\82¢</DIV>\r
780 <DIV id="text100_15" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:52px; margin-top:6187px; line-height:15px; white-space:nowrap">\r
781 <A href="http://msdn.microsoft.com/library/ja/script56/html/jsmthcreateTextFile.asp" target="_blank">\r
782 \81¨ CreateTextFile \83\81\83\\83b\83h (Web)</A></DIV>\r
783 <DIV id="text100_16" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:52px; margin-top:6048px; line-height:15px; white-space:nowrap">\r
784 <A href="#txt_join">\r
785 \81¨ \83e\83L\83X\83g\83t\83@\83C\83\8b\82ð\8c\8b\8d\87\82·\82é</A></DIV>\r
786 <DIV id="text100_17" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:52px; margin-top:6209px; line-height:15px; white-space:nowrap">\r
787 <A href="vbs_memo_05.html#FileSystemObject_OpenTextFile">\r
788 \81¨ FileSystemObject::OpenTextFile</A></DIV>\r
789 <v:rect style="position:absolute; margin-left:44px; margin-top:6965px; width:442px; height:115px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
790 <DIV id="text100_18" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:52px; margin-top:6971px; line-height:15px; white-space:nowrap">\r
791 &nbsp; &nbsp; Dim g_fs, f<BR/>\r
792 <BR/>\r
793 &nbsp; &nbsp; Set g_fs = CreateObject( "Scripting.FileSystemObject" )<BR/>\r
794 <BR/>\r
795 &nbsp; &nbsp; Const&nbsp; ForAppending = 8<BR/>\r
796 &nbsp; &nbsp; Set f = g_fs.OpenTextFile( path ******, ForAppending, True, False )<BR/>\r
797 &nbsp; &nbsp; f.WriteLine&nbsp; "A"</DIV>\r
798 <DIV id="text100_19" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:6942px; line-height:15px; white-space:nowrap">\r
799 <A name="txt_append">\r
800 \83e\83L\83X\83g\83t\83@\83C\83\8b\82É\92Ç\8bL\82·\82é (Appending Write)</A></DIV>\r
801 <DIV id="text100_20" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:52px; margin-top:6029px; line-height:15px; white-space:nowrap">\r
802 <A href="#txt_append">\r
803 \81¨ \83e\83L\83X\83g\83t\83@\83C\83\8b\82É\92Ç\8bL\82·\82é (Appending Write)</A></DIV>\r
804 <DIV id="text100_21" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:154px; margin-top:6586px; line-height:13px; white-space:nowrap">\r
805 <A href="vbs_memo_05.html#TextStream_ReadLine">\r
806 ReadLine</A></DIV>\r
807 <DIV id="text100_22" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:154px; margin-top:6541px; line-height:13px; white-space:nowrap">\r
808 <A href="vbs_memo_05.html#FileSystemObject_OpenTextFile">\r
809 OpenTextFile</A></DIV>\r
810 <DIV id="text100_23" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:155px; margin-top:7169px; line-height:13px; white-space:nowrap">\r
811 <A href="vbs_memo_05.html#FileSystemObject_OpenTextFile">\r
812 OpenTextFile</A></DIV>\r
813 <DIV id="text100_24" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:172px; margin-top:6305px; line-height:13px; white-space:nowrap">\r
814 <A href="vbs_memo_05.html#FileSystemObject_CreateTextFile">\r
815 CreateTextFile</A></DIV>\r
816 <DIV id="text100_25" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:155px; margin-top:7289px; line-height:13px; white-space:nowrap">\r
817 <A href="vbs_memo_05.html#FileSystemObject_CreateTextFile">\r
818 CreateTextFile</A></DIV>\r
819 <v:rect style="position:absolute; margin-left:44px; margin-top:6743px; width:418px; height:175px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
820 <DIV id="text100_26" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:52px; margin-top:6749px; line-height:15px; white-space:nowrap">\r
821 &nbsp; &nbsp; Set g_fs = WScript.CreateObject( "Scripting.FileSystemObject" )<BR/>\r
822 &nbsp; &nbsp; Set f = g_fs.OpenTextFile( path ****** )<BR/>\r
823 <BR/>\r
824 &nbsp; &nbsp; t = ""<BR/>\r
825 &nbsp; &nbsp; On Error Resume Next<BR/>\r
826 &nbsp; &nbsp; &nbsp; &nbsp; t = f.ReadAll()<BR/>\r
827 &nbsp; &nbsp; en = Err.Number : ed = Err.Description : On Error GoTo 0<BR/>\r
828 &nbsp; &nbsp; If en = E_EndOfFile Then&nbsp; en = 0<BR/>\r
829 &nbsp; &nbsp; If en &lt;&gt; 0 Then&nbsp; Err.Raise en,,ed<BR/>\r
830 <BR/>\r
831 &nbsp; &nbsp; f = Empty </DIV>\r
832 <DIV id="text100_27" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:46px; margin-top:6724px; line-height:15px; white-space:nowrap">\r
833 ReadAll \82ð\8eg\82¤\8fê\8d\87</DIV>\r
834 <DIV id="text100_28" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:23px; margin-top:7378px; line-height:15px; white-space:nowrap">\r
835 <A name="txt_rep">\r
836 \83e\83L\83X\83g\83t\83@\83C\83\8b\82Ì\88ê\95\94\82ð\92u\82«\8a·\82¦\82é</A></DIV>\r
837 <DIV id="text100_29" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:52px; margin-top:6069px; line-height:15px; white-space:nowrap">\r
838 <A href="#txt_rep">\r
839 \81¨ \83e\83L\83X\83g\83t\83@\83C\83\8b\82Ì\88ê\95\94\82ð\92u\82«\8a·\82¦\82é</A></DIV>\r
840 <DIV id="text100_30" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:277px; margin-top:6187px; line-height:15px; white-space:nowrap">\r
841 <A href="vbs_memo_05.html#TextStream">\r
842 \81¨ TextStream</A></DIV>\r
843 <v:rect style="position:absolute; margin-left:45px; margin-top:7401px; width:376px; height:295px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
844 <DIV id="text100_31" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:53px; margin-top:7407px; line-height:15px; white-space:nowrap">\r
845 &nbsp; &nbsp; Set&nbsp; g_fs = CreateObject( "Scripting.FileSystemObject" )<BR/>\r
846 &nbsp; &nbsp; Dim&nbsp; rf, wf, line, src_path, dst_path<BR/>\r
847 <BR/>\r
848 &nbsp; &nbsp; src_path = folder_path + "\sample.c"<BR/>\r
849 &nbsp; &nbsp; dst_path = folder_path + "\sample.c_"<BR/>\r
850 <BR/>\r
851 &nbsp; &nbsp; If Not g_fs.FileExists( dst_path ) Then<BR/>\r
852 &nbsp; &nbsp; &nbsp; &nbsp; mkdir&nbsp; &nbsp; g_fs.GetParentFolderName( dst_path )<BR/>\r
853 &nbsp; &nbsp; &nbsp; &nbsp; Set rf = g_fs.OpenTextFile( src_path )<BR/>\r
854 &nbsp; &nbsp; &nbsp; &nbsp; Set wf = g_fs.CreateTextFile( dst_path, True )<BR/>\r
855 &nbsp; &nbsp; &nbsp; &nbsp; Do Until rf.AtEndOfStream<BR/>\r
856 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; line = rf.ReadLine()<BR/>\r
857 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; line = Replace( line, "from", "to" )<BR/>\r
858 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; wf.WriteLine&nbsp; line<BR/>\r
859 &nbsp; &nbsp; &nbsp; &nbsp; Loop<BR/>\r
860 &nbsp; &nbsp; &nbsp; &nbsp; rf = Empty : wf = Empty<BR/>\r
861 &nbsp; &nbsp; &nbsp; &nbsp; copy dst_path, src_path<BR/>\r
862 &nbsp; &nbsp; &nbsp; &nbsp; del&nbsp; dst_path<BR/>\r
863 &nbsp; &nbsp; End If</DIV>\r
864 <DIV id="text100_32" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:143px; margin-top:7453px; line-height:13px; white-space:nowrap">\r
865 folder_path + "\sample.c"</DIV>\r
866 <DIV id="text100_33" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:143px; margin-top:7468px; line-height:13px; white-space:nowrap">\r
867 folder_path + "\sample.c_"</DIV>\r
868 <DIV id="text100_34" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:311px; margin-top:7588px; line-height:13px; white-space:nowrap">\r
869 to</DIV>\r
870 <DIV id="text100_35" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:263px; margin-top:7588px; line-height:13px; white-space:nowrap">\r
871 from</DIV>\r
872 <DIV id="text100_36" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:167px; margin-top:7588px; line-height:13px; white-space:nowrap">\r
873 <A href="vbs_memo_10.html#Replace">\r
874 Replace</A></DIV>\r
875 <DIV id="text100_37" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:185px; margin-top:7543px; line-height:13px; white-space:nowrap">\r
876 <A href="vbs_memo_05.html#FileSystemObject_CreateTextFile">\r
877 CreateTextFile</A></DIV>\r
878 <DIV id="text100_38" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:185px; margin-top:7528px; line-height:13px; white-space:nowrap">\r
879 <A href="vbs_memo_05.html#FileSystemObject_OpenTextFile">\r
880 OpenTextFile</A></DIV>\r
881 <DIV id="text100_39" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:176px; margin-top:6724px; line-height:15px; white-space:nowrap">\r
882 <A href="..\vbslib.files\vbslib_25.html#ReadAll">\r
883 \81¨ ReadAll</A></DIV>\r
884 <DIV id="text100_40" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:52px; margin-top:6691px; line-height:15px; white-space:nowrap">\r
885 \8aÖ\98A</DIV>\r
886 <DIV id="text100_41" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:88px; margin-top:6691px; line-height:15px; white-space:nowrap">\r
887 <A href="..\vbslib.files\vbslib_29.html#OpenForRead">\r
888 \81¨ OpenForRead (vbslib)</A></DIV>\r
889 <DIV id="text100_42" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:93px; margin-top:6452px; line-height:15px; white-space:nowrap">\r
890 <A href="..\vbslib.files\vbslib_30.html#OpenForWrite">\r
891 \81¨ OpenForWrite (vbslib)</A></DIV>\r
892 <DIV id="text100_43" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:52px; margin-top:6452px; line-height:15px; white-space:nowrap">\r
893 \8aÖ\98A</DIV>\r
894 <DIV id="text100_44" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:277px; margin-top:6106px; line-height:15px; white-space:nowrap">\r
895 <A href="vbs_memo_15.html#ADODB_Stream">\r
896 \81¨ ADODB.Stream</A></DIV>\r
897 \r
898 <v:line from="0,5933" to="524,5933"/>\r
899 <v:line from="524,5933" to="524,7727"/>\r
900 <v:line from="524,7727" to="0,7727"/>\r
901 <v:line from="0,7727" to="0,5933"/>\r
902 \r
903 </PAGE>\r
904  \r
905 <!-- page 101 --> \r
906 <PAGE>\r
907 <A id="svgcats_vml_p101" class="to_tree" style="margin-top:7732px;" onClick="selectTreeElem( '101' );">\81©</A>\r
908 <A href="#svgcats_vml_p102" class="to_next_page" style="margin-top:7732px;">\81¥</A>\r
909 <A href="#svgcats_vml_p100" class="to_prev_page" style="margin-top:7732px;">\81£</A>\r
910 <v:rect style="position:absolute; margin-left:0px; margin-top:7743px; width:537px; height:918px;" fillcolor="white"/>\r
911 <DIV id="text101_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:7840px; line-height:15px; white-space:nowrap">\r
912 <A name="DeleteFolderR">\r
913 DeleteFolderR</A></DIV>\r
914 <v:rect style="position:absolute; margin-left:33px; margin-top:7869px; width:472px; height:760px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
915 <DIV id="text101_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:41px; margin-top:7875px; line-height:15px; white-space:nowrap">\r
916 '***********************************************************************<BR/>\r
917 '&nbsp; &lt;&lt;&lt; [DeleteFolderR] \83\8a\81[\83h\83I\83\93\83\8a\81[\83t\83@\83C\83\8b\82ð\8aÜ\82Þ\83t\83H\83\8b\83_\82Å\82à\8dí\8f\9c\82·\82é &gt;&gt;&gt; <BR/>\r
918 '************************************************************************/<BR/>\r
919 Sub DeleteFolderR( path )<BR/>\r
920 <BR/>\r
921 &nbsp; Set fs = CreateObject( "Scripting.FileSystemObject" )<BR/>\r
922 <BR/>\r
923 &nbsp; If fs.FolderExists( path ) Then Exit Sub<BR/>\r
924 <BR/>\r
925 &nbsp; path2 = path&nbsp; ' \96\96\94ö\82Ì \ \8bL\8d\86\82ð\8eæ\82é<BR/>\r
926 &nbsp; If Right( path2, 1 ) = "\" Then&nbsp; path2 = Left( path2, Len( path2 ) - 1 )<BR/>\r
927 <BR/>\r
928 &nbsp; nFolder = 1<BR/>\r
929 &nbsp; ReDim folderPathes(nFolder)<BR/>\r
930 &nbsp; folderPathes(nFolder) = path2<BR/>\r
931 <BR/>\r
932 &nbsp; ' \83T\83u\83t\83H\83\8b\83_\82ð\97ñ\8b\93\82·\82é<BR/>\r
933 &nbsp; iFolder = 1<BR/>\r
934 &nbsp; While iFolder &lt;= nFolder<BR/>\r
935 &nbsp; &nbsp; Set fo = fs.GetFolder( folderPathes(iFolder) )<BR/>\r
936 &nbsp; &nbsp; For Each sub in fo.SubFolders<BR/>\r
937 &nbsp; &nbsp; &nbsp; nFolder = nFolder + 1<BR/>\r
938 &nbsp; &nbsp; &nbsp; ReDim folderPathes(nFolder)<BR/>\r
939 &nbsp; &nbsp; &nbsp; folderPathes(nFolder) = sub.Path<BR/>\r
940 &nbsp; &nbsp; Next<BR/>\r
941 &nbsp; &nbsp; Set fo = Nothing<BR/>\r
942 &nbsp; &nbsp; iFolder = iFolder + 1<BR/>\r
943 &nbsp; WEnd<BR/>\r
944 <BR/>\r
945 &nbsp; ' \82·\82×\82Ä\82Ì\83T\83u\83t\83H\83\8b\83_\82É\82 \82é\83t\83@\83C\83\8b\82Ì\83\8a\81[\83h\83I\83\93\83\8a\81[\91®\90«\82ð\8aO\82·<BR/>\r
946 &nbsp; For iFolder = 1 To nFolder<BR/>\r
947 &nbsp; &nbsp; Set fo = fs.GetFolder( folderPathes(iFolder) )<BR/>\r
948 &nbsp; &nbsp; For Each f in fo.Files<BR/>\r
949 &nbsp; &nbsp; &nbsp; Set file = fs.GetFile( f.Path )<BR/>\r
950 &nbsp; &nbsp; &nbsp; file.Attributes = file.Attributes And Not ReadOnly<BR/>\r
951 &nbsp; &nbsp; &nbsp; Set file = Nothing<BR/>\r
952 &nbsp; &nbsp; Next<BR/>\r
953 &nbsp; &nbsp; Set fo = Nothing<BR/>\r
954 &nbsp; Next<BR/>\r
955 <BR/>\r
956 &nbsp; ' \83t\83H\83\8b\83_\82ð\8dí\8f\9c\82·\82é<BR/>\r
957 &nbsp; fs.DeleteFolder( path )<BR/>\r
958 <BR/>\r
959 &nbsp; Set fs = Nothing<BR/>\r
960 <BR/>\r
961 End Sub<BR/>\r
962 <BR/>\r
963 <BR/>\r
964 <BR/>\r
965 &nbsp;</DIV>\r
966 <DIV id="text101_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:7761px; line-height:15px; white-space:nowrap">\r
967 <A name="CreateFolder">\r
968 CreateFolder</A></DIV>\r
969 <DIV id="text101_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:41px; margin-top:7792px; line-height:15px; white-space:nowrap">\r
970 <A href="vbs_memo_05.html#FileSystemObject_CreateFolder">\r
971 \81¨ FileSystemObject::CreateFolder</A></DIV>\r
972 \r
973 <v:line from="0,7743" to="537,7743"/>\r
974 <v:line from="537,7743" to="537,8661"/>\r
975 <v:line from="537,8661" to="0,8661"/>\r
976 <v:line from="0,8661" to="0,7743"/>\r
977 \r
978 </PAGE>\r
979  \r
980 <!-- page 102 --> \r
981 <PAGE>\r
982 <A id="svgcats_vml_p102" class="to_tree" style="margin-top:8666px;" onClick="selectTreeElem( '102' );">\81©</A>\r
983 <A href="#svgcats_vml_p103" class="to_next_page" style="margin-top:8666px;">\81¥</A>\r
984 <A href="#svgcats_vml_p101" class="to_prev_page" style="margin-top:8666px;">\81£</A>\r
985 <v:rect style="position:absolute; margin-left:0px; margin-top:8677px; width:579px; height:1124px;" fillcolor="white"/>\r
986 <DIV id="text102_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:8694px; line-height:15px; white-space:nowrap">\r
987 <A name="array">\r
988 \95Ï\90\94\81AEmpty\81A\8c^\81A\94z\97ñ</A></DIV>\r
989 <v:rect style="position:absolute; margin-left:28px; margin-top:9028px; width:178px; height:85px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
990 <DIV id="text102_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:36px; margin-top:9034px; line-height:15px; white-space:nowrap">\r
991 Option Explicit<BR/>\r
992 Dim&nbsp; v1, v2<BR/>\r
993 Set&nbsp; v1 = CreateObject(...)<BR/>\r
994 &nbsp; :<BR/>\r
995 fs = Empty</DIV>\r
996 <DIV id="text102_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:225px; margin-top:9030px; line-height:15px; white-space:nowrap">\r
997 Option Explicit \82Í\81A\95Ï\90\94\90é\8c¾\82ª\95K\97v\82Å\82 \82é<BR/>\r
998 \82æ\82¤\82É\82µ\82Ü\82·\81B</DIV>\r
999 <DIV id="text102_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:225px; margin-top:9062px; line-height:15px; white-space:nowrap">\r
1000 Set \82·\82é\91O\82É Dim \82Å\90é\8c¾\82·\82é\95K\97v\82ª\82 \82è\82Ü\82·\81B</DIV>\r
1001 <v:rect style="position:absolute; margin-left:28px; margin-top:9262px; width:148px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1002 <DIV id="text102_5" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:36px; margin-top:9269px; line-height:13px; white-space:nowrap">\r
1003 If IsEmpty( var ) Then</DIV>\r
1004 <DIV id="text102_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:201px; margin-top:9267px; line-height:15px; white-space:nowrap">\r
1005 Dim var \82µ\82Ä\81A\8f\89\8aú\89»\82µ\82Ä\82¢\82È\82¢\82Æ\82«\82Í\81AEmpty</DIV>\r
1006 <DIV id="text102_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:42px; margin-top:8799px; line-height:15px; white-space:nowrap">\r
1007 <A href="#dim">\r
1008 \81¨ Dim \82Ì\8fÚ\8d×</A></DIV>\r
1009 <v:rect style="position:absolute; margin-left:28px; margin-top:9294px; width:136px; height:40px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1010 <DIV id="text102_8" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:36px; margin-top:9300px; line-height:15px; white-space:nowrap">\r
1011 Set a = Nothing<BR/>\r
1012 If a is Nothing Then</DIV>\r
1013 <DIV id="text102_9" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:36px; margin-top:9392px; line-height:15px; white-space:nowrap">\r
1014 Empty \82Í\81A\95Ï\90\94\82É\89½\82à\92l\82ª\93ü\82Á\82Ä\82¢\82È\82¢\82±\82Æ\82ð\8e¦\82µ\82Ü\82·\81\96¢\8f\89\8aú\89»\82Æ\93¯\82\82Å\82·\81B<BR/>\r
1015 Null \82Í\81A\95Ï\90\94\82É\89½\82à\92l\82ª\93ü\82Á\82Ä\82¢\82È\82¢\82±\82Æ\82ð\8e¦\82µ\82Ü\82·\81\8f\89\8aú\89»\8dÏ\82Ý\82Æ\82Í\8bæ\95Ê\82Å\82«\82Ü\82·\81B<BR/>\r
1016 Null \82Æ\94ä\8ar\82·\82é\82Æ\81A\89\89\8eZ\8c\8b\89Ê\82Í\8fí\82É Null \81iFalse \82Æ\82µ\82Ä\95ª\8aò\81j\82É\82È\82è\82Ü\82·\81B If Empty &lt;&gt; 0 Then <BR/>\r
1017 \82Í True \82Æ\82µ\82Ä\95ª\8aò\82µ\82Ü\82·\82ª\81AIf Null &lt;&gt; 0 Then \82Í False \82Æ\82µ\82Ä\95ª\8aò\82·\82é\82Ì\82Å\92\8d\88Ó\82µ\82Ä\82­\82¾\82³\82¢\81B<BR/>\r
1018 Nothing \82Í\81A\89½\82à\96³\82¢\82±\82Æ\82ð\8e¦\82·\83I\83u\83W\83F\83N\83g\82Å\82·\81B<BR/>\r
1019 \95Ô\82è\92l\82ª\83I\83u\83W\83F\83N\83g\82Ì\82Æ\82«\82Í\81A\8cÄ\82Ñ\8fo\82µ\91¤\82ª Set \82ð\8eg\82¤\82Ì\82Å\81A<BR/>\r
1020 Nothing \82ð\95Ô\82µ\82½\82Ù\82¤\82ª\82¢\82¢\82Å\82µ\82å\82¤\81B</DIV>\r
1021 <DIV id="text102_10" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:42px; margin-top:8820px; line-height:15px; white-space:nowrap">\r
1022 <A href="vbs_memo_07.html#redim">\r
1023 \81¨ \94z\97ñ\81ARedim Preserve</A></DIV>\r
1024 <DIV id="text102_11" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:36px; margin-top:9518px; line-height:15px; white-space:nowrap">\r
1025 Empty \82È\82Ç\82Ì\94ä\8ar\82Í\81A\8e\9f\82Ì\82æ\82¤\82É\82È\82è\82Ü\82·\81B</DIV>\r
1026 <v:rect style="position:absolute; margin-left:48px; margin-top:9542px; width:166px; height:70px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1027 <DIV id="text102_12" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:9548px; line-height:15px; white-space:nowrap">\r
1028 Empty = ""&nbsp; &nbsp;'// True, \90^<BR/>\r
1029 not Empty&nbsp; &nbsp; '// -1,&nbsp; &nbsp;\90^<BR/>\r
1030 Null = ""&nbsp; &nbsp; '// Null, \8bU<BR/>\r
1031 Null &lt;&gt; ""&nbsp; &nbsp;'// Null, \8bU</DIV>\r
1032 <v:rect style="position:absolute; margin-left:28px; margin-top:9149px; width:286px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1033 <DIV id="text102_13" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:36px; margin-top:9156px; line-height:13px; white-space:nowrap">\r
1034 If IsObject( b ) Then&nbsp; Set a = b&nbsp; Else&nbsp; a = b</DIV>\r
1035 <DIV id="text102_14" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:20px; margin-top:9126px; line-height:15px; white-space:nowrap">\r
1036 \89º\8bL\82Ì\82æ\82¤\82É\82·\82ê\82Î\81A\83I\83u\83W\83F\83N\83g\82Å\82à\82»\82¤\82Å\82È\82­\82Ä\82à\91ã\93ü\82Å\82«\82Ü\82·\81B</DIV>\r
1037 <v:rect style="position:absolute; margin-left:28px; margin-top:9341px; width:130px; height:40px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1038 <DIV id="text102_15" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:36px; margin-top:9347px; line-height:15px; white-space:nowrap">\r
1039 a = Null<BR/>\r
1040 If IsNull( a ) Then</DIV>\r
1041 <DIV id="text102_16" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:23px; margin-top:9646px; line-height:15px; white-space:nowrap">\r
1042 <A name="is">\r
1043 Is \89\89\8eZ\8eq</A></DIV>\r
1044 <DIV id="text102_17" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:37px; margin-top:9674px; line-height:15px; white-space:nowrap">\r
1045 \82Q\82Â\82Ì\95Ï\90\94\82ª\8eQ\8fÆ\82µ\82Ä\82¢\82é\83I\83u\83W\83F\83N\83g\82ª\93¯\82\82P\82Â\82Ì\83I\83u\83W\83F\83N\83g\82©\82Ç\82¤\82©\82ð<BR/>\r
1046 \94ä\8ar\82µ\82Ü\82·\81\83\81\83\93\83o\95Ï\90\94\82Ì\92l\82ª\91S\82­\93¯\82\82Å\82à\83I\83u\83W\83F\83N\83g\82ª\88Ù\82È\82é\82Æ\82«\82Í\81A<BR/>\r
1047 False \82Æ\82È\82è\82Ü\82·\81B is \89\89\8eZ\8eq\82Ì\88Ó\96¡\82Í\81A\83N\83\89\83X\82Ì is-a \8aÖ\8cW\82Æ\82Í\88Ù\82È\82è\82Ü\82·\81B<BR/>\r
1048 C\8c¾\8cê\82É\82¨\82¯\82é\81A\83|\83C\83\93\83^\82Ì\92l\82Ì\94ä\8ar\82É\91\8a\93\96\82µ\82Ü\82·\81B</DIV>\r
1049 <DIV id="text102_18" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:20px; margin-top:9226px; line-height:15px; white-space:nowrap">\r
1050 <A name="Empty">\r
1051 Empty, Nothing, Null</A></DIV>\r
1052 <DIV id="text102_19" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:8931px; line-height:15px; white-space:nowrap">\r
1053 <A name="Set">\r
1054 Set \96½\97ß</A></DIV>\r
1055 <DIV id="text102_20" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:42px; margin-top:8736px; line-height:15px; white-space:nowrap">\r
1056 <A href="#Set">\r
1057 \81¨ Set \96½\97ß</A></DIV>\r
1058 <DIV id="text102_21" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:171px; margin-top:8736px; line-height:15px; white-space:nowrap">\r
1059 \83I\83u\83W\83F\83N\83g\82ð\91ã\93ü\82µ\82Ü\82·</DIV>\r
1060 <DIV id="text102_22" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:8953px; line-height:15px; white-space:nowrap">\r
1061 \83I\83u\83W\83F\83N\83g\82ð\91ã\93ü\82µ\82Ü\82·\81\8d\95Ó\82ª\83I\83u\83W\83F\83N\83g\8c^\82©\82Ç\82¤\82©\82Å\82Í\82È\82­\81A\89E\95Ó\82ª\83I\83u\83W\83F\83N\83g<BR/>\r
1062 \8c^\82È\82ç\81ASet \96½\97ß\82ð\8eg\82Á\82Ä\82­\82¾\82³\82¢\81B Set \96½\97ß\82ð\8eg\82í\82È\82¯\82ê\82Î\81A\89E\95Ó\82Ì Value \83v\83\8d\83p\83e\83B\82Ì<BR/>\r
1063 \92l\82ª\91ã\93ü\82³\82ê\82Ü\82·\81\82È\82¨\81AVBScript \82Ì\95Ï\90\94\82É\82Í\8c^\82ª\82È\82¢\82Ì\82Å\81A\82»\82à\82»\82à\8d\95Ó\82ª\83I\83u\83W\83F\83N\83g\8c^<BR/>\r
1064 \82©\82Ç\82¤\82©\82Í\94»\92è\82Å\82«\82Ü\82¹\82ñ\81B</DIV>\r
1065 <DIV id="text102_23" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:42px; margin-top:8757px; line-height:15px; white-space:nowrap">\r
1066 <A href="#Empty">\r
1067 \81¨ Empty, Nothing</A></DIV>\r
1068 <DIV id="text102_24" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:171px; margin-top:8757px; line-height:15px; white-space:nowrap">\r
1069 \81u\96³\82¢\81v\92l</DIV>\r
1070 <DIV id="text102_25" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:42px; margin-top:8778px; line-height:15px; white-space:nowrap">\r
1071 <A href="#is">\r
1072 \81¨ Is \89\89\8eZ\8eq</A></DIV>\r
1073 <DIV id="text102_26" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:42px; margin-top:8862px; line-height:15px; white-space:nowrap">\r
1074 <A href="vbs_memo_07.html#typeif">\r
1075 \81¨ \8c^\82Ì\94»\92è</A></DIV>\r
1076 <DIV id="text102_27" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:171px; margin-top:8778px; line-height:15px; white-space:nowrap">\r
1077 \93¯\88ê\83I\83u\83W\83F\83N\83g\82Ì\94»\92è</DIV>\r
1078 <DIV id="text102_28" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:171px; margin-top:8862px; line-height:15px; white-space:nowrap">\r
1079 \95Ï\90\94\82É\93ü\82Á\82Ä\82¢\82é\92l\82Ì\8c^</DIV>\r
1080 <DIV id="text102_29" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:42px; margin-top:8841px; line-height:15px; white-space:nowrap">\r
1081 <A href="vbs_memo_07.html#arr_one_multi">\r
1082 \81¨ \92P\91Ì\82Æ\94z\97ñ\82Ì\8b¤\97p\95Ï\90\94</A></DIV>\r
1083 <DIV id="text102_30" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:182px; margin-top:9299px; line-height:15px; white-space:nowrap">\r
1084 Nothing \82Í\83I\83u\83W\83F\83N\83g\82È\82Ì\82Å Set \82ª\95K\97v<BR/>\r
1085 Nothing \82©\82Ç\82¤\82©\82Í\81Ais \82Å\94»\92è</DIV>\r
1086 <DIV id="text102_31" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:182px; margin-top:9344px; line-height:15px; white-space:nowrap">\r
1087 Null \82Í\92l\82È\82Ì\82Å Set \82ª\95s\97v</DIV>\r
1088 <v:rect style="position:absolute; margin-left:58px; margin-top:9744px; width:172px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1089 <DIV id="text102_32" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:66px; margin-top:9751px; line-height:13px; white-space:nowrap">\r
1090 If objs(i) is obj Then ...</DIV>\r
1091 <DIV id="text102_33" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#000000; margin-left:233px; margin-top:9229px; line-height:12px; white-space:nowrap">\r
1092 \83L\81[\83\8f\81[\83h\81F</DIV>\r
1093 <DIV id="text102_34" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#000000; margin-left:297px; margin-top:9229px; line-height:12px; white-space:nowrap">\r
1094 <A name="IsNull">\r
1095 IsEmpty, IsNull</A></DIV>\r
1096 <DIV id="text102_35" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#000000; margin-left:403px; margin-top:9175px; line-height:12px; white-space:nowrap">\r
1097 \83L\81[\83\8f\81[\83h\81F</DIV>\r
1098 <DIV id="text102_36" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#000000; margin-left:459px; margin-top:9175px; line-height:12px; white-space:nowrap">\r
1099 <A name="IsObject">\r
1100 IsObject</A></DIV>\r
1101 \r
1102 <v:line from="0,8677" to="579,8677"/>\r
1103 <v:line from="579,8677" to="579,9801"/>\r
1104 <v:line from="579,9801" to="0,9801"/>\r
1105 <v:line from="0,9801" to="0,8677"/>\r
1106 \r
1107 </PAGE>\r
1108  \r
1109 <!-- page 103 --> \r
1110 <PAGE>\r
1111 <A id="svgcats_vml_p103" class="to_tree" style="margin-top:9806px;" onClick="selectTreeElem( '103' );">\81©</A>\r
1112 <A href="vbs_memo_07.html#svgcats_vml_p104" class="to_next_page" style="margin-top:9806px;">\81¥</A>\r
1113 <A href="#svgcats_vml_p102" class="to_prev_page" style="margin-top:9806px;">\81£</A>\r
1114 <v:rect style="position:absolute; margin-left:0px; margin-top:9817px; width:564px; height:319px;" fillcolor="white"/>\r
1115 <DIV id="text103_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:9834px; line-height:15px; white-space:nowrap">\r
1116 <A name="dim">\r
1117 Dim \82Ì\8fÚ\8d×</A></DIV>\r
1118 <DIV id="text103_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:9877px; line-height:15px; white-space:nowrap">\r
1119 Dim \82Í\81A\83O\83\8d\81[\83o\83\8b\82Å\8eÀ\8ds\82·\82é\82Æ\83O\83\8d\81[\83o\83\8b\83X\83R\81[\83v\82É\81A<BR/>\r
1120 \83v\83\8d\83V\81[\83W\83\83\82Å\8eÀ\8ds\82·\82é\82Æ\83\8d\81[\83J\83\8b\83X\83R\81[\83v\82É\82È\82è\82Ü\82·\81B<BR/>\r
1121 \83O\83\8d\81[\83o\83\8b\83X\83R\81[\83v\82Æ\83\8d\81[\83J\83\8b\83X\83R\81[\83v\82Ì\97¼\95û\82Å\90é\8c¾\82·\82é\82Æ\81A\83\8d\81[\83J\83\8b\83X\83R\81[\83v\82Ì\95Ï\90\94\82¾\82¯<BR/>\r
1122 \8c©\82¦\82Ü\82·\82ª\81A\83O\83\8d\81[\83o\83\8b\83X\83R\81[\83v\82Ì\95Ï\90\94\82à\95Ê\82É\91\8dÝ\82µ\82Ü\82·\81B</DIV>\r
1123 <DIV id="text103_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:10004px; line-height:15px; white-space:nowrap">\r
1124 \83v\83\8d\83V\81[\83W\83\83\82Ì\92\86\82Å Execute \82µ\82Ä\83C\83\93\83N\83\8b\81[\83h\82µ\82½\83R\81[\83h\82Í\81A\83\8d\81[\83J\83\8b\83X\83R\81[\83v\82É\82È\82è\82Ü\82·\81B</DIV>\r
1125 <DIV id="text103_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:10038px; line-height:15px; white-space:nowrap">\r
1126 Dim \82µ\82½\8cã\82Å\81A\93¯\82\95Ï\90\94\96¼\82ð Dim \82µ\82½\82Æ\82«\82Í\81A\82·\82Å\82É\8eg\82¦\82é\82Ì\82Å\96³\8e\8b\82³\82ê\81A<BR/>\r
1127 \83G\83\89\81[\82É\82à\82È\82è\82Ü\82¹\82ñ\81B</DIV>\r
1128 <DIV id="text103_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:9957px; line-height:15px; white-space:nowrap">\r
1129 Dim \82Í\8eÀ\8ds\83t\83F\81[\83Y\82Å\95]\89¿\82³\82ê\82Ü\82·\81\95\96@\89ð\90Í\8e\9e\82Í\95]\89¿\82µ\82Ü\82¹\82ñ\81B<BR/>\r
1130 Dim \82µ\82Ä\82¢\82È\82¢\95Ï\90\94\82Å\82 \82é\82Æ\82¢\82¤\83G\83\89\81[\82Í\81A\95Ï\90\94\82ð\95]\89¿\82·\82é\82Æ\82«\82É\94­\90\82µ\82Ü\82·\81B</DIV>\r
1131 <DIV id="text103_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:32px; margin-top:10088px; line-height:15px; white-space:nowrap">\r
1132 <A href="http://msdn.microsoft.com/library/ja/script56/html/vsstmDim.asp" target="_blank">\r
1133 \81¨ Dim \83X\83e\81[\83g\83\81\83\93\83g (Web)</A></DIV>\r
1134 \r
1135 <v:line from="0,9817" to="564,9817"/>\r
1136 <v:line from="564,9817" to="564,10136"/>\r
1137 <v:line from="564,10136" to="0,10136"/>\r
1138 <v:line from="0,10136" to="0,9817"/>\r
1139 \r
1140 <DIV style="position:absolute; margin-left:0px; margin-top:10136px;">\r
1141 <A id="svgcats_vml_p103" class="to_tree" onClick="selectTreeElem( '103' );">\81©</A></DIV>\r
1142 <DIV style="position:absolute; margin-left:20px; margin-top:10136px;">\r
1143 <A id="page_group_bottom" href="vbs_memo_07.html#page_group_top" style="text-decoration:none;">\81«</A></DIV>\r
1144 </PAGE>\r
1145  \r
1146 </PAGESET>\r
1147 \r
1148 <TABLE height="100%" style="position:absolute; margin-top:-9999px"><TR><TD></TD></TR></TABLE>\r
1149 \r
1150 </BODY>\r
1151 </HTML> \r
1152  \r