设为首页 | 收藏本页
登陆您的帐号 | 免费注册帐号
全部栏目 > 建站技术交流 > 服务器技术及安全 > Windows
下一篇上一篇
1 共1页
1/1 阅览:1763

主题:Netbox问题 无法创建NetBox.HttpServer,错误800A01AD [已解决]



shwgij

等级:
帖数:1|1
注册:2017-02-23
发布时间:2017-02-23 14:07:51 | 刷新时间:2017-02-23 14:09:01 | 楼主




就是netbox build 成exe 之前不是创建一个main.box ,然后说是这个错误。大神帮我看一下。。
然后我电脑上面好几个服务器,可是没有占用83端口的,
问题是红色标记的。就是无法创建NetBox.HttpServer,代码是从
http://www.netbox.cn/Document/?http://www.netbox.cn/Document/Document/AtFirst.Deploy.aspDemo.htm
这个上拷的。
下面是代码。
Dim httpd
Shell.Service.RunService "NBWeb", "NetBox Web Server", "NetBox Http Server Sample"
Sub OnServiceStart()
    Set h = CreateObject("NetBox.HttpServer")
    If h.Create("",83) = 0 Then
       Set host = h.AddHost("", "")
       host.EnableScript = true
       host.AddDefault "1.asp"
       h.Start
   else
       Shell.Quit 0
   end if
End Sub
Sub OnServiceStop()
   h.Close
End Sub
Sub OnServicePause()
   h.Stop
End Sub
Sub OnServiceResume()
   httpd.Start
End Sub
今天下午就收了,网上找了一晚上了。跪求大神解决。。。
赞(212)踩(229)TOP


shwgij

等级:
帖数:1|1
注册:2017-02-23
回复时间:2017-02-23 14:09:01 | #1

把 Set httpd = CreateObject("NetBox.HttpServer") 
改成  Set httpd = NetBox.CreateObject("NetBox.HttpServer")
就行了
回复/引用TOP
1 共1页

我来回复
打印 收藏 关闭窗口 下一篇上一篇
更多>>新录商号