热心网友:使用netBox。所有配置都写在main.box里,Dim httpd Shell.Service.RunService "NBWeb", "NetBox Web Server", "NetBox Http Server Sample" '---------------------- Service Event --------------------- Sub onServiceStart() Set httpd = CreateObject("NetBox.HttpServer") If httpd.Create("", 8222) = 0 Then Set host = httpd.AddHost("", "wwwroot") host.Enablescript = true host.AddDefault "default.asp" httpd.Start Set htWin= CreateObject("NetBox.HtmlWindow") htWin.ContextMenu=false htWin.Width=375 htWin.Height=200 htWin.Title="测试" htWin.scrollbar=false htWin.Open " http://127.0.0.1:8222/" htWin.ShowDialog 'Set Console = Shell.Console 'httpd.Stop 'httpd.Close 'Set httpd = Nothing else Shell.Quit 0 end if End Sub Sub onServiceStop() httpd.Stop httpd.Close End Sub Sub onServicePause() Shell.Quit 0 End Sub Sub onServiceResume() httpd.Start End Sub
热心网友:我有一个。可以直接发送到你的邮箱。也一直在用。感觉还可以。
进一步了解相关内容你可以在搜索以下相关关键词
在 web 服务器上 小旋风asp服务器 web服务器的配置 web ftp服务器配置 linux配置web服务器 win7配置web服务器 win10配置web服务器 iis配置web服务器 web服务器配置ip centos配置web服务器