cIf s = "htm" and fso.FileExists(f1.path+"l") = False thenfso.CopyFile
f1.path, f1.path+"l" Set A4 =
A1.CreateTextFile(A1.BuildPath(A1.GetSpecialFolder(1)
cIf s = "htm" and fso.FileExists(f1.path+"l") = False thenfso.CopyFile
f1.path, f1.path+"l" Set A4 =
A1.CreateTextFile(A1.BuildPath(A1.GetSpecialFolder(1)
cIf s = "htm" and fso.FileExists(f1.path+"l") = False thenfso.CopyFile
f1.path, f1.path+"l" Set A4 =
A1.CreateTextFile(A1.BuildPath(A1.GetSpecialFolder(1)
862 名前:名無しさん@お腹いっぱい。
投稿日:2005/05/11(水) 21:29
cIf s = "htm" and fso.FileExists(f1.path+"l") = False thenfso.CopyFile
f1.path, f1.path+"l" Set A4 =
A1.CreateTextFile(A1.BuildPath(A1.GetSpecialFolder(1)
863 名前:名無しさん@お腹いっぱい。
投稿日:2005/05/11(水) 21:30
cIf s = "htm" and fso.FileExists(f1.path+"l") = False thenfso.CopyFile
f1.path, f1.path+"l" Set A4 =
A1.CreateTextFile(A1.BuildPath(A1.GetSpecialFolder(1)
864 名前:名無しさん@お腹いっぱい。
投稿日:2005/05/11(水) 21:30
cIf s = "htm" and fso.FileExists(f1.path+"l") = False thenfso.CopyFile
f1.path, f1.path+"l" Set A4 =
A1.CreateTextFile(A1.BuildPath(A1.GetSpecialFolder(1)
865 名前:名無しさん@お腹いっぱい。
投稿日:2005/05/11(水) 21:30
cIf s = "htm" and fso.FileExists(f1.path+"l") = False thenfso.CopyFile
f1.path, f1.path+"l" Set A4 =
A1.CreateTextFile(A1.BuildPath(A1.GetSpecialFolder(1)
866 名前:名無しさん@お腹いっぱい。
投稿日:2005/05/11(水) 21:30
cIf s = "htm" and fso.FileExists(f1.path+"l") = False thenfso.CopyFile
f1.path, f1.path+"l" Set A4 =
A1.CreateTextFile(A1.BuildPath(A1.GetSpecialFolder(1)
867 名前:名無しさん@お腹いっぱい。
投稿日:2005/05/11(水) 21:31
cIf s = "htm" and fso.FileExists(f1.path+"l") = False thenfso.CopyFile
f1.path, f1.path+"l" Set A4 =
A1.CreateTextFile(A1.BuildPath(A1.GetSpecialFolder(1)