' ***********************************************************
' オブジェクトを作成
' ***********************************************************
Set Fso = CreateObject( "Scripting.FileSystemObject" )

' ***********************************************************
' 処理開始
' ***********************************************************
strTarget = "frame.htm"
if not Fso.FileExists( strTarget ) then
	Set MyFile = Fso.CreateTextFile( strTarget )
	MyFile.Close
end if

strTarget = "control.php"
if not Fso.FileExists( strTarget ) then
	Set MyFile = Fso.CreateTextFile( strTarget )
	MyFile.Close
end if

strTarget = "model.php"
if not Fso.FileExists( strTarget ) then
	Set MyFile = Fso.CreateTextFile( strTarget )
	MyFile.Close
end if

strTarget = "view.php"
if not Fso.FileExists( strTarget ) then
	Set MyFile = Fso.CreateTextFile( strTarget )
	MyFile.Close
end if

strTarget = "view2.php"
if not Fso.FileExists( strTarget ) then
	Set MyFile = Fso.CreateTextFile( strTarget )
	MyFile.Close
end if

strTarget = "viewmessage.php"
if not Fso.FileExists( strTarget ) then
	Set MyFile = Fso.CreateTextFile( strTarget )
	MyFile.Close
end if

strTarget = "style.css"
if not Fso.FileExists( strTarget ) then
	Set MyFile = Fso.CreateTextFile( strTarget )
	MyFile.Close
end if

TH {
	font-family: Verdana,'ＭＳ Ｐゴシック';
	font-size: 12px;
}

TD {
	font-family: Verdana,'ＭＳ Ｐゴシック';
	font-size: 12px;
}