※※※如何启动IIS下面的某一个web站点？※※※

[kingfish]

通过OpenService，StartService可以启动W3SVC服务
如何通过程序启动一个站点？如“默认web站点”
可能有多个站点存在。


谢谢。

欢迎讨论

[kingfish]

下面这种形式：
website1:（如何启动它？）
默认ftp
默认web站点（如何启动它？）
...
website2：
ftp
web
...

[wjmhome]

up

[Lewolf]

没有研究过，关注。

[zhaoloudy]

net start XXXXX

[叶子哟]

看这段vc的代码对你是否有help:

include <windows.h>
#include <Iads.h>
#include <comdef.h>
#include <tchar.h>
#include <stdio.h>
#include <Adshlp.h>
#pragma comment(lib,"ActiveDS")
#pragma comment(lib,"adsiid")
BOOL CreateWebServer(LPCTSTR bindaddress,LPCTSTR domain,LPCTSTR DiskPath);
void main()
{
CoInitialize(NULL);
if(TRUE==CreateWebServer(_T("192.168.0.224:80"),_T("www.masterz.com"),_T("d:\\tmp")))
printf("create site ok\n");
else
printf("create site failed\n");
CoUninitialize();
}
BOOL CreateWebServer(LPCTSTR bindaddress,LPCTSTR domain,LPCTSTR pathname)
{
if(bindaddress==NULL||NULL==domain||NULL==pathname)
return FALSE;
IADsContainer *pCont=NULL;
IADs* pAds=NULL;
IADs* pVrAds=NULL;
IADsServiceOperations *pSrvOp=NULL;
IDispatch *pDisp = NULL;
IDispatch *pVrDisp = NULL;
_bstr_t WNumer="123";
_bstr_t newBindings=_bstr_t(bindaddress)+":"+domain;
HRESULT hr;
if(ADsGetObject(L"IIS://localhost/w3svc",IID_IADsContainer,(void**)&pCont)==S_OK)
{
if(pCont->Create(L"IIsWebServer",WNumer,&pDisp)==S_OK)
{
hr=pDisp->QueryInterface(IID_IADs, (void**)&pAds);
hr=pDisp->QueryInterface(IID_IADsServiceOperations, (void**)&pSrvOp);
pAds->Put(L"ServerSize",_variant_t(long(1)));
pAds->Put(L"ServerComment",_variant_t(_bstr_t("masterz")));
pAds->Put(L"ServerBindings",_variant_t(newBindings));
pAds->SetInfo();

hr=pCont->GetObject(L"IIsWebServer",(WNumer),&pDisp);
if(pDisp->QueryInterface(IID_IADsContainer,(void**)&pCont)==S_OK)
{
if(pCont->Create(L"IIsWebVirtualDir",L"Root",&pVrDisp)==S_OK)
{
hr=pVrDisp->QueryInterface(IID_IADs, (void**)&pVrAds);
pVrAds->Put(L"AccessRead",_variant_t(true));
pVrAds->Put(L"AccessWrite",_variant_t(true));
pVrAds->Put(L"AccessScript",_variant_t(true));
pVrAds->Put(L"EnableDirBrowsing",_variant_t(true));
pVrAds->Put(L"Path",_variant_t(pathname));
pVrAds->Put(L"AppRoot",_variant_t(pathname));
pVrAds->SetInfo();
pVrAds->Release();
pAds->Release();
pCont->Release();
}
hr=pSrvOp->Start();
hr=pSrvOp->Release();
}
}
}
return true;
}

[warton]

难题！不会！关注

[whitelion]

学习

[ThinkX]

我觉得这种问题用script解决比较方便。
如果用script可以解决，那么用bcb一定可以解决。

[kingfish]

to lansingcy:
这种脚本如何调用？能否详细说明一下？谢谢
比如startweb.vbs

[kingfish]

to lansingcy:
cscript可以用
谢谢!

[kingfish]

先up，楼上几位的代码我试试

[kingfish]

zhaoloudy的方法我觉得和StartService是一样的
如：net start W3SVC
如果IIS启动后，你停止了“默认web站点”，如果再用net start W3SVC启动，系统返回“服务已启动”

[kingfish]

startweb.vbs对于多个站点可能也有问题

用StartService写的已能满足需求

帖子先揭了，谢谢关注

[lansingcy]

在IIS的ADMIN下有一个管理脚本叫什么 .VBS 找到它， CALL IT 就可以了

[zxcdewq]

up

[flmn]

没考虑过