try set oIIS = CoGetObject("IIS://LocalHost/W3SVC/1/ROOT/aaa",""); set oIISWeb = oIIS.Create("IIsWebVirtualDir","bbb");//仮想フォルダ作成 oIISWeb.SetInfo(); catch MessageBox("error", INFORMATION); endcatch; set oIIS = NOTHING; set oIISWeb …